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FEATURES: 



I) Radio Shack compatibility 

2] Error tree variable length records 

3) Full lower case detection and sjppon 

4( Repeating keyboard witti NO keybounce EVER 

5) Shift [0] typewriter keyboard option 

6) Execute only protection feature lor BASIC programs 

7) Automatic track support tor 35 througri 80 track drives (mixed) 

8) Device I/O handling wiin FORCE commanfl 

9) Supports high speed clock modihcation (up to 4,0mhz) 

10) Supports mixed mode {single & dotibie density) aulomaCically 

11) Allows disable-enable ol break key 

12) Allows user to define step rate per drive and re-configure system dish 

13) Allows for efficient use of double-fieaded dnves 

14) Built in screen printer (shift iCLEAP|) with [BREAK] key abort 

15) Multiple command chaining wilrt DO" 

16) Built in memory test with CLEAR command 

17) New printer driver which allows complete forms control and paging 

18) Automatic serial printer driver with optional auto linefeed 

19) Execute any DOS command from BASIC and return lo BASIC 

20) Free space map of diskette wrth optional output to pnmer 

21) Copy with variable length files 

22) Complete RS232 control from keyboard with status check 

23) Create and pre-allocale files from DOS 

24) Display current date and time from DOS 

25) More information from Directory with optional printer output 

26) Enter DEBUG wrlh shift [BREAK! So allow ^se ol [BREAK] from BASIC 

27) New DISKDDMP/CMD sector display/ modify program (works with filespecs) 

28) New DtSKZAP/CMD single/double density disk editor 

29) New BACKUP (more reliable, no more pack 10 check) 

30) New FORMAT (more reliable, no need lo bulk erase disk lirsl) 
31] New MAP utility (maps out disk, showing where files are located) 

New DOSPLUS Z80 Extended Disk BASIC 

1) Faster loads and saves 

2) BASIC Relerence utility (lines, variables, keywords printer option) 

3) BASIC Renumtier utility (renumber section of text, block text move) 

4) Shorthand features for almost ANY direct command (LOAD. SAVE, etc) 

5) Shortfiand features lor editing (listing and editing wilh single key) 

6) CMO 'U instantly displays currently set vanatiles 

7) GloOal search and replace in BASIC text 

8) Line printer TAB to 255 

9) OPEN'E ■ to end ol sequential file (tor output) 

10) Dl (delete and insert text line) 

II) DU (duplicate text line) 

12) ,R" & '.V* options after LOAD and RUN (files open & save variables) 

13) OPEND' allowed (Model II compatible) equal to OPEN'R 
Ml DOS commands from BASIC 

1bt Aulomalic. error free variable length records 

lDf Single step execution with TRON ifabulous lor debugging) 

17i CRUNCH (BASIC program compressor) 

18i New TBASIC (imy BASIC) otters full BASIC commands 

19) TBASIC and DOSPLUS together only useSK ol RAM (40K left in 48K TRS-80) 

***** 7 MORE UTILITIES ***** 

1) Single dnve copy 

2) Restore (dead files) 

3) Purge (unwanted files) 

4) Clearlile (destroys data by writing zeros to file) 

5) Transfer (moves all user files from one disk to another) 

6) Spooler (allows printing of text while freeing up Itw CPU) 

7) Crunch (Basic program compressor) 

***** ALSO ***** 

- New I/O package 30^''i> taster 

■ No BREAK key death from DOS 

■ No closing killed files and mining diskettes 



DOSPLUS gives you more of what you buy an opera- 
ting system for. Speed and reliability v^ithout sacrificing 
simplicity and power. If you need extra power without 
extra wait, then you need DOSPLUS! 

Single or double density systems available for Model I. 
Model III DOSPLUS ready for immediate delivery. 

Perhaps the best investment you can make for your 
TRS-80! Listen to what others have had to say about 
DOSPLUS. 

"Overall, DOSPLUS Is the fastest operating system 
I have seen..." 

Pete Carr in 80-US Journal. 

"DOSPLUS. ..the better mousetrap." 

Stewart Fason in 80-Microcomputing 

"On a scale of 1 to 10, 1 give DOSPLUS a solid 9." 

Reese Fowler in 80-Microcomputing 
(Model III DOSPLUS review) 

For the BASIC programmer, our features are un- 
matched. For the average businessman, our speed and 
simplicity cannot be beat. 

So, join the satisfied users who have joined DOSPLUS. 
Experience excellence! Experience DOSPLUS! 

DOSPLUS comes complete with full utilities, PLUS 
a FREE patch to enable Model I Scripsit/Super 
Script to run on Model III, UNLIMITED Backups! 



Model I DOSPLUS — ^99" 

Model III DOSPLUS — ^99^^ 

Model I double density upgrade — M75™ 

Master Directory 1.2 (double density) — '29' 



STEP ON THOSE 

DOS BUGS!! 
ORDER TODAY!! 




Specializing in the Tandy Line 
(305) 983-3390 



►^38^ 




5846 Funston Street 
Hollywood. FL 33023 



CALL TOLL FREE FOR FAST SERVICE 

(800) 624-7888. OPERATOR 193 

FOR VISA/MASTERCHARGE/C O.D, ORDERS 

Califorrrja dial (800) 852-7777, Operator 193 

Alaska and Hawaii dial (800) 824-7919, Operalor i93 
TOLL FREE LINES WILL ACCEPT ORDERS ONLY! 

f^or Appir.ations and Tecnntcal mtormaihoi" call 
l305j 963-3390 ot dfop us a card 



Dealers inquiries mvited 



TRS-80* C OMPUTING EDITION 

©1981 Percom DiitaQ)., inc. 



I!Et)f |3crcoin |Dtnpt)rial 



35 cents 



Percom's DOUBLEk 11 tolerates wide variations in media, drives 



GARLAND. TEXAS — May 22, 1981 — 
Harold Mauch, president of Percom Data 
Company, announced here today that an im- 
proved version of the Company's innovative 
DOUBLER"* adapter, a double-density plus^-in 
module for TRS-80' Model I computers, is 
now available. 

Reflecting design refinements based on both 
theoretical analyses and field testing, the 
DOUBLER 11 ". so named, permits even great- 
er tolerance in variarions among media and 
drives than the previous design. 

Like the original IXX'BLBR. the DOU- 
BLER II pUig^ into the drive controller IC 
socket of a TRS-80 iModel I Expansion Inter- 
face and permits a user to run cither single- or 
double-density diskettes on a Model I. 

With a DOUBLER II installed, over four 
times more formatted data — as inuch as 364 
Kbytes — can be stored on one side of a five- 
inch diskette than can be stored using a stan- 
dard Tandy Model 1 drive system. 

Moreover, a DOUBLER U equips a Model I 
with the hardware required to run Model III 
diskettes. 

[Eti. Note: See "03-80": Bridsing the TRS- 
80' software compatibility gap" elsewhere un 
this page.) 

The critical clock-data separation circuitry 
of the DOUBLER II is a proprietary design 
called a ROM-programmed digital phase-lock 
loop data separator. 

Accordinj^ to Mauch, this design is more 
tolerant of differences from diskette to diskette 
and drive to drive, and also provides immunity 
to performance degradation caased by circuit 
component aging. 




Percom DOUntfcR M 

Mauch said "A DOUBLER II will operate 
just as reliably two years after it is installed as it 
will two days after installation." 

The digital phase-lock U)op also eliminates 
the need for trimmer adjustments typical of 
analog phase-lock loop circuits. 

"You plug in a Percom DOUBLER II and 
then forget it," he said. 

The DOUBLER II also features a refined 
Write Ptecompensation circuit that more 
effectively minimizes the phenomena of bit- 
and peak-shifting, a rcliahility-impairing char- 
acteristic of magnetic data recording. 

The DOUBLER II. which is fully s^iftware 
compatible with the previous DOUBLER. is 
supplied with DBLDOS". a TRSDOS'- 
compatible disk operating svstem. 

The DOUBLER II .ell>k;r$?>C3. iiiJud- 
ing the DBLDOS diskette^ ^<[^*\,^^ 



Circuit misapplication causes diskette read, format problems. 

High resolution key to reliable data separation 



GARLAND. TEXAS — The Percom 
SEPARATOR' does very well for the Radio 
Shack TRS-80* Mi>del 1 computer what the 
Tandy disk controller doe.s poorly at best: relt- 
ably separates clock and data signals during 
disk-read operations. 

Unreliable data-clock separation causes for- 
mat verilnjation failures and repeated read 
retries. 

CRC ERROR -TRACK LOCKED OUT 

The problem is most severe <»n high-nuniber 
(high-density) inner file tracks. 

As reported earlier, the cliKk-data separa- 
tion problem was traced by Percom to misap- 
plication of the internal separator of the 1 77 1 
drive controller IC used in the Model I. 

The Percom Separator substitutes a high- 
resolution digital data separator circuit, one 
which operates at 16 megahert:. for the low- 
resolution one-mefiahert: circuit oi the Tandy 
design. 

Separator circuits that operate at lower 
frequencies — fi)r example, two- or four- 



megahertz — were found by Percom to provide 
only marginally improved performance over 
the original Tandy circuit. 

The Percom solution is a simple adapter that 
plugs into the drive ct)ntriiller of the Expansion 
Interface (EI). 

Not a kit — some vendors supply an un- 
tested separator kit of resistors. ICs and other 
paraphernalia that may be installed by mod- 
ifying the computer — the Percom 
SEPARATOR is a fully assembled, ("ull\ tested 
plug-in module. 

Installation involves merely plugcine the 
SEPARATOR into the Model I El disk con- 
troller chip stK'ket, and plugging the controller 
chip into a socket on the SEPARATOR. 

The SEPARATOR, which sells for only 
$29. 95, may be purchased from authorized Per- 
com retailers or ordered directly trom the fac- 
tory. The factory toll-free order number is 
1-800-527-1222. 

Eli. note: Opening the TRS-80 Expansion In- 
terface may void the Tandy limited 90-day 
warranty. ^-m 



Owners of original DOUBLERs may pur- 
chase a LX3LJBLER II upgrade kit. without the 
disk controller IC. for S30.00. Proof of pur- 
chase of an original DOUBLER is required, 
and each DOUBLER owner may purchase only 
one DOUBLER II at the $30.00 price. 

The Percom DOUBLER II is available from 
authorized Percom retailers, or may be ordered 
direct from the factory. The factory toll-free 
order number is I 800-527-1222. 

Ed. note: Opening the TRS-80 Expansic)n In- 
terface may void the Tandy limited 90-day 
warranty. ^^ 



All that glitters is not gold 

OS.80 Bridging the TRS-80* 

software compatibility gap 

CimipaMbilitv Seiween TRS-80' Model 1 dislccncs and 
ihe new MikIi'I 111 ii .ibtH.it a^ ijcnuinc as a ijuld-pbtctl lead 
Krxijjurr.ird. 

True. Mt-kiellTRSDOS' diikctiescnnheietiJiina Model 
111. But first they must lie convened and re-reti>rdcd fur 
Model 111 operation. 

And you cannot utite to a Model I TRSDOS'diskfltc. 
Not with a Model 111. YoucanrKiraddalilc. Delete a file. Or 
m any win imidify a Model I TRSIWS diskette with a Mode! 
HI lonipijier, 

("urthermore, your converted TRSDOS JiskeCics cannot 
he converted hack hyi Model 1 operation. 

TRSDOS li a iine-way street. And there's rui retreating. 
A point to tunsiilet before swiiching the cumpanv's payroll 

III your new Mode! III. 

Re-il soliwate tonipatihility -jhiiulJ allow the iliiett, im- 
meditue mterchanyeabilm ol' Model I Jiid Model III disket- 
tes. No re*i-iinly limitations, no converskWre- recording 
steps and no chance to be left high and dry with Model 111 
diskettes that can't be run on a Model I. 

What's ihe answer.' The answer is Perciun's OS-80® 

l;iinily ot TR5-80disk openinnp systetiiN. 

OS-80t'toHr,inis allow Jirei:!, immtAuiii: jmerehani;eahilit\ 
of Model 1 and M.Jel ill diskettes. 

You can run Model I single-density diskettes on a Model 
llh install Percom's plug-in LXIUBLER'* adapter in vour 
Model I, and vou can run doiiNc-densiry Model llldiskerres 
on a Model I. ' 

There's mi conversion, no re-rccordine. 

Slip an OS-80 diskette out of your Model 1 and insert ii 
directly in a Model III. 

And vice -versa, 

Jusc have the correct 05-W disk opcraiini; system — 
tlS-eO, OS-SODorOS-SO/lll — in each computer. 

Moreover, with OS-8C systems, you can add. delete, and 
update tiles, You can read and vnte diskettes rcRardless ot the 
svstem ot orifiin- 

OS-80 is the original Percom TRS-80 DOS tor BASIC 
ptogra (Timers. 

Even OS-80 utilities arc wniicn in BASIC. 

OS-80 li the Percom system aKiut which a user wrote, in 
Creative Computing magazine. ". the best SJO.OC vou 
will ever spend. "■*■ 

Requiring only seven Kbyiesof memory, 05-80 disk oper- 
aring systems rcide completely in RAM- There's nt> need lo 
dedicate a drive exclusively fi'r .» system diskette. 

And. unlike TRSDOS. vou mn work at the track sector 
level, defining and conuollinE data lormais — in BASIC — 
to create simple or ci)mp!e?t <tata structures that execute 
more quickly than TRSDOS files. 

The Percom OS-80 DOS sufiptirts sinKle-densiry opera- 
tion ijf the Model I computer — price is$29.95. the OS-80D 
supports douhledeiisiiv operation of Model I computers 
equipped with a tX)CBLER or DOUBLER II. and, OS-80/ 
ill — lor the Model III of course — -supports both sintjle- and 
douhlc-densir\- operation. OS-SOD and IIS-Sl/III each 
..■lltur1-4V.yr ^429 



PRICES ANDSPECIFICATIONS vl iRlf-i :T TO( 1 lANC iF WITHOi T Nc'-TK T 



rRlLLSl.\.lNOTINi.:LUPFIU\nLlNi;.AN!:i~HiITINO 



PERCOM DATA COMPANY, INC. 11220 Pagemill Road Dallas. Texas 75243 (214) 340-7081 

'"Trademaikol Percom Data Companv, Inn, ■TB5-30an4TB51X)Sareit»demarkiotTai)dy Corporation *hichhmni)icU[ionihip(i.Peieiinil)ai.iCi>mpativ. TCrcnivcComputinjWag.i:i!ie.Juiii:, 19SC. pa)ic26. 



November 1981 Issue #23 




PUBLISHER/EDITOR 
Wayne Green 

EXECUTIVE VICE PRESIDENT 
Sherry Smythe 

ASSISTANT TO PRESIDENT 
Matt Smith 

ASSOCIATE PUBLISHER 
Edward Ferman 

ASSISTANT PUBLISHER 
Jeff DeTray 

DIRECTOR OF MARKETING 

(603) 924-7296 

Debra Boudrieau 

BULK SALES MANAGER 
GInny Boudrieau 

ADVERTISING SALES 

(603)924-7138 

John Gancarz 

Hal Stephens 

Sales Coordinator: Penny Brooks 

OFFICE MANAGER 
Marcia Stone 

DESIGN CONSULTANTS; Invisible Inc. 

Elaine Cheever, Corporate Designer 

Denzel Dyer, Howard Happ, 

Laurie MacMillan, Joyce Pillarella, 

Susan Stevens 

Manuscripts are welcome at 80 Microcomput- 
ing, we will consider publication of any TRS-80 
oriented material. Guidelines for budding auth- 
ors are available, please send a se It-ad dressed 
envelope and ask for "How to Wfi(e for 80 Micro- 
computing." Entire contents copyright 1981 by 
1001001 Inc. No part of this publication may be 
reprinted, or reproduced by any means, without 
prior written permission from the publisher. All 
programs are published (or personal use only. 
All rights reserved. 



B 



Paid Audited Circulation 



80 Microcomputing (ISSN -0199-6789) is pub- 
lished monthly by 1001001 inc., 80 Pine St., 
Peterborough NH 03458. Phone: 603-924-3873. 
Second class postage paid at PeterborougH, 
NH, and additional mailing offices. Subscrip- 
tion rates in U.S. are $25 for one year and $53 
for three years. In Canada, $27— one year only, 
U.S. funds. Canadian distributor: Micro Dis- 
tributing, 409 Queen St. West, Toronto, On- 
tario, Canada M5V 2A5. BO Canadian distribu- 
tor: Graymar Data Services, Ltd., #4 258 E. 1st 
Ave., Vancouver, BC VST 1A6. Foreign sub- 
scriptions (surface mail), $35— one year only, 
U.S. funds. Foreign subscriptions (air mail), 
please inquire. In Europe contact Monlka 
Nedela, Markstr. 3, D-7778 Markdorf, W. Ger- 
many. In South Africa contact 80 Microcom- 
puting, P.O. Box 782815, Sandton, South 
Africa 2146. All U.S. subscription correspon- 
dence should be addressed to 80 Microcom- 
puting, Subscription Department, P.O. Box 
981, Farmlngdale, NY 11737. Please Include 
your address label with any correspondence. 
Postmaster: Send form -3579 to 80 Microcom- 
puting, Subscription Services. P.O. Box 981, 
Farmlngdale, NY 11737. 

4 • SO Microcomputing, November 1981 





Computerization of the 110 
Workplace 

by Chris Brown 

Despite the promises of true beiievers, the 
rebirth of the American workplace for the 
better has yet to arrive. In fact, things may 
have gotten worse. 



Digital Delivery 112 

by Bert Latamore 

For a long time, friendly neighborhood post- 
men have been tempting morsels for the 
Fidos of this world, but soon man's best 
friend may be confronted with a mailman 
that bytes back. 



Paper Mountain bylheron Wlerenga 118 

No need for nuts, ropes, carabiners and crampons for traversing 
this peak— just a Model II and 64K of memory. 

Investment Property Analysis by Leslie e. sparks 1 44 

Before the big bucks begin to roll in, investing in real estate can 
be a tedious grind, unless you make your computer your calcu- 
lating partner. 



The Ups and Downs 176 

of Graphs 

by Richard Foley 

A picture is always worth a thousand num- 
bers, even if it's only a line drawing. 

Users Groups 272 

compiled by Michael Nadeau 

Some grassroots data on groups that have 
taken root across the nation. 
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529 REMARKS 



by Wayne Green 



". . . nothing like this is simple. 

Involved v^as. . . another unit 

which had been zapped by lightning. . . " 



Bum Rap for Lynx 

I he modem review in the September 
issue ("Spanning the Electronic Na- 
tion," page 134) came down hard on the 
Lynx people, who responded with cries of 
anguish and foul play. After looking into 
their product I'm inclined to agree that 
they got a shafting this time. 

Of course, nothing like this is simple. In- 
volved was an old prototype system which 
had been kicking around our offices for 
months, plus another unit which had been 
totally zapped by a lightning strike nearby 
while it was in use. Add to that some 
severe phone company problems in mere- 
ly getting the signals to the modem in 
useful shape. 

On the positive side for Lynx, I don't re- 
call any complaints from readers about 
the unit, and since t encourage this type of 
communication, I generally get quick 
feedback when there are product prob- 
lems. And it has not escaped my notice 
that the Lynx unit has been used in most 
of the service net demonstrations at 
shows. 

The Lynx people are moving rapidly in 
their development of the modem technol- 
ogy, working towards 9,600 baud commu- 
nications. I visited their plant and 
watched some new products run through 
their paces. We may soon have an article 
on their new model, which is due soon and 
carries automation of the modem busi- 
ness much further. 

I was not dismayed to discover two of 
their top people are hams. Most micro- 
computer firms seem to have hams in- 
volved, so I wasn't really surprised. 

Their current model uses state-of-the- 
art design and construction and worked 
like a charm despite anything I could do to 
screw It up.B 



The Office Revolution 

%A# ill the day come when we really 

■ ' don't need secretaries any more? 

I'm convinced it will and I think I see the 

way it will come about. 

The first step is the normal executive 



desire to have the latest in gadgets. This 
will bring the computer to the elbow of the 
executive (as soon as some furniture firm 
wakes up to the need for an executive 
desk placing the computer where it is 
handy to use). 

The computer will begin by providing in- 
stant interoffice communications, access 
to data for decision-making, E-Z Calc 
worksheet planning and so forth. The 
word processor will encourage sending 
notes in answer to business letters, get- 
ting us into a much less formal correspon- 
dence style. Once we can live with a 
business letter which does not have to re- 
assure the recipient of his name and ad- 
dress, much of the secretarial role will 
have faded away. 



"Will the day come 

when we really 

don't need 

secretaries 

anymore?" 



Our computers will be able to remember 
addresses, file correspondence copies, 
and all those lovely things the secretary 
used to do. 

Considering the problem of finding 
good secretaries, the path of least re- 
sistance for executives will be to de- 
pend more and more on that computer by 
their side. 

Speaking of which, it's been some time 
since I've written about the need for 
smaller computers or terminals which are 
connected to the office computer system 
via a radio link instead of the usual um- 
bilical cord. We have radio telephones 
now, so separating the computer from the 
system by a radio link is not a big step. 

We're remote-controlling our televis- 
ion sets and lights, so why not our 
computers? My concept of the coming of- 



fice computer is one that will be much 
like a hard bound book, with an LCD 
display inside the cover which can be 
read when you lift the lid. The keyboard 
will be like those on the hand-held com- 
puter systems, though in typewriter key- 
board format. 

With a portable terminal like this you 
would be able to use it as a computer by 
itself, or, if you were around a host 
system, you could dump letters for print- 
ing, access data, and communicate with 
others via it and the phone lines. 

Recent calculator-sized television sets 
have an LCD screen which seems easily 
adaptable to our needs. Other than mak- 
ing things a bit smaller, there isn't a lot 
more to invent before we have this new 
type of micro-micro computer. ■ 



TRS Typesetting? 

%Af ell, yes, to some degree it is coming 
■• to that. 

More and more of the larger typesetting 
systems are able to accept material over 
phone lines. Instead of tying up machines 
costing $15,000 or so while setting manu- 
scripts in type, it is possible to use the 
TRS with a good word processor program 
and dump the copy directly into the type- 
setting system. 

Once you have a communications inter- 
face for a typesetting system, material 
can be accepted over the phone lines from 
authors, or run from disks or cassettes in- 
to a TRS and sent to the typesetter. I think 
we will be seeing more microcomputers 
used to write material for publication and 
to edit it. 

We're nearly ready to handle columns 
and even articles submitted on disk or 
cassette. We'll edit them on a TRS and 
and then send the material to our type- 
setting system. There an operator will 
add the typesetting instructions. Since 
this takes a fraction of the time required to 
type the article, the flow of material 
through this end of the publishing cycle 
will be speeded up and costs cut substan- 

Continued on page 48 



6 • 80 Microcomputing, November 1981 




Model I 
Model III 



Products that set Precedents. 



T 






A|5t>ER 
CBASIC II CP/M 



THE 



bestword process 



$1000,00 VALUE $ 
ONLY 



299d 



TIIADt:MA(IK>: 

•TRS-»,'Riid)i>Sh»<'lL'Tiiii<l. < <x|> 
••••PHOi\l\iP«l«nrr. I"i. 



.^ 



rocessin 









j'ae/ 



Si9lNMIT 



"It will be satisfactory 

for virtually all personal 

computer commur)ications." 



Lynx Modem 
Reconsidered 



September's review of modems (Span- 
ning the Electronic Nation, page 134) drew 
ioud cries of "foul" from Emtrol Systems, 
manufacturers of the Lynx modem (and 
from Lynx owners who wrote and called 
by the dozen to defend their machines). 
Yes, there were some problems with the 
review, and in fairness to Emtrol, I would 
like to explain briefly the events leading to 
the review and expand some comments 
about the modem. But first, two correc- 
tions: the Lynx board was manufactured 
on Mil. Spec. FR-4 epoxy glass, not pheno- 
lic material as I stated. Also, the current 
price is $299, not $249. 

I spoke with John Bickel of Emtrol Sys- 
tems, who took a great deal of time ex- 
plaining Emtrol's philosophy, and in help- 
ing me track down exactly the unit I had 
used for review. He discovered that the 
Lynx machine I obtained through 80 Mi- 
crocomputing was a prototype intended 
for product news, not a production unit in- 
tended for review. Therefore, the terminal 
program and documentation were prelimi- 
nary, and some of my conclusions about 
the unit's operation were consequently in- 
valid. The current documentation provid- 
ed by Emtrol is a 12-page, typeset booklet 
printed on heavy paper. Likewise, Mr. 
Bickel informs me that the dumb terminal 
program currently being shipped with the 
Lynx is reliable and exhibits no fragility. 

Let me try to add some perspective to 
why I would put this prototype up against 
production units. The revtew process was 
begun over 15 months ago. Articles, espe- 
cially long ones with photos or diagrams, 
go through an extensive in-house prepara- 
tion process; this review was submitted at 
the end of 1980. During the interim, I made 
a few changes to the article, but my con- 
clusions about the Lynx remained the 
same. Why no changes to the Lynx com- 
ments? Because, ironically, the two Lynx 
production machines I saw during that 
preparation period performed even less 
adequately than the copy I reviewed. This, 



Mr. Bickel tells me, is simply unlucky hap- 
penstance. One modem is Emtrol's "clas- 
sic service problem," and not at all repre- 
sentative of their product. Furthermore, 
the present Lynx model is the third gener- 
ation in production; I saw a mere proto- 
type of the first generation. 

I accept that information. I was nof 
aware that I had a preliminary machine in 
my hands, nor were other 80 staff mem- 
bers. A prototype cannot be expected to 
perform with the finesse of a final prod- 
uct; in support of Mr. Bickel's contention, I 
understand software giants Lance Mick- 
lus and Scott Adams both endorse the 
Lynx, as does Charlie Butler of The Alter- 
nate Source, and it is used by many com- 
panies for demonstrations at computer 
expositions. 

Mr. Bickel has also questioned my 
presentation of the Lynx's use of ports 
232-235 (the same ones used by Radio 
Shack, and disallowing the use of the 
Shack's RS-232 board) as a deficiency in 
the unit. In fact, he says, Emtrol's design 
objective was to make the Lynx perform 
with the entire body of standard Radio 
Shack and independent communications 
software. This software is all written for 
the 232 area, thereby making the Lynx the 
most widely useful and compatible mod- 
em available. I do not withdraw my objec- 
tion to this philosophy, because I must 
use my RS-232 board for computer-to- 
computer communications without using 
a modem. But I do agree with Mr. Bickel's 
observation that the majority of TRS-80 
users will probably invest in only one com- 
munications device. In light of this, the 
Lynx unit is in fact easier to get up and 
running than the RS-232 board/acoustic 
modem combination provided by Radio 
Shack, and will be preferred by many 
TRS-80 owners. Very few users, Mr. Bickel 
suggests, will face the conflict I present- 
ed. Therefore, though the Lynx would not 
suffice for me, it will be satisfactory for vir- 
tually all personal computer communica- 
tion applications. Furthermore, the Model 
111 version (because of differences in the 
Model III port hardware) does not conflict 
with any internal communications devic- 



es inside the computer. 

1 mentioned that the Lynx's parts layout 
was not compact, and suggested that this 
might contribute to noise problems within 
the Lynx. Mr. Bickel disagrees, and sug- 
gests that any minor problems with the 
preliminary unit were unrelated to layout. 
Yet the electronic production industry has 
for some time suggested that compact- 
ness is in fact a very important considera- 
tion in digital circuitry (Electronic Packag- 
ing and Production, December 1980 and 
August 1981. As an aside, recent analysis 
shows that even flat PC board traces are 
more subject to noise than rounded ones!) 
Mr. Bickel points out that the Lynx board 
was professionally designed, and con- 
cludes that his vendors did not violate 
any standard design parameters. On this 
point, our theoretical disagreement stands. 
The Lynx also has a few advantages I 
failed to point out: unlike the Microcon- 
nection, its power supply plugs in rather 
than needing attachment with a screw- 
driver. And no additional cable is needed 
to hook the unit up to the telephone lines 
(since a double jack is a part of the Lynx 
unit), whereas an additional hookup is not 
provided with the Microconnectlon. That 
makes the Lynx the only unit of the three 
"complete as shipped." 

There was no intention on my part to (as 
one correspondent called it) "cold shoul- 
der" the Lynx, but only to review the units 
in comparison with each other. In fact, I 
felt that my negative comments about the 
Lynx were quite mild, because I am not so 
naive as to believe manufacturers will not 
improve their product if they discover any 
limitations. Therefore, for the factual er- 
rors pointed out in the first paragraph 
above, I apologize to Emtrol and Lynx 
users. I look forward to receiving a new 
Lynx unit for review, and will report to 
readers as soon as possible. In the mean- 
time, let me reiterate that the Lynx has 
been well received over the past year, and 
deserves the serious consideration of any 
reader about to enter the world of com- 
puter communication. 

Dennis Bathory Kitsz 
Roxbury, VT 
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META TECHNOLOGIES 

26111 Brush Avenue, Euclid Ohio 44132 
CALL TOLL FREE 1-800-321 -3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 



THINGS ID 



BT MIRK SAWUSCH 



333 pages $7.95 

333 pages, written in simple terms, of 
"what-to-do" and "how-to- do- if Suitable 
not only lor microcomputers, but for pro- 
grammable calculators as well. Includes 
program listings, lormulas, a glossary ol 
computer terms and more! Definitely a 
MUST BUY! 

A PARTIAL LIST OF APPLICATIONS 

Real Estate Evaluation Test Your Typing Speed 
Astrology Finances & Investments 

Income Tax Biorythm 

Speed Reading Energy Efficiency 

Personality Test Antenna Design 

Statistical Analysis Letter Wrrting 

Logic Circuit Analysis Recipe IndexjCaJculator 
Carpenter and Mechanic s Helper 
Gerieral Purpose CkKk Twntr 



"OTHER MYSTERIES" 
VOLUME III 

by Dennis Kitsz 

Call now and place your order for this new 
book. "THE CUSTOM TRS-SQTm S OTHER 
MYSTERIES", from IJG. Inc. More tfian 
300 pages, with over 60 photographs, of 
projects for the hardware hobbyist. In- 
cludes schematics. PC layouts, software 
driver code. etc. for such do-it-yourself 
undertakings as high resolution graphics, 
reverse video, real-time clock/calender, 
music synthesis, ROM/RAM additions and 
more! 

THE CUSTOM TRS-80tm $29.00 

CALL FOR AVAILABILITY 



MICROPARAPHERNAUA 

NEWDOS by APPARAT 

NEWDGS/SObyApparal SI 39.95 

NEWDOS UPGRADE CALL 

NEWDOS ■*- with ALL UTILITIES 

35-track 169,95 

40-track $79,95 

BOOKS 

TRS-80TM DISK 

AND OTHER MYSTERIES . . $19.95 
MICROSOFTT" BASIC DECODED S24 95 



META NOTATIONS. .. 

MTC introduces its FREE computer "bulletin 
board" service. Set up your terminal or ter- 
minal software for 300 baud, parity disabled, 
B-bit word length, and 1 stop bit. Dial <216) 
289-8689. Alter the connection is established, 
type LOGIN META. When asked lor a valida- 
tion code, type META. Have fun! 

In a couple ol months MTC will introduce the 
successor to AIDSIII/CALCS. It is called 
AIDS;P" and is based on MTC's PRIMAL- 
(Practical Relational Information Manage- 
ment Applications Library), a powerful 
system for PRIME minicomputers. AIDS/P 
features the best of the critically acclaimed 
AIDS'lllfCALCS but is probably an order of 
magnitude beyond it in power. It will be first 
made available to AlDS-lll/CALCS owners (for 
an upgrade charge), then to the general 
public. Price will be In the S200-S300 range. 

Effective September 1. 1981, Metalronics Cor- 
poration became a subsidiary of MTC. 
Metatronics will carry the complete MTC 
product line in addition to its own. Order pro- 
cessing and tulfillmenl departments have 
been combined to improve service response 
levels, MTC's superior software and supplies 
marketing, and Metatronics exceptional 
peripheral offerings should prove to be a 
lomidable combination. (Sorry guys, if you 
can't beat us, join us . , .) 

MTC now offers a more complete selection ol 
diskette products (ad deadlines prevented in- 
clusion in anything but this column). New 
manufacturers are MAXELL and 3M. Definite- 
ly call for specific information. For example. 
MAXELL Brand 5V. ' diskettes in a PLASTIC 
LIBRARY CASE are only $34.95 (or a box ol 
10! SCOTCH Brand diskettes are comparably 
value-priced. MTC is also introducing its own 
PARAGON"-' Brand media products. The in- 
tent is to offer a super-high quality product at 
a very competitive price. For example, a box 
of 10 single-sided, soft-sectored, double- 
density. 100% certified diskettes with HUB 
RINGS is only $24.95! A full line of products 
(including HEAD CLEANING KITS, etc.) will 
be olfered. The PLAIN JAN £■■■ (almost 200,000 
units sold) diskette line will become part of 
the PARAGON^ MAGNETICS operation (but 
don't quote us verbatim). 



Let your TRS-80^" Test Itself With 

THE FLOPPY DOCTOR & 
MEMORY DIAGNOSTIC 

by David Stambaugh 

A complete checkup for your MODEL I or 
MODEL III. THE FLOPPY DOCTORVersion 3 
completely checks every sector ol single or 
double density 35-. 40-, 77-, or 80-lrack disk 
drives. Tests motor speed, head positioning, 
controller functions, status bits and provides 
complete error logging. THE MEMORY 
DIAGNOSTIC checks for proper write/read, 
refresh, executability and exclusivity of all ad- 
dress locations. Includes both diagnostics and 
complete instruction manual. 

SYSTEM DIAGNOSTICS $24.95 
For MODEL III $29.95 



Single Sided. Soft-Sectored 5' .inch, 

(for TRS-80^") fwlini-floppy 

DISKETTES 



$19 



95 

box of 10 



PLAIN JANE™ 

Tt>ese are factory fresh, absolutely first 
quafity (no seconds!) mini-floppies. They are 
complete with envelopes, labels and write- 
protect tabs in a shrink-wrapped box. 

PLAIN JANE TM Diskettes $19.95 

PLAIN JANE™ 'S<Jr/ 

Introducing MTC's premium generic 
diskette. Single-Sided. Soft-Sectored. 
DOUBLE-DENSITY, S'/.-tnch diskettes with 
reinforcing HUB-RINGS Individually 100% 
ERROR FREE certified. Invest in GOLD! 
PLAIN JANETM rj„A/ $24,95 

VERBATIMS PREMIUM DISKETTES 

DATALIFE" 

Seven data- shielding Improvements mean 
greater durability and tonger data life. 
These individually, 100% error-tree cer- 
tified diskettes feature thicker oxide 
coating, longer-lasting lubricant, improved 
liner, superior polishing and more! Meets 
or exceeds IBM, Shugart, ANSI. ECMA 
and ISO standards 
VERBATIM OATALIFETM DISKETTES 
5''*-inch (box of 10) 

MD525-01 . $26.95 

lOboxesof 10 (each box)$25.95 

Sinch FLOPPIES 

Double Density. FD34 8000 . $43.95 



'RINGS' & 
THINGS 

HUB RING KIT for S'A" disks $10.95 

HUB RING KIT for 8" disks $12.95 

REFILLS {50 Hub Rings) $ 5.95 

CLEANING KIT for 5'." drives $24.95 

5'/4-inch diskette case $3.50 

8-inch diskette case $3.95 

5'/4-lnch File Box for 

50 diskettes $24.95 

8-Inch File Box (or 

SOdiskettes $29.95 



TRS-SO ii a trademark of tfie 

Radio Stiacli Division ol Tandy 

Corporation DATALIFE ij a 

trademark ol VERBATIM PLAIN 

JANE, AIDS I. AIDS III. CALCS III. 

CALCS-IV. MERGE-III are 

Iradomarki ot MTC. 

$1981 by MetatecFinologws 

Corporation. Inc 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 

FVoducts damaged in 
transit will be exchanged- 



1 



PRICES IN EFFECT 
Nov, I. 1981 THRU 
November 30, 1981, 

Prices, Specifications, 
and Offerings subject to 
change without notice- 
em 



WE ACCEPT 

• VISA 

• MASTER CHARGE 

• CHECKS 

• MONEY ORDERS 
•COD 



• Add S 3.00 for shipping 
& handling 

• $3 00 EXTRA for CO.D, 
•Ohio residents add 5'/i% 

sales tax 
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Maxi Micro Manager 

I wish 1o thank your magazine and 
Wynne Keller, the author, for the fair and 
Impartial review that our program, "Maxi 
Micro Manager" received in your recent 
article, "Choosing a Data Base" (August 
1981). Such an article has been long 
awaited and needed by the buying public 
to help in determining which of the many 
data base programs are best suited to in- 
dividual needs. 

However, as is the case in most re- 
views, errors and omissions occur. I would 
like to take this opportunity to correct the 
most obvious and set the record straight. 
First and foremost, the program reviewed 
by Mrs. Keller was one ot our earlier re- 
leases. Both the name and the software 
has changed. The name was changed in 
January 1981 due to a conflict with 
another software package; the new name 
is Maxi Manager System. I hope that your 
readers take note so as not to purchase 
the same program twice. 

I am pleased to say that we have just re- 
written the MMS documentation and now 
Include several simple, easy to follow ex- 
amples covering all aspects of the pro- 
gram's functions. The new manual (over 
120 pages) is now distributed in a three- 
ring binder to tacilitate the addition of 
new pages as new features are added. 
Several sections of the previous manual 
have been retained but are now relegated 
to the technical reference section. 

One of the major enhancements of the 
new A.3 version o1 MMS involves the ini- 
tialization of a new data base. As stated in 
your review, "this takes time; go have a 
cup of coffee or lunch if you have several 
drives." With the A.3 version, the entire 
process takes less than two minutes. 
While the article mentions that MMS 
limits the length of any single field to a 
maximum of 40 characters, it doesn't 
mention that MMS allows a single record 
to contain a total of 800 characters, unlike 
both CCA and ADISIII, which limit record 
size to a maximum of 255 characters. 

The article goes on to say that MMS 
rarely allows the user to exit from a 
routine once started. This is not true. 
Video screen prompts usually provide 
safe exits back to the main menu of the 
program. Input is also said to be slow due 
to the use of a flashing cursor. While it is 
true that MP^S does use a high speed ma- 
chine language INKEY$ routine, its speed 
of character acceptance {on Model 1 ver- 
sions) is variable and can be set by the 
user to correct for Model I key bounce pro- 
blems. Perhaps Mrs. Keller set the Key De- 
bounce Factor to its slowest setting. 

The Select features of MMS have also 



changed. A sixth search criteria, 'NOT IN- 
STRING' has been added, logical And/Or 
relationships may now be establised be- 
tween fields as well as within fields, the 
masked search feature has been cor- 
rected and now properly works with nu- 
meric fields. The most useful new feature 
of all is Maxi Manager's ability to locate 
records regardless of the upper/lower- 
case spelling ot the selection criteria or 
data contained within the data base. 

Mrs. Keller also fails to mention the 
Search and Delete feature, handy when 
maintaining subscription lists. While it is 
true that "MMS allows paging back or for- 
ward to the next record in the file," the 
software also allows paging forward to 
the next record in the search. 

Perhaps the most welcome new feature 
of all is the Multi-Level Sort. We have to 
agree with Mrs. Keller when she states 
that if a data base cannot sort at least two 
fields at once, it is seriously flawed. 
Copies of the program that are delivered 
after August 15 will include this new fea- 
ture. Also, registered owners will be noti- 
fied and offered the upgrade. 

Last but not least, we have listened to 
our user's problems regarding our sophis- 
ticated print module. The A.3 version of 
MMS includes a new utility entitled Docu- 
file. This utility enables the most inexper- 
ienced MMS user to easily create the re- 
quired print documents (labels, reports, 
letters, etc.). 

We also see the need for different data 
base software for varied applications, in 
this regard, we share Mrs. Keller's senti- 
ments regarding the AIDSlll package and 
now include a utility that allows AIDSlll 
files to be merged into MMS files. This op- 
tion allows small data files to be created 
with AIDSlll; then when the files grow and 
become unmanageable, one simply 
merges them into MMS. This feature indi- 
rectly gives AIDSlll the ability to hand- 
shake with a word processor. 

Dale Kubler 
Exador, Inc. 

Roswell. GA 



Improved Version 



I was unable to examine the new ver- 
sion of the Maxi Manager database pro- 
gram (formerly called Maxi Micro Man- 
ager, from Adventure International) in 
time to include comments on It in "Choos- 
ing a Data Base" (August 1981). 

Since then I have used it extensively 
and have noticed considerable improve- 
ment over the earlier version reviewed in 
the article. A new printing utility program 
greatly simplifies the printout process. It 



is no longer necessary to use a word pro- 
cessor to create a file of report com- 
mands. The printing utility program may 
be requested instead. This utility allows 
all margin, paging, column and row op- 
tions to be set by answering simple ques- 
tions. I would now rate Maxi Manager 
easier to use than CCA for generating 
reports. A word processor such as Scrip- 
sit or Electric Pencil must still be used for 
form letter applications or for reports 
which need explanatory text, 

Wynne Keller 
Solon, ME 

CCA Data Manager 

As co-author of the program CCA Data 
Manager, sold by Personal Software, I 
was pleased to see it reviewed in the 
August issue of 80 Microcomputing. The 
reviewer, Wynne Keller, did a fine job 
pointing out the strengths and differences 
of the three products. 

There are two errors in the review re- 
garding the CCA Data Manager, however. 
The arithmetic capabilities actually do 
provide exponentiation, including roots. 
Also, the report writer does allow a sorted 
file to be processed without exiting the 
program and re-namlng with TRSDOS. 
Refer to the numbered message explana- 
tions at the back of the manual for instruc- 
tions on these features. 

Chet Floyd 
Manhattan Beach, CA 

Profile Left Out 

I am an avid fan of 80 Microcomputing 

and have been since its inception. I have 
noticed, though, that most of your authors 
tend to downgrade anything to do with 
Radio Shack. One article in particular con- 
cerned me enough to make me sit down 
with my super homebrew letter-writer for 
the Model 111 and write you this note. 

The article by Wynne Keller, "Choosing 
a Data Base," spoke of three data base 
programs. The article was well written and 
did describe the three programs fairly well 
(I have two of the three), but the author 
omitted Radio Shack's Profile for two 
weak reasons: It can only sort one field at 
a time; and it cannot perform calcula- 
tions. The author excused MMS tor the 
same faults. 

Now to Profile. Currently, we use two 
Mod Ills and one Mod I to adjunct our 
main edp effort. Many of the programs we 
use are either on Profile or are homebrew. 
We use no other canned programs, be- 
cause most business programs are either 
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MTCAIDS- 



TM 



MODEL I . . .$69.95 MODEL II . . $99.95 

Introducing the latest addition to MTC's family of data management systems, AIDS III. NO 
PROGRAMMING, easy to use COMPLETE PACKAGE including demonstration application, 
documentation and MAPS III isee belowi 

• Up to 20 USER DEFINED FIELDS of either numeric or character type 

• CHARACTERtype fields may be any length (total: up to 254 characters). 

• NUMERIC type fields feature automatic tormatting, rounding, decimal alignment and 
validation 

" Full feature EDITING when adding or changing records: 

- ENTER FIELD ican I tvoe in more characters than specified' 

BACKSPACE {aelete iast characler typed). ■ RiGHT JUSTIFY FIELD contents 

DELETE FIELD contents SKIP FIELD ito next or previous lieldi 

RESTORE FIELD contents - SKIP RECORD Uo next or previous record) 

• SORTING of records is MACHINE CODE assisted, 

200 RECORDS (40 characters) in about 5 SECONDS 

- ANY COMBINATION of fields (including numerics) with each field in ascending or 

descending order. 

• SELECTION ol records for Loading, Updating, Deleting. Printing and Saving is 
MACHINE CODE assisted 

- Specify up to 4 CRITERIA, each using one of 6 RELATIONAL COMPARISONS. 
■ LOAD or SAVE selected records using MULTIPLE FILES 

- Example. Select records representing those people who live in the state ot Col 

orado. but not m the city ot Denver, whose last names begin with 'F' 
and whose incomes exceed $9000. 00 

- Example Select records representing those sales made to XYZ COMPANY that 

exceed S25 00, between ttie dates 03/15 and 04,- 10. 

MAPS III iMTC AIDS PRINT SUBSYSTEM), included at no charge, has the following features. 

• Full AIDS-III SELECTION capabilities. 

• Prints user. specified fields DOWN THE PAGE. 

• Prints user-specified fields in titled, columnar REPORT FORMAT, automatically 
generating column headings, paging and (optionally) indentation 

• Can create a smgle report from MULTIPLE FILES. 

• Prints user-defined formats for CUSTOM LABELS, custom forms, etc 

BELOW ARE TESTIMONIALS from owners of AIDS systems These are absolutely authentic 
statements and are typical o) the comments we receive. 

"This prc^ram will do more for my business than all the other programs I 
have, combined." 

David Wareham, Vice President (EDP). National Hospital and Health Care Services Inc. 

"We have 32 diflerent Data Base Management packages for the TRS-80. AIDS-III is easily 

the best. It atso makes it easier tor us to step up to our Model II since the package is 

available for both computers." , , n i , n .. . or, .. . c- 

Jack Bilinski, President, 80 Microcomputer Services 

"Your AIDS program is (ar and away the linest information management system that I've 
ever seen, t am currently using it to maintain a clear picture of the demographic data on all 
the kids in our residential treatment program and it is working for me superbly." 

Frank Boehm, Director, Front Door Residential Treatment Program 



MTC AIDS CALCULATION SUBSYSTEM- 

MODEL I . . .$24.95 MODEL II . . .$39.95 

MTC's most popular AIDS subsystem Use 
for report generation involving basic 
manipulation ot numeric data. Features are: 

• User -specified page title 

• Columnar Headings 

• Optional Indentation 

• Jse for accounting, inventory, financial 

and other numeric-based information 

systems- 
Compare AIDS-lir"'CALCS-lir'' with any other data management package under $100! 

CALCS-III " REQUIRES THE PURCHASE OF AIDS 



• Columnar subtotals generated when 
there is a change in a user specified 
column. 

• User-specified Columnar Totals 

• Columnar values computed using con- 
stants and'or column values 

• Balance forward calculatrons (Ex: Gross 
sales equals prevkius gross sales + sate 
amount -^ sales tax). 



AIDS OWNERS! 

WE HAVE WHAT 

YOU'VE BEEN 

WAITING iV. . . 

MTCCALCS-IV™, thatls. 

• More Computations 

• Save Report Formats on Disk 

• Faster, and more! 

MTC CALCSIVTM $39.95 

For Modem $59.95 



MTC AIDS MERGE-lir" 

[This subsystem will combine up to 14 AIDS- 
created data files into a single, large file. An op- 
tk>nal purge capability removes duplicate entries 
while performing the merge operation (can even 
be used to eliminate duplicates in a single file). 
Machine-code assisted for highspeed perfor 

I mance, MERGEIIITM properly handles files sorted 
by any combination o( fields. Including numerics, 

I with each field m ascending or descending order. 

MTC AIDS MERGE-ni™ S19.95 

For Model II $29.95 



TM 



THE COMPLETE 

MTC AIDS- 
PACKAGE 



Includes MTC AIDS-lir^ 
CALCS-lirandMERGE-lir^ 

A comprehensive system 
at a competitive price! 

MODEL I & III $99.95 

MODELII $149.95 

Add$25lorCALCS-IVTM 



MORE 

PRODUCTS 
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change without notice, 

8111 



WE ACCEPT 

- VISA 

- MASTER CHARGE 
. CHECKS 

• MONEY ORDERS 
•COD 



•Add S3.00 for shipping 

& handling 

•S3 00 EXTRA (or COO, 
• Ohio residents add 5' >% 

sales tax. 



f(9 INPUT 



poor and don't really fit, or are so com- 
plicated that you must hire a programmer 
to operate the thing. Profile makes better 
use of disk space than any other data 
base program. It will accept up to four disk 
drives for one record. True, you wait 
awhile for the files to be formatted, and 
the sort is very slow, but the amount of 
files per disk Is fantastic. 

With MMS, you must call up another 
program in order to perform calculations. 
With Profile, you can write a basic pro- 
gram to call up Profile data direct from the 
disk and accomplish the same thing- 
automatical ly, if you want. I can even sort 
with a separate machine-language module, 
put Profile data on Visicalc, and hand- 
shake with Scripsit. 

Profile Is disk-based at all times. You 
will never lose the data during a power 
failure, except for the entry you didn't 
have time to save. Incidentally, the com- 
parative number of files per disk (drive 
with DOS), say of a file whose length is 132 
characters including 16 spaces for print- 
out, is AIDS=187, MMS = 437, PRO- 
FILE =1340. 

A. R. Pedrick 
Kissimmee, FL 



Modifying Tiny Pascal 

When U. Harrel's "Modifying Tiny 
Pascal for Disk" first appeared (July 1981) 
I didn't have disk drives. I received them 
late last month and one of the first things I 
did was code his PAS32K<PASMOD> fix. 
After several attempts I succeeded in get- 
ting the compiler on disk. I then entered 
the Filesave and Filetoad programs on 
disk and saved them to disk. Using the 
short programs provided with Tiny Pascal 
I tested the new disk modification and 
was very pleased. 

The real test came when I coded his ver- 
sion of Breakout using the Tiny Pascal 
tape. I attempted to save it as he had in- 
structed and nine tenths of the way 
through, I got an overflow error in line 10. 

Lo and behold, this program wa^ ap- 
proximately 3432 bytes (1991 codes). It 
began loading at &H73FO (29660) and 
continued through decimal 33112. As 
soon as AD= &H8000 (32768) an error is 
generated. 

I found that by adding the lines below 
you will be able to continue to read 
beyond &H7FFF: 

• Increase each lins number by ten. 

• Now J = PEEK (AD) Is line 100. 

• Insert: 105 If AO = 32767 then GOTO 170 
160 FD = AD-65535:AO= FD: GOTO 100 
170 AS = A$ + CHR$(J): GOTO 160 

Now When J = PEEK (32767) it will 



branch to 170, store the byte found there 
and return to 160 in order to convert to the 
negative numbers {- 32767 through -1) 
in a32or 48K machine. 

I thoroughly enjoyed hisZ-Bug program 
and was successful in getting it up-high 
and on disk. However, in module 4, page 
160 he defines the catalog and copy mes- 
sages as MS and calls them as MSG1, 
MSG2, etc . . . could be a typo. 

The Basic disassembler (August 1981) 
was a godsend. However, it won't PEEK 
beyond 7FFF and I tried a similar fix but to 
no avail. Any and all assistance would be 
greatly appreciated. 

Lee Swarlngen 
Thomasville, GA 

Symbolic Dump Printout 

After I saw an article in the July issue of 
50 Microcomputing concerning patching 
RSM to allow it to nnake system tapes for 
Model III, I wrote patches to get RSM to 
print a symbolic dump out to my line 
printer. 

The patches are as follows: 



ADDRESS 


FROM 


TO 


7070: 


F5 


C3 


7071: 


F1 


81 


7072: 


El 


7F 


7FB1: 


00 


03 


7F82: 


W 


FB 


7F83: 


X 


F5 


7Fa4: 


00 


F1 


7F85: 


00 


El 


7F86; 


00 


09 


7F87; 


00 


F1 


7F88: 


00 


F5 


7F89: 


00 


C3 


7FaA: 


00 


re 


7F8B: 


00 


70 



These changes are for the 16K version 
of RSM-2. For a 32K version the addresses 
are 4000 (hex) larger, and begin with the 
prefix A. For a 4aK version they begin 
with E. 

Lester Beasley, Jr. 
Dallas. TX 



More RSM-2 Changes 

In the July issue you published a short 
note from me giving patches to RSM2 or 
RSM2-D to allow it to read or write tapes 
for the TRS-80 Model III. This note gives 
further information that wilt allow RSM-2 
to start and stop the tapes: 

ADDRESS CHANGE FROM TO 

6CDE 04 02 

6CDF FF EC 

6EC6 FF EC 



If you have a disk system, the RSM-2 or 
RSM-2D tape can be loaded by the system 
program Tape and the changes can be 
made with Patch. 

Maynard B. Neher 
Columbus, OH 



WORD Update 



Thank you for the excellent review on 
Word (August 1981, page 234). Mr. Cook 
had the program quite a long time ago. 
Here are the updates: 

• WORD-4 has a compiled program in 
eluded free of charge. The compiled ver- 
sion will print as fast as your printer. Many 
minor enhancements are also included. 

• WORD-5 ($79) has also been available 
for almost a year. It can merge the data 
file maintained by our data base 
managers (lDM-4,5) and our mailing lists 
(MA)L-5). All versions are also available in 
Mode 1-3. 

Also, Program Listing 1 can be simpli- 
fied by taking out the following lines: 

10 .LL 65 
20 .PL 50 

BO .Fl 

Instead, use default values. Also delete: 
200 .EN. It's automatic in 95 percent of the 
cases. 

Tony Pow 

Micro Architect inc. 

AriingtOfJ, MA 

NEWDOS Messages 

Owners of NEWDOS 80 V.2 who do not 
like the "NEWDOS 80 is ready" message 
can use Superzap to change that to some- 
thing of equal or less length, such as "By 
your comand." Display sector 164, enter 
MOD C9 and input the hex code (see 
tables in the back of Lll manual) for the let- 
ters of your preferred prompt. 

You can likewise replace the three-line 
NEWDOS 80 banner with DOS instruc- 
tions for your users, reminders, notes or 
whatever. Display sector 17. Enter MOD 
C4. Bytes 04 (which contains BF) through 
FE (which contains 2E) can be changed to 
modify the first line. (That is 59 bytes. Do 
not type over the "OA" linefeed at byte FF.) 

The second line is tricky. The first char- 
acter of the second line is byte 00 of sec- 
tor 18. The rest of line two is in bytes 05 
through 3D (57 bytes). Typing over bytes 
01 through 04 will keep your disk from 
booting. Line 3 Is bytes 3F through 75. 

Nelson Ford 
Houston, TX 
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META TECHNOLOGIES 

26111 Brush Avenue. Euclid Ohio 44132 

CALL TOLL FREE 1-800-321-3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 



Let your TRS-80''-' Teach You 

ASSEMBLY 
LANGUAGE 

REMSOFTs unique package. ■INTRODUCTION 
TO TRSSO' ASSEMBLY PROGRAMMING" in- 
cludes ten 45-niinute lessons on audio cassettes, a 
display program for each lesson providing illustra 
tion & reinforcement, and a tent book on TRS-80" 
Assembly Language PrograiniTiing Includes use- 
ful routines to access keyboard, video, printer and 
ROM. Requires 16K Level II. Model I 

REMASSEM-1 $69.95 

FOR DISK SYSTEMS $74.95 



NEWDOS/80 Version 2.0 



$139 



SPECIAL 
95 INTRODUCTORY 
PRICE 



Let Your TRS-80^ Teach You 

ASSEMBLY LANGUAGE 
DISK I/O TECHNIQUES 

REMSOFT does it again! REMDISK-1 is a concise, 
capsulated supplement to REMASSEM-1 Package 
consists of two 45-minute lessons on audio casset- 
tes, and display programs providing illustration 
and reinforcement. Provides specific track and 
sector I'D techniques, and sequential and random 
file access methods and routines. 

REMDISK-1 $29.95 



Apparat's tong-awaited successor to NEWDOS+ is here! This is not an enhanced ver- 
sion ol NEWDOS. but a completely new product. Simplified DOS commands can be in- 
stantly executed from BASIC, even within a program, without disturbing the resident 
code. System options, such as password protection, number and type of disk drives. 
BREAK key enable' disable and lowercase modification recognition, can be quickly and 
easily changed. Five new random-access file types allow record lengths ol up to 4096 
bytes, and no FIELDing! A powerful CHAIN facility allows keyboard INPUTS to be read 
from a disk file. An improved RENUMBER facility permits groups of statements to be 
relocated within program code. Diskettes may even be designated as RUN ONLY! 
Features all NEWDOS -•■ utilities (SUPERZAP 3.0, etc.) and much more! One MTC 
technical staff member said having NEWDOS/80 is "better than sex' (you'll have to 
judge for yourself!). 

MODEL III VERSION 
Has all the features of the fi/lodel I version plus enhancements. Allows any mix of 
single- or dual-sided 40- or 80-track disk drives. Most BASIC and many machine 
code programs written for the Model I will run without modification. Includes a 
utility for converting Model I single density to Model III double density. 



NEWDOS/80#SPECIAL# 

CALL REGARDING OUR UPGRADE PRICING 



$139.95 



MICROPARAPHERNAUA 

DISKETTES (box of ten) 

5V." PLAIN JANETM S19.95 

5'/.'PLAINJANETM 'fi„M . . . . $24.95 
5'//' DATALIFETM MD 525-01 . . $26.95 
8' DATALIFE™ F034.8000 ... $43 95 

NEWDOS by APPARAT 

NEWDOS/SObyApparat . . $139.95 

NEWDOSUPGRADE CALL 

NEWDOS -f with ALL UTILITIES 

35-track $69.95 

40-track $79,95 

BOOKS ■ 

TRS-80TM DISK 

AND OTHER MYSTERIES . . $ 19.95 
MICROSOFTTM BASIC DECODED $24,95 
1001 THINGS TO DO WITH YOUR 

PERSONAL COMPUTER ... $ 7,95 



Michael Shrayer's 

ELECTRIC PENCIL 
VERSION II 

for 
Model I and Model III 

An expanded version of the critically ac- 
claimed original word processing system! 
Includes all features of Version I plus many 
new extensions. Runs under most disk 
operating systems, has improved video 
text handling, loads any ASCII file lor 
editing (including BASIC files), single sheet 
mode for printing on letterhead and more! 
Simple to use. features 2-key commands. 
An incredible package at an incredible 
price! 

SPECIFY MODEL I OR III 

Disk Version $79.95 

Tape Version $69 95 

CALL FOR AVAILABILITY 



Complete for Model I with all utilities 
Plus exclusive MTC QUE card! 

NEWDOS + 



$69 



95 



by Apparat 



Includes REF. RENUM, SUPERZAP. 
EDITOR'ASSEM., DISASSEM.. DIRCHECK.and 
more! This is the original NEWDOS witti alt ol 
Apparat's utility programs. Includes exclusive 
MTC QUE (Quick User Education) card. 

40-Track Version $79,95 

MTC QUE Card only $ 1,50 



TRS'80 IS i trademark ot the 

RaQio Shdck Oivi&ion ol Tandy 

Corporation. DATALIFE is a 

Irademam ol VERBATIM PLAIN 

JANE, AIDS I AIDS III CALCS III. 

CALCSIV, MERGE-lllare 

Irademarlis of MTC 
1961 by MeCatectinokig<es 
Corporation, Inc 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 

Products damaged in 
transit will be exchanged- 



PRICES IN EFFECT 
Nov 1, 1981 THRU 
November 30. 1981, 

Prices. Specifications, 
and OHerings subject to 
change without notice 

8111 



WE ACCEPT 

. VISA 

. IVIASTER CHARGE 

• CHECKS 

• MONEY ORDERS 

• COD 



• Add 53 00 tor shipping 
& har>dling 

•S3 00 EXTRA tor COD, 

• Otim residents add 5''''% 
sales tan. 



SOmpw 



Hex Conversion 



If you have a color computer with Ex- 
tended Basic or a Model I or III and Disk 
Basic, you may not be aware ot a capabili- 
ty you have. (This also applies to Micro- 
soft's Level III Basic). 

The two functions & and &H are used to 
convert an octal or Hex constant to 
decimal. This is a convenient feature, but 
it you want to use this function on a vari- 
able within a program, you will t3e irritated 
to find that it won't work! It is designed to 
work only with a constant. 

Because the information following 
these statements is treated as a string 
constant without quotation marks the var- 
iable following these statements will be 
treated the same (eg: &HA$) and give you 
garbage. 

The key to fooling the interpreter is the 
VAL function. Assuming that A$ = "FF", 
use this statement to convert A$ to a deci- 
mal number. 

A = VaK"&H" + A$) 
After this statement is executed the vari- 
able A will equal 255. Use of the octal func- 
tion is identical except you substitute & or 
&0 for $H. Assuming A$ = "7777" 

A = Val{"&" + AS) 
After the above statement the variable A 
will equal 4095. 

BUI Dickson 

Computer Division Supervisor 

Offshore Navigation Inc. 

New Orleans, LA 



Oddities 



I've had my TRS-80 Model I for three 
years now and have never found an error 
in documentation or in hardware without 
reading about it first in the pages of 80. 
Now all of a sudden these oddities are 
jumping out at me faster than I can take it! 

• It Is possible that we disk spinners 
are getting more for less. While formatting 
new disks, I answered the "Indicate the 
number of tracks on the disk" question 
with 41. Surprisingly, NEWDOS 80 format- 
ted 41 working tracks! I own two Percom 
40 track drives. A friend who owns the 
same equipment also formatted 41 valid 
tracks. 

• On page 14 of the Daisy Wheel II 
manual a chart of control codes is printed. 
A top of form code is not listed. I 
LPRINTED CHR$(12) which was not listed 
in the chart. Instantly the printer went to 
the top of the next form. CHR$(11) or 
CHR$(12) will cause a TOP function. This 
is contrary to the paragraph above the 
chart which clearly states: "The Daisy 



Wheel recognizes the fottowing control 
codes and ignores any others." 

Faithful readers of 80 will remember 
Datagen in the August issue. Use Datagen 
to change your Z80 code into Basic data 
statements and use your terminal soft- 
ware's "Send Basic Program" function to 
send your buddy a copy. 

Scott Kantner 
Sfjoemakersville. PA 



Graphics for LPVii 

If you have purchased a TRS-80 Line 
Printer VII and have had difficulty in gen- 
erating graphics this may help. 

Since the line printer does not hand- 
shake in the dot graphics mode the pro- 
gram must allow the print head to return 
home before the next print command. A 
fixed delay would work, but reduce the 
overall throughput since the head return 
time is short for a short displacement and 
any delay used would have to be long 
enough to accommodate a full-scale dis- 
placement. To get around this problem I 
use a delay which is a function ot the dis- 
placement as shown in line 220 of the pro- 
gram. The function was determined exper- 
imentally and might benefit through some 
fine tuning of the coefficients. 

The magnitude of the displacement is 
also used to set the high (h) and tow (I) 
field specifiers as required, line 160 (see 
note on page 11 of the manual). 

Finally, a modulo-7 counter is used to 
suppress the line feed and generate the 
required graphics character, which pro- 
vides an effective "line feed" or in this 
case a "row advance". After the current 
band is completed a full printer linefeed is 
allowed in line 210 (if P = 6). 

Henry E. Santana 
Loveland, CO 



Calculate Color 
Graphics Codes 



The codes for the very low resolution 
color computer graphics may be calculat- 
ed about as fast as they can be looked up. 
Consider the block: 



8 


4 


2 


1 



For green, to light up 1 use 128 plus 1, for 
yellow 144 plus 1. for blue 160 plus 1. and 
so on. For green, to light the top two use 
128 plus 8 plus 4 equals 140. for yellow 144 
plus 8 plus 4 equals 156, and so on. Take 
the characteristic color code for unlighted 
pixels (128, 144, 180. 176, 192. 208. 224 and 
240) and add to it the color number plus 
the number of each of the pixels you wish 
to light. Use CHR$(X) for rapid execution. 
Note that this is the opposite of Level II 
graphics where the blocks are numbered 



1 


2 


4 


B 


16 


32 



and a constant 128 (ail pixels off) is added 
to the sum ot the blocks. You can do these 
operations very quickly and save time over 
referring to a graphics chart. (Note: you 
may do it, as for example, CHR$ (128 plus 
6 plus 4) in a program, although it wastes 
memory.) 

FranHlyn D. tAiller 
Cincinnati, OH 



Program Bugs 



There are a couple of bugs running 
around loose out there tn TRS-80 land. The 
first and most grievous is in Super-Utility 
by Kim Watt. Under certain circum- 
stances SU will eat sector five of track 1 7. 



100DEFINTX,P,N.H.L,T 

110 LP= 14312 ' LINE PRINTER PORT ADDRESS 

120 POKE LP.18 ■ SET GRAPHICS MODE 

130 PI = 3.141593 

140 FOR X = TO 360 

150N=200 + 200-{SIN)X-PiraO)-KSIN(X"PIGOV3) + (SIN(X"PIM8VS) 

160 IF N > 256 THEN H = 1:U = N -255 ELSE H = 0:L = N 

170 POKE LP,27: POKE LP, 16 ' SET DOT COLUMN ADDRESS MODE 

180 POKE LP,H: POKE LP.L ' SET POSITION 

190 P = X - riNT(X/r} ■ MODULO 7 COUNTER 

200 POKE LP,I28 + 2CP ' PRINT GRAPHICS CHARACTER 

210 IF P = 6 THEN POKE LP,10: ELSE POKE LP.26 ' CARRIAGE RETURN 

220FORT = 0TO200 + 3-N:NEXTT' DELAY 

230 NEXT X 

240 POKE LP,30 ■ RETURN TO CHARACTER MODE 

250 END 

Program Listing 
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Expand your TRS-80@ MODEL I with 



EHTEHT-aD 



@) 



FOR 



$99 



95 







DRIVES 4-7 




I 




i 




1 


































EXTENT-80 


PLUG 








1 


1 


INTO '^ 
110VAC 




















OUTLET 




1 




1 




1 






CONNECT TO 
EXPANSION 
INTERFACE 


DRIVES 0-3 






















CONNECT UP TO 







I 



DRIVES 

Metatronics{a subsidiary of Meta Technologies Corp.. as ol Sepfembef 1 , 1981) introduces a unique device allowing the connec- 
tion ot as many as 8 disk drives to a TRS-80 MODEL I computer. Its integrated design is compatible with application software 
running under VTOS, LDOS, NEWDOS/80 (versions I &JI), NEWDOS + and TRSDOS 2.3. Features include a U.L. approved power 
supply, power-monitor LED. operating environment protection circuitry, high-impact metal case and gold-plated contacts. 
Complete with instructions and patch program diskette for configuring your favorite operating system. 

TRS-80 & TRSDOS are Itademarks ot the Radio Shack division ot Tandy Corp. EXTENT-80 Isa Iiadematk ot Melat tonics Corp. LDOS is a tradename ot Logical Systems inc. 
NEWDOS IS a tradename ol Apparal Inc. 



DISK DRIVE 

EXTENDER 
CABLE 

$995 

for VISTA, MICROPOLIS, 
MTI, PERTECSHUGART, 

PERCOM & OTHERS 



EPSON 

MX-80. MX.80FT. MX-100 

PRINTERS 

CALL FOR PRICE 



10 FT. RIBBON 

CABLE 

CONNECTS EPSON PRINTER 
& TRS-80 MICROCOMPUTER 



(n/^ETATRONICS 

\^^f CORPORATION 

A Subsidiary of Meta Technologies Corporation 



TO ORDER 

CALL TOLL FREE 

1-800-321-9390 

IN OHIO, call 

(216) 289-1210 (COLLECT) 



OFFICES 

26111 BRUSH AVENUE 
EUCLID. OHIO 44132 

(SEND MAIL ORDERS HERE| 




PRICES IN EFFECT 
Nov. 1, 1981 THRU 
November 30. 1981, 

Prices, Specifications, 
and Offerings subject to 
cliange without rtotice. 



Add S3.00 for sfiipping & handling 
'S3.00 EXTRA for CO. D. 
'Ohio residents add 5Vi% sales tax. 



WS4- 



(C; '9B1 by Meiaironics Corp, 



^Onww 



Right there In the middle of the directory 
there appears a great big 256-byte gap of 
nothing, i contacted Mr. Watt about this 
and he verified that two other persons had 
encour^tered and reported the error, and 
that he finaily duplicated it. Apparently 
Mr. Watts' idea of a fix Is to offer a proper- 



ly operating version of Super-Utility at an 
exchange price of about $25. He has re- 
written the program and is now marketing 
the new properly operating version. 

The second bug I uncovered is in a fine 
word processing program known as New- 
script. When used with the MX-80 printer, 



go DEBUg 



High Speed Data Tapes 

The attached listings are submitted 
as required Debugs for the "High 
Speed Data Tapes" article (July, 1981). 

In the final version of the subroutine, 
sufficient time was not allowed when 
writing the tape for strings longer than 
63 bytes to be moved from the input 
buffer to the string storage location. 
Before the subroutine returns to the 
tape reading routines, the next string 
has already started to be input and the 
computer gets out of synchronization 
with the tape, causing the dreaded 
lock-up condition. 

The changes submitted will calcu- 
late extra string move time needed for 



strings longer than 63 bytes and will 
delay the writing of the next string long 
enough for each string to be properly 
moved before the next string is input. 
The delay, although substantial in 
computer time, is not noticeable. 

My thanks to Carl Jaquett for in- 
forming me about this problem. Any 
person who would like to use this sub- 
routine in conjunction with Racet's 
GSF subroutines can send me a SASE 
and I will return a listing of the changes 
necessary tor use of the subroutine as 
GSF-routine #39. 



Jim Glosser 

1425 Eden Road 

York. PA 17402 



00200 




ORG 


ENDMEM - 527 13 .START OF THIS PROGRAM 


00201 






.SET MEMORY SIZE TO 32227 = t6K 


00202 






48611 =32K 


00203 






64996 = *8K 


03211 




LD 


A,(IX| ;(31 BYTES IN STWNQ 


03212 




SUB 


64 .(21 63 DONT REQ DELAY 


03213 




JR 


C.NOOEL ;(21 SKIP DELAY IF < 64 


03214 




INC 


A ,(l)ADDFOR64-63= 1 


03215 




LD 


BA ifljDELAY CYCLES REOO 


03216 


DELAY 


JH 


DELCON ,(2) 12 T STATES 


03217 


DELCON 


DJNZ 


DELAY ;12) 13 T STATES 


0321S 




,21 T STATES PER BYTE REQUIRED FOR BYTES OVER 


03219 




:63 TO COMPENSATE FOR LDDR TIME IN LINE 2670 


03220 


NODEL 


DEC 


DE :SUB 1 ELEMENTS TO WRITE 




- 




Listing 1. 


100 


CLEAR 350GDEFINT A - Z DIM TJ(26) 


no 


REM DISK USERS MUST EXECUTE DEFUSH IN LINE 120 AS FOLLOWS 






16K^ 


DEFUSR &M7DEE 






32K = 


DEFUSR &HBDEE 






48K = 


DEFUSR &HFDEE 


lao 


FORX= 171026 T$(«) = STRING$(255,X + 6't|:NEXT ] 


540 


REM IN LINE bX 


POKE VALUE 'O' AS FOLLOWS. 






16K = 


POKE 32227,0 






32K = 


POKE - 16925,0 






48K = 


POKE -541.0 

Listing 2. 



each time an underline is done the page 
creeps about 1/72nd of an inch. If much 
underlining isdoneyourtext can walkway 
up the page. This problem has now been 
fixed, and the newer versions do not have 
it. I would suggest holders of older ver- 
sions of Newscript contact Prosoft and 
ask them about an update. 

Finally, there's an error in NEWDOS 80, 
version 1.0. You can't assign a variable a 
name beginning with an A, D, or E with a 
second character (a numeric) without en- 
countering a Syntax Error while in the 
command mode. Well, it Is still there, but 
NEWDOS 80 version 2.0 has corrected the 
problem. I Just got version 2.0 yesterday 
and checked it out. It looks great. Version 
1.0 owners had better trade it in on the 
new one now. 

Jerry L. Latham 
Midwest City. OK 



Screen Printing 
for the MX-80 



Here are a couple of zaps for N EWDOS 
PLUS and NEWDOS 80 to change the 
screen print routines for Epson MX-80 
owners. These zaps allow screen printing 
of graphics characters using the JKL op- 
tion. Both zaps work with the MX-80 set up 
in the standard mode (Dip switch 2-4 is 
off). This allows use of all print and char- 
acter options with graphics characters 
which is not normally possible with either 
operating system. NEWDOS 80 does have 
a graphics capability, but without a 
change to the operating system, the 
printer must be in the TRS-80 mode which 
restricts print and character options. After 
applying the zaps to NEWDOS 80, the sys- 
tem option AK = N will give graphics capa- 
bility with the printer in the standard 
mode. These two byte changes are easily 
made using the superzap utility. 

First, run Superzap. Second, display 
NEWDOS PLUS— Track 0, relative sector 
6 and NEWDOS 80— Track 0, relative sec- 
tor 7. Third, change relative bytes 
NEWDOS PLUS— 7F and 80 from 3E,2E to 
C6,20 and NEWDOS 80— B9 and BA from 
3E,2E to 06,20. 

The replaced code is in the screen print 
routine after the data is sorted for the nor- 
mal ASCII character range. The original 
code changes all graphics codes to per- 
iods. The new code adds 20H to the 
graphics code to match the MX-80 stan- 
dard coding table. 

Herbert S. DuBois 
New York, NY 
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HRNNON 
iRGNCTICS 



To Order: 

Toll Free 1-800-525-7958 

1650 South Laredo Court • Aurora, Colorado 80017 



MICRO COMPUTER DISKEHES 

5'/i" DouWe Densit,, Single Sided. Mini Disks. Shnnk wrooped boxes ot 10 with pickets i obels and 'obs 



REGULAR 

RETAIL 

PRICE 



SPECIAL 
FALL 
SALE 

$22.95 



WE ARE NATIONALLY INTRODUCING OUR HIGH QUAUTY MINI-DISKS 
DIRECT TO THE END-USER AT A SPECIAL PRICE FOR A LIMITED TIME. 



THESE DISKETESAREFULLYGUARANTEED FOR ONE YEAR AGAINST DEFECTS. 
RETURN ANY DISKEHE GOOD, BAD OR OTHERWISE AND WE WILL 
REPLACE IT FREE WITH NO QUESTIONS ASKED. YES - WE MEAN IT! 

FREE SHIPPING 

WE OFFER ATTRACTIVE DISCOUNTS TO DEALERS IN SMALL QUANITIES 



The Newest NEWDOS/80 Version 2.0 
For Model I And Model III 



THE HOTTEST DISK OPERATING SYSTEM FOR THE 
TRS-80' COMPUTER IS NOW READY FOR THE MODEL 
III AND VERSION 2.0 IS READY FOR THE MODEL I, 
MANY ENHANCEMENTS AND ADDED FEATURES 
SUCH AS NEWCOMMANDS MAKE YOUR COMPUTER 
MORE POWERFUL! 




$149.00 



SHIPPING FREE 
(303) 773-6665 



• DOUBLE DENSITY ON MODEL I 

• SINGLE DENSITY ON MODEL Ml 

• EXPANDED DIRECTORIES 

• DYNAMICALLY MERGE IN BASIC 

• SELECTIVE VARIABLE CLEARING 

• PAGE SCROLLING IN BASIC 

• REPEAT FUNCTIONS 

• ROUTING FOR DEVICE HANDLING 

• DISASSEMBLER OUTPUT TO DISK 

• CHAINING ENHANCEMENTS 

• SUPERZAP 

We offer Dealer Discounts for purchases 
of one or more. 



Data Resources Corp. 



MASTER CHARGE 

AND VISA 

WELCOME 



Send yout card nuriiner and 
eipiraiion dale v^iih your o'dei 



Business & Professional Center 
8000 East Quincy Ave. 
Denver. Colorado 60237 



MTC IS a fleqrsiered Trademark oi Mela Tecfinologv Coip 
rRS-80 is a Registe'ed Trademark ol Tandy Cexp 

1981 Data Resources Corooration 
Producis disiribuied ay Data Resources Coro 



^£ee List or Aovtmswrs on pagt 402 



80 Microcomputing, November 1981 • 17 



5^(9 INPUT 



j'(9AID 



T-Bug Tip 



This letter is a response to Jonathan 
Yarden's plea for help in converting 
T-Bug for use on a Model III (80 Micro- 
computing, August, 1981). 

Replacing the tape I/O subroutines 
with calls to the ROM is fairly straight- 
forward, and requires changing about 
20 bytes. However, since the Model III 
routines abort tape I/O when the break 
key is pressed, control will then be 
returned to Basic instead of T-Bug 
command level. To avoid this unpleas- 
antness, the modifications must be 
more elaborate. 

Load T-Bug into your Model III and 
use the M command to change the fol- 
lowing bytes: 



start address: Chang«to: 



4643 


21 03 42 


36 03 23 36 62 




23 36 47 


CD 96 02 00 


460D 


CD 67 02 




46EB 


C3 F8 46 




4762 


CO F8 01 


C3 A5 43 


4782 


C3 35 01 




478C 


03 64 02 




47C5 


C3 F8 01 





Then use the M command to set the 
desired baud rate, and write your 
Model III T-Bug tape (P 4380 4980 43A0 
TBUG). Happy T-Bugging! 

Herb Robinson 

3814 Skyline Rd. 

Carlsbad. CA 92008 



Game Confusion Cleared 

I have a solution for Dennis Banik's 
problem of reading data from different 
blocks within a Basic program ("Game 
Confusion" 80 Aid. August 1981). Dup- 
licate this routine, in each block which 
requires reading data, ahead of any 
Read statement and after any Clear 
statement. 

W = PEEK{ie627) POKE 16640, 

PEeK(16628) + (W>239) ; POKE 16639,W 

If any Restore's are required in a par- 
ticular block, make this a subroutine 
which the program skips over. 



30010 REM BLOCK SIX 
30020 GOTO 30040 

30030 Q= PEEK(16627) ; POKE 16640, 
PEEK(16628) + (Q7239) : POKE 
16639, Q; RETURN 

30040 CLEAR 5000 : REM CLEAR' SETS DATA 
POINTER TO BEGINNING OF BASIC PROGRAM 

30160 GOSUB 30030 : REM ESTABLISHES DATA 
POINTER IN BLOCK SIX 

30480 GOSUB 30030 : REM RESTORES DATA 
POINTER TO BEGINNING OF BLOCK SIX 

Tlie first block does not need this routine andean 

use Restore. In addition, tfils routine must be con- 
llguous and on ihe same program fine. 

Vernon B. Hester 

42403 Old Bridge Road 

Canton. Ml 48188 



Software Problem? 

I am truly delighted with our two 
disk, 48K Model ill. TRSDOS 1.3 is 
more than I expected. Perhaps the 
neatest command in the system is 
CMD 0; it sorts 300 records of 100 byte 
length so quickly I am not sure how 
long it takes. The logic, versatility and 
documentation of the Model ill ex- 
ceeded my expectations. 

But I still want more. I want a fast 
search program. With a disk file of 300 
records, I want to be able to flash any 
one of the records onto the screen as 
soon as I get the record number. How- 
ever, if I do an alphabetical search us- 
ing "INSTR" It takes from 30-60 sec- 
onds. Is this too long? Do I have a soft- 
ware problem? To speed things up 
should I make a short file containing 
only the names and the record num- 
bers, translate the name to a number 
and then get the number? 

8. Jim Smith 
St. Jot}n's High School 
Shrewsbury, MA 01545 



Missing Person 

In response to Mr. Pfingstag's letter 
in the August 1981 issue I would like to 



apologize to any readers who might 
have been unable to contact me about 
my article "Selectric Hard Copy" 
(September 1980). I moved shortly after 
this article was published but I am in- 
deed alive, well and living at the ad- 
dress below. I have discussed this pro- 
ject with hundreds of readers and 
would be more than happy to corre- 
spond with anyone interested in inter- 
facing the Selectric. Avid readers of 80 
Microcomputing might have noticed 
that the missing parts list, other cor- 
rections, my new adress and tele- 
phone number have already been pub- 
lished. Where, you might ask? In the 
November 1980 issue of 80 Microcom- 
puting, where else? It is heartening to 
know that the editors of the best 
TRS-80 journal are too busy putting to- 
gether another excellent issue to sit 
around all day reading old columns. 

Michael W. Bickerton 

248 Barren Hill Road 

Conshhocken. PA 19428 

215-825-7556 



ROM RND Hangup 

For some time, I have been dabbling 
in machine language programming on 
my Level II 16K Model 1. 1 have run into 
difficulties, however, trying to access 
the ROM RND function for a genera- 
tion of pseudo-random integers within 
a given range(RND{X)). James Farvour, 
in Microsoft Basic Decoded, suggests: 



LD,2 




LO (40AFH),A 


set type flag to integer 


LDA,50 


range of random no. 1-50 


LO(4121H},A 


put range into WRA1 


CALL 14C9H 


get a random no. Between 1 




and 60 


LO HL.(4121H) 


load randorn no. from WRAI 


LOL(RVAL), HL 


to HL, and move to local 




area 



This routine crashes my system. I 
get an illegal function call (FC), which 
indicates, perhaps, the attempt to use 
a negative value for the argument. 
Looking at the code for 14C9H, the 
RND subroutine, It appears that the 



18 • 80 Microcomputing. November 1981 



Reader Service for facing page ,'548-' 



M^ DATA RESOURCES ^^ 

QUALITY SOFTWARE FOR YOUR TRS-80'' DISK SYSTEM .... 
TO ORDER CALL TOLL FREE 800-525-7958 



Data Resources is pleased to continue its commitment to professional quality TRS-80 
software by introducing The Silver Edition Software Series. This collection of programs 
represents the best contributions from the most talented and popular authors available 
These systems have been written by inventive creators like Bob Fiorelli of Meta 
Technologies, Pete Roberts of B.T. Enterprises, and Dave Stambaugh of the Micro Clinic 
These people have provided much of the software that has made the TRS-80 the most 
widely used data processing machine in the world. We do not include games or other 
entertainment programming and the selection of our series is made carefully to insure you 
nothing but the best. 

We are so confident of this series we will guarantee satisfaction by accepting a return for 
credit or refund of any package you purchase from us. If you wish to examine our 
packages at your local computer store and they do not have them in stock, have them 
contact us and we will make copies available to them for your evaluation Interested 
computer retailers who do not carry our software at this time should contact us 
concerning our discounts in minimum quantities and the availability of evaluation copies. 



BIONIC BASIC 

By Glynn Owen 
The BIONIC BASIC routines implemenl a number 
of uselul commands ano functions that are not 
available in regular BASIC BIONIC BASIC appends 
these routines to the BASIC/CMD file so that they 
loaO automatically every time Disk BASIC is 
entered The BIONIC BASIC modules will not 
require reserved memory, ihey are resident in 
memory whenever Disk BASIC Is being used 
Model I $49.95 



DATA RESOURCES 

NOW EXPRESS 

SERVICE 

We will guarantee to have any software order placed 
before noon M S T delivered the next businessday 
Air freight charges are collect We promise service 
and we deliver - over night it necessary or the order 
IS yours FREE. 



VERBATIM DISKETTES 
5V4 DOUBLE DENSITY 
40 TRACK DATALIFE $26.95 

FLIPSORT 

FILE BOX STORAGE 

5''. S19,95 

1 BOX VERBATIM 5. ' DISKS 

WITH FLIPSORT $43.95 



B.T. ENTERPRISES 
UNITERM/80 

By Pete Roberts 
This IS the stale of the art in communications 
software. It configures ilself lor either Model I or 
Model III and can be used with any standijrd 
modem, both RS-232 and Qus-Decoding 
Especially designed to use the extended commands 
tn NEWDOS'80, but fully compatible with all major 
DOS systems 
For Model I end III $89.00 



THE FLOPPY DOCTOR 

By Dave Sianibaugn 
FLOPPY DISK/MEMORY DIAGNOSTIC 
Computer professionals have long known the 
importance of regular use of diagnostic software in 
vsntying the integrity of computer hardware The 
TRS-80 Is no exception, good diagnostics are a 
must The MICRO CLINIC offers two programs 
designed to thoroughly check out the two mosl 
trouble prone sections of the TRS-BO, the disk 
system (conlrotler and drives) and the memory 
arravs 

MODEL t $24.95 MODEL III . . $29.95 



PAPER 

9",x11 TRACTOR FEED WHITE 

3300 SHEETS $29-95 

14'/,«11 TRACTOR FEED 
GREEN BAR 
3300 SHEETS $39.95 

PAPER SHIPPED BY TRUCK 
FREIGHT CHARGES COLLECT 



MODEL I 
DOUBLE DENSITY PACKAGE 

NEWDOS/aO Version 2.0 and conlrotler. 

Everything you need to convert your TRS-BO 
Model I to run double density Complete 
with software, hardware, and instructions - 
installs in minutes wiin NO SOLDERING, 
WIRING OR CUTTING $229.95 



AIDS SYSTEMS "^ 

BY METS TECHNOLIGIES 
MTC AIDS III 

This easy lo use system allows even a novice 
TRS-80 user to create data files custom 
configured for many applications from lists 
lor mailing and cataloging to financial 
reporting and time scheduling It requires NO 
PROGRAMMING and is complete wth 
features for adding, deleting, sorting 
updating and printing 
MODEL I $69.95 MODEL II $99.95 

MTC CALCS Ml 

Performs numeric calculations of data 

contained in AIDS files Ideal for financial 

applications 

MODEL I $24,95 MODEL II $39,95 

MTC CALCS tV 

The same features as CALCS HI with more 
powerful formulas and the ability to store 
report formats 
MODEL I $39.95 MODEL II $59.95 

SPECIAL 

AIDS III SUPER SYSTEMS 
AIDS III & CALCS III a MERGE III 

MODEL I $99.95 

AIDS III a CALCS IV & MERGE III 

MODEL I $109.95 

DATA RESOURCES 

NEW SUBSYSTEMS FOR AIDS III 

AIDS DISK SORT 

Designed tor files Ihal are too large to sort "in 
memory" with AIDS or for when you don't 
want to wait while AIDS loads the records. 
Records are physically rearranged on disk 
MODEL 1 $24.95 

AIDS FILE EDITOR 
Allows you to update and edit records in AIDS 
data files without loading Ihe file into memory. 
Now you can change a single record in a 
mailing list quickly and easily with random 
access selection. 
MODEL I $24,95 

AIDS DATA ENTRY MODULE 

Designed for mpjilmg data dneclly inio AIDS 
files Fields may De fixed to cepeat the same 
data The key-in routines are improved m 
speed — no more over Keying. Data can be 
added to the end of an existing file or a new file 
can be created Files are automaitcaiiy opened 
and closed so even if the computer is turned 
otf in the middle of work, no more than 255 
keystrokes can be lost 
rwODEL I $24,95 



A^ 



MASTERCARD ^ 
AND VISA _ 
WELCOME 
We also accept 
COD • CHECKS 
MONEY ORDERS 



_Data Resources Corporation. 



ALL SOFTWARE SUPPLIED ON DISKETTE. 
ORDERS IN U S.A SHIPPED U.P-S. FREE. 
Colorado residents add 6'/?% sales tax, 

ATTN: DEALERS - We oHer attractive pricing and terms to small 
computer retailers. Write for information on our dealer program and 
discounts in small quantities. 



Business & Professional Center 8000 East Quincy Ave, 
Denver. Colorado 80237 (303) 773-6665 



1931 DATA RESOURCES CORP 
TRS-80*- IS A TRADEMARK OF TANDY CORP 
Pnces in effect Ocl 1 1981 to Oct 30 1981 and sjbiect to cfianges 
AIDS III.' CALCS III.' MERGE Hi; ARE TRADEMARKS OF METAT£CMN0LOGIES 
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The Software Dilemma 

Recently I purchased Trakcess by Rox- 
ton Baker through Alpha Byte Stores, t am 
very Impressed. Trakcess has lived up to 
my original expectations and much more. 
However, what really surprised me was 
that Mr. Baker actually encouraged peo- 



5'(7aid 



routine does not access WRA1 for the 
argument, but HL instead: 

14C04 C ALL 0A7FH; test tw iniegei flag 

LD.H 
Ofl 

JP n,iE4AH', Illegal FC il negative 
OflL 

JP Z. 147FOH; r! paranwier O, com- 
pute RNO (o). 

MFOH icompute RNO M. 

I have tried putting a parameter, or 
O, into HL directly, prior to calling 
14C9H. The program does not crash, 
but the output in WRA1 (4121H) is not 
limited to the desired range. Does any- 
one know the answer to my problem? 
Any help will be appreciated. 

Thomas R. Jones 
235 East 73rd Street 
New York. NY 10021 



Network Help 



Is there anyor>e out there who can 
show me how to t}uild a switching net- 
work {or point me in the direction of 
commercially available hardware) to 
interconnect my Model I, Model II, 
Daisy Wheel II and Line Printer V? 

My problem is the risk of damage to 
circuit tx>ard and connector plugs (not 
to mention the time that it takes) from 
continually plugging and unplugging 
printers when I need letter quality or 
high-speed printing as output from an 
application running on one computer 
or the other. 



Peter C. Bennett 

7139 Scott Road 

Homer, NY 13077 



pie to share the cost of the program and 
use or make copies of il jointly. 

As a full-time student with a part-time 
Job, this Is like a dream come true. Not 
everyone has money to shell out like can- 
dy for programs they do not even know if 
they can use or enjoy. If more people 
would follow this fine example, they 
would see increased sales as they would 
be opening their programs to a larger 
market. 

Another point that Mr. Baker tirought up 
is protected disks. Having written soft- 
ware myself, I think that the author has a 
right to be concerned atwut his software. 
However, this should not be at the con- 
sumer's expense. The consumer should 
be able to make as many backups of a pro- 
gram as he or she wishes. It is not fair to 
pay $100 for a program and then have to 
pay S10 plus shipping if the thing crashes. 

David A. Roch 
El Paso. TX 



On The Right Tracic 

I just got my NEWDOS 80 to run on my 
80-track drive and it turned out to be quite 
an undertaking. I had to use the MAKE 60 
on the original NEWDOS 80 disk to make it 
readable to my 80-track drive. Then I re- 
ceived my LN Doubter. I tried to make Dou- 
blezap II work, but had no luck. It appar- 
ently needed more tracks. Then I decided 
to play with It and converted a NEWDOS 
copy to 40-track using the PDRIVE and 
changing the Gat table to eliminate all ref- 
erence to tracks 40 to 79. 1 applied Double- 
zap II and it worked. 

I also put it up with an expanded direc- 
tory. When the run was completed, I had 
to use PDRIVE to get 60 tracks again and 
change the Gal table again. TR 17 SEC 
byte 46 to byte 8DH got zapped to FCH 
and byte CCH to CFH became 8EH 50H 
96H 42H. (See Table 1.) This is now an 
80-track system disk with the free show- 
ing * 80 trks 114FDES 220 grans * on a 
side with sample 01/BAS removed and the 
Doublezap II utilities installed. It was real- 
ly great to figure it all out. 

John H. Fields II 
Venice, FL 



Stock Market Crash 

I recently bought Color Space Traders 
trom Spectral Associates. It Involves buy- 
ing stocks in hypothetical companies and 



trying to increase their market value. After 
playing the game a few times, and losing 
miserably each time. 1 began to wonder if 
all my work as a business undergraduate 
and weekend programmer had been in 
vain. 

Then, much to the delight of my ego. I 
discovered a flaw in the game. When a 
stocks' value exceeds $3000. it splits two 
for one. The price is split in hall, and the 
number of shares held by each player 
should be doubled. A For. . .Next loop is 
set up in line 3190 to do this, but a pro- 
gramming oversight left out the Next so 
that only player number 1 has his or her 
quantity of shares doubled, even though 
its value had been divided by two. Editing 
the program as I've done here makes it run 
correctly. 

3190 FORM = 1TOP1 S(Tl.ll) = 2-S(T1.11):NEXTIl 
GOSUBHOOaRETURN 

Ken Teagan 
Glendale, CA 
Tom Rosenbaum of Spectral Associ- 
ates tells us they've found the error, and 
have corrected it.— Eds. 



Variance 

C. Brian Honess' article "Vital Statis- 
tics" in the August issue contained one 
significant error. The mathematical form 
of the variance is generally taken to tie: 



(n-l) 



This differs from Mr. Honess' equation in 
that the denominator contains an n - 1 
term instead of just n. In calculations in- 
volving a large number of data points 
(large n) the difference is insignificant. 
However, in smaller samplings il can be 
quite large. 

The reason for the N - 1 term instead of 
n is somewhat complex but it stems from 
the fact that each of the data points are 
first used to calculate the mean value of 
the sample (X in the formula) and the data 
points ar>d the average are then used to 
calculate the variance. This two-step 
calculation is said to reduce the degrees 
of freedom of the system from n to n - 1 . 
Refer to any elementary statistics txrak 
for a thorough explanation. 

Albert Stiegman 

Department of Chemistry 

Columbia University 

New York. NY 
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November 

• The University of California, BerKe- 
ley, wilt sponsor a two-day course titled 
"Comparison of Recent Microcom- 
puter Architectures" for design en- 
gineers, programmers and technical 
managers at the San Francisco Airport 
Hilton, Nov. 9-10. Fee is $400. Infor- 
mation and registration is available 
through the office of Continuing Edu- 
cation in Engineering, University of 
California Extension, 2223 Fulton St., 
Berkeley, CA 94720. 

• The New Mexico Computer Society 
will host the third annual New Mexico 
Computer Fair Nov. 14 at the Albuquer- 
que Civic Auditorium. Admission is 
free. Information is available from Ron 
Benninghoff, cto New Mexico Com- 
puter Society, 515 Wyoming NE No. 2, 
Albuquerque. NM 87106 



• Ken Orr and Associates, Inc., 715 E, 
8th St., Topeka, KS 66607, will sponsor 
several courses and conferences in 
November. Subjects are: Nov. 3-6 
Structured Requirements Definition, 
San Antonio, TX; Nov. 3-6, Structured 
Program Design, Boston, MA; Nov. 10, 
Management Overview of Data Struc- 
tured Systems Development, Denver, 
CO; Nov. 11, Management Overview of 
Data Structured Systems Develop- 
ment, Portland, OR; Nov. 13. Manage- 
ment Overview of Data Structured Sys- 
tems Development, Seattle, WA; Nov. 
9-13, Structured Systems Design/ 
Structured Program Design Combined 
Course, St. Louis, MO; Nov. 10-13, 
Structured Requirements Definition, 
Los Angeles, CA; Nov. 16-20, Struc- 
tured Systems Design/Structured Pro- 
gram Design Combined Course, Wash- 
ington, DC. 



Coming 
Next Month 



In December, 80 Microcomputing 
looks at the TRS-80 used in hob- 
bies. Topics will include micro 
games, sports forecasting and col- 
lection filing systems. 
Athletic Technical Editor Michael 
Vose will share his Runner's Log pro- 
gram. Dust off those sneakers and 
find your sweatsuit! 
Review Editor Michael Nadeau has 
compiled a Buyer's Guide to peri- 
pherals and small electronics. 
News Editor John Mello gets the 
scoop on Arcnet, the Model 1 1 network. 
News Editor Bert Latamore has 
tracked down a model railroad club 
that uses a homemade micro. 
Freelancer Robert Lloyd writes about 
the program he wrote to catalog his 
coin collection. 
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CORVUS 

TRS-SO MOD Ul 

Conlroiior. Case/PS.. Operatlnfl System. AST 

5 Megabytes 3245 00 

10 MegabytBs , , 4645 00 

20 Magabyles 5545 00 

MIRROR BACK-UP 725 00 



SPECIALS 

SPECIAL NO. 1 

TflSW DISK AND OTHER MYSTERIES, BOX OF 

VERBATIM DISKS, PLASTIC LIBRARY CASE , ,44.50 

SPECIAL NO. 3 

NEWOOS(80 2-0. BOX OF VERBATIM DISKS.PLASTIC 

LIBRARY CASE , , , 149.00 

SPECIAL NO. 4 

MICROSOFT BASIC COMPILER. BOX OF VERBATIM 

DISKS. PLASTIC LIBRARY CASE 190.00 

SPECIAL NO.S 

MICROSOFT BASIC DECODER AND OTHER 
MYSTERIES. BOX OF VERBATIM DISKS. PLASTIC 
LIBRARY CASE 49 95 

SPECIAL NO. e 

DOUBLE DENSITY SPECIAL NEWDOS/80. BOX OF 
VERBATIM DISKS, PLASTIC LIBRARY CASE , 279 00 

COMMUNICATION SPECIAL MOO I « III 

NOVATION MODEM, OMNITEHM TERMINAL 
SOFTWARE, RS 232 CABLE 

ACOUSTIC SPECIAL 239 00 

OIRECTCONNECTSPECIAL 25900 

DISK LIBRARY SPECIAL 

RACET DISK-CAT CATALOGING PROGRAM, FLIP 
SORT (50 DISK CAPACITY), 50 STICK-ON DISK 
LABELS 59 95 



TWO NEW 'OTHER MYSTERIES' 
BOOKS 



THE CUSTOM TflS 80 . . , 34,95 

MICROSOFT BASIC FASTER AND BETTER , 24 95 



TRS-80 GAMES 



TEMPLE OF APSHAI , . , 34,96 

HELLFIRE WARRIOR 34.96 

STAR WARRIOR 34,96 

RESCUE AT BIGEL 24.95 

CRUSH, CRUMBLE 4 CHOMP 24,95 

INVADERS FROM SPACE 17.95 

P1N8ALL 17.95 

STAR TREK 3.5 17 96 

MISSILE ATTACK 18.95 

STAR FIGHTER 24,96 

Z-CHESSIII 24 95 

ADVENTURE NO 1,2 & 3 34 96 

ADVENTURE NO 4,5 & 6 34.95 

ADVENTURE NO 7,8 & 9 34.95 

DUEL-N-DBOIDS 17,96 

STARFLEET ORION 21,96 

INVASION ORION 21.96 

OLYMPIC DECATHLON 24,96 

ZORK 34,96 

MONTY PLAYS MONOPOLY , 31,95 

SARGONII 31.95 

BLACKJACK MASTER 27.96 

ROBOT ATTACK 17.96 

GALAXY INVASION 17,96 

SUPERNOVA 17,96 

TUESDAY MORNING QOATERBACK 26 95 

LUNAR LANDER 18.95 

THE MEAN CHECKER MACHINE 21-95 

GAMMON CHALLANGEH , . . . 18.95 

SPACE ROCKS 18,96 

PIGSKIN 17,96 

ZOSSED IN SPACE 18,95 

AHCADE-80 2195 

COMBAT 18.95 

SPACE INTRUDERS 1 7.95 

SILVER FLASH 17.95 

MORTONS FORK 26,95 

PROJECT OMEGA 21.95 



TRS-80 MODEL III HARDWARE FROM MTI 



INTERNAL DISK DRIVE KIT 

A new low cost internal disk kit is available to expand your 16K Model III computer to a 
full 48K disk system 40 or 80 Track drives are available, 40 Track drives store 175K and 
80 Track drives store 350K Up to four drives may be added, including two external 
drives. Using four 80 Track drives provides a total disk storage of 1,4 megabytes. 



695.00 



DRIVE NO. 1 - 40 TRACK SYSTEM 

INCLUDES: Controller, power supply, cables, mounting hardware. 32K of RAM 
& installation instructions. 

DRIVE NO. 2 - 40 TRACK SYSTEM 279.00 

80 TRACK INTERNAL DISK SYSTEM 

DRIVE NO 1 789.00 

DRIVE NO 2 399.00 

EXTERNAL EXPANSION DRIVES 

Add up to two external drives to any two drive Model Ml system. 

40 TRACK EXTERNAL DRIVES 

DRIVE NO, 3 379 00 

DRIVE fSIO 4 359,00 

80 TRACK EXTERNAL DRIVES 

DRIVE NO 3 519,00 

DRIVE NO, 4 499.00 

DOS PLUS OPERATING SYSTEM FOR MOD III 

40 Track 99,00 

80 Track 1 19,00 

Expanded DOSPLUS 3,3.8 runs 40 and 80 Track 149,00 

MOD III Cooling System 4900 

Reduce failures due to heat buildup, this kit insures proper air circulation for 
trouble tree performance, 

RS-232 Serial Interface 99.00 

Direct connect Modem 199.00 



We built a reputation on our prices and your satisfaction. 




We guaianlee ewerylhing we sell lor 30 days 11 anything is 
wrong. iust relurn Ihe Hem and we'll make il ngtil And, ol 
course, we M pay (he snipping charges 

We accept Visa and Master CarO on an otdeis COO offleis 
accepted up 10 S300 00 

Please add S2 00 toi slandaid UPS shipping and handling 
on orders under 50 pounds delivered m ihe conimeniai U S 
Call us tor sfiipping charges on iiems Ihat weigh more Ihan 50 
pounds Faieign FPO and APO orders please add 15\ lot 
shipping Calilornia residents add 6% sales lax 

Ihe pdces quoted aie only valid lor stock on hand and all 
prices are subject to change without notice 



(213)7060333 



CP/M IS a registered (radernark o( Otgitai Research, 



31245 LA BAYA DRIVE, WESTLAKE VILLAGE, CALIFORNIA 91362 




Our incredible 
lew prices just 
2%lcwer. 

Havea merry 
computer and a 
happy software. 

Take an additional 2% off our listed prices, until December 24. 



PRINTERS 

ANADEXDP9500 1295.00 

ANADEXDP9501 1295.00 

CENTRONICS 739 . 765.00 

C-ITOH 25 GPS PARALLEL .1*40 00 

C-ITOH 25 CPS SERIAL 1495.00 

C-ITOH 45 CPS PARALLEL 1T70 00 

C-ITOH 40 CPS SERIAL 1670.00 

C.ITOH TRACTOR OPTION 195 00 

EPSON MX-80 JCALL 

EPSON MX-80 F/T . . $CALL 

EPSON MX 100 GRAPHIC SCALL 

EPSON GRAPHICS ROM 90 00 

IDS-445G PAPER TIGER 779.00 

IDS 460G PAPER TIGER .. .,..945.00 



IDS-560G PAPER TIGER 

MALIBU 200 DUAL MODE 
NEC SPINWRITER 3610 SERIAL RO . . . 
NEC SPINWRITER 3530 PARALLEL RO 
NEC SPINWRITER 7710SERIAL RO 
NEC SPINWRITER 7730 PARALLEL RO . 
NEC SPINWRITER 7700 D SELLUM OPTION 
NEC SPINWRITER 3500 SELLUM OPTION 
OKIDATA MICROLINEBO . . 

OKIDATA MICROLINE e2A 

OKIDATA M1CROLINE83A 



16K RAM SPECIAL 



$13.95 



DISKETTES 



ALPHA DISKS^ 21.95 

SINGLE SIDED CERTIFIED DOUBLE DENSITY 
40 TRACKS, WITH HUB RING BOX OF 10 
GUARANTEED ONE FULL YEAR 



VERBATIM 

MD 526-01.10,16 28 50 

MD 550-01, 10,16 ....-.,,- 44.50 

M0577.01 10,16 , 3480 

FD 32 OR 34-9000 36 00 

FD 32 OR 34 8000 45 60 

FD 34-4001 48 60 

DYSAN 

5'.'..SS'DD.BOXOF5 24 50 



DISKETTE STORAGE 



6v. ■ PLASTIC LIBRARY CASE 2 50 

B- PLASTIC LIBRARY CASE 3 50 

PLASTIC STORAGE BINDER WITH INSERTS . .9.95 

PROTECTOR 5V. . 21 95 

PROTECTOR 8 24.95 



CPIW SOFTWARE FOR MOD II 

MICROSOFT 

MICROSOFT BASIC 80 293.00 

MICROSOFT BASIC COMPII.EH 319,00 

MICROSOFT FORTRAN-BO , . , . 399.00 

COBOL BO - 899.00 

MICRO PRO 

WORDSTAR .,,.325.00 
MAILMERGE (REQUIRES WORDSTAR) , 110 00 
SPELLSTAR {REQUIRES WOHDSTARl 199-00 

SUPERSOHT , .- .195,00 
DATASTAR 245,00 

PEACHTREE 



GENERAL LEDGER 
ACCT RECEIVABLE 
ACCT PAYABLE 
PAYROLL 
INVENTORY 



SET OF 8 NEC 4 '16 200 na WITH INSTRUCTIONS 
GUARANTEED ONE FULL YEAR 

MODEL 1, III SOFTWARE 



LAZYWRITERMOOI 119 00 

LAZY WRITER MOD III 169 X 

MICROPROOF SPELLING CHECK 84 95 

PBOSOFTNEWSCRIPTMODI.III 99,00 

PROSOFT MAILING LABELS ■ 29,95 

PROSOFTNEWSCRIPT* LABELS 115,00 

SPECIAL DELIVERY MOD l.lll 119.00 

XTRA SPECIAL DELIVERY MOD I. Ill .. , ,179 00 

TRACKCESS MOD I 24.95 

OMNITERM SMART TERMINAL MOD l.lll 89 95 

MAXI-MANAGEB 89 95 

DOS PLUS 3 3 89.00 

LOOS . , - 136,00 



•Sea List of Advertisers on page A02 



TRS-80 MOD I HARDWARE 

PERCOM DATA SEPARATOR , 27 00 

PERCOMDOUGLER11 159 00 

TANDON 80 TRACK DISK DRIVE 429 00 

TANDON 40 TRACK DISK DRIVE ,. .29900 

LNWDOUBLERWITH DOSPLUS3.3D , .., 15900 
TRS-eo MOO 1 32K EXPANSION INTERFACE , 365 00 



MODEMS 



NOVATION CAT ACOUSTIC 145.00 

NOVATION D-CAT DIRECT CONNECT , , . . 165.00 
NOVATION AUTO CAT AUTO ANSWER , 219,00 
UDS103LPDIRECTCONNECT 175,00 

DC HAYES STACK Smati Moaem (RS-232) . 249.00 
LEXICONLX-n 109,00 



S95.00 

90S.M 

59S.00 

596,00 

506.00 

PROPERTY MGMT ,, 799.00 

CPA CLIENT WRITE-UP ,. ,, T99.00 

MAGICWAND 29900 

OTHER CP/M* SOFTWARE 

SPELLGUARO 239.M 

SUPERCALC 229-00 

COMMX TERMINAL SOFTWARE 7M0 

OBASEH 699.00 

PICKLES AND TROUT CP^M' MOD II TRS-80 175 00 



SUPPLIES 

AVERY TABULABLES 

1,0003V, X 15*16 8.48 

3,000 3 Vi X 15/16 U-98 

5.0003"i X 15)16 ,.. .,.19.95 

FAN FOLD PAPER (Pnc. f.o.b. s.p.i 



9V, X 11 I8it3*ri(ie3000i;t 
14 7/6 Xll IBID wfide 3000 CI 



.29.00 
39 X 
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^ REVIEWS 

edited by Michael E. Nadeau 



"Forgetting correspondence 
out quickly, this mini word processor 

is simplicity itself.** 



speed Letter 

12-Column Ledger 

Three-Across Mailing Labels 

AutoDialer and Toll Charge Monitor 

Blechman Enterprises 

Canuga Park, CA 

$10 each 

$25 for the package 

by Dave Smith 



Anyone who has ever operated a small 
business out of his home under- 
stands the difficulty of maintaining a 
ledger, handling letters, mailing lists, and 
keeping records of telephone usage and 
expenses. In response to these needs, nu- 
merous computer programs have been de- 
signed, which are often too extensive and 
complicated, not to mention costly. Fred 
Blechman, of Blecfiman Enterprises, has 
developed a package of programs for the 
home-based businessman which is char- 
acterized by effectiveness, simplicity 
and low price. 

Designed for the Model I with 16K and 
an 80-column printer, the programs do not 
require disk drives, and are compatible 
with the Model III following a few simple 
line adjustments. The Instructions for the 
Model III program changes are available 
at no charge from the author. 

Speed Letter 

For getting correspondence out quick- 
ly, this mini word processor is simplicity 
itself. Handling upper and lowercase, the 
word processing system Is directed by a 
total of 10 single-letter commands. Speed 
lettercanpacklSOIinesof text into 16K of 
memory. 

The program operates on lines of text 
rather than on Individual words or charac- 
ters, but within this single constraint, 
allows text review, line correction, 
replacement, insertion and deletion. Text 
is saved to, and read from cassette, or Ex- 
atron's Stringy- Floppy wafer. The left 
margin and the page length are defined 
just prior to printing, allowing the user 
great tormatting flexibility. Printed output 
is also line selectable but vertical spacing 




can be achieved only by the inclusion of 
blank lines in the text. 

This program's best feature is that it ap- 
pears to be crashproof, eliminating the 
worry of lost text through entering an er- 
roneous command. This is a real blessing 
to the writer who formerly became so in- 
volved in the content of his text that he 
forgot the complicated command struc- 
ture of his word processor and bombed 
his text. 

12-Co)umn Ledger 

Using column one for the dollar 
amount, and allowing the user to assign 
the remaining 11 column headings, 
12-Column Ledger maintains and prints 
financial records for income tax and other 
purposes. All column headings are on dis- 
play during data entry. The user simply 
types in date, check number, amount, reci- 
pient, purpose and column assignment, 
and the program prints out all column 



^7}Jjt- 



headings with page, month and grand 
totals. Characterized once again by ease 
of operation, this software performs all 
necessary arithmetic and produces a 
clear, easy-to-read printout. 

Three-Across Mailing List 

This program accepts up to 220 names 
and addresses (in 16K), sorts data accord- 
ing to user preference, and prints address- 
es on standard adhesive-backed label 
stock, laid out in three-column format. 
Each label contains four lines of 24 
characters maximum length. While the 
Mailing List program is excellent for the 
small business, it should also be attrac- 
tive to any organization, church, fraternal 
order or social group which issues a 
newsletter or other mailings to Its 
membership. 

Auto- Dialer 

Auto-Dialer uses a $3 telephone inter- 
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WHY 

TALKING 

ROBOT 

ATTACK 



IS THE ALPHA JOYSTICK 
SUCH A SUCCESS ? 



A: Sofware support like this: 




ALL GAMES '■ 



l6KLevel2, Mocj 1 * Mod3Cassetie $i5 95 
32k Level 2. Mod 1 •- Mod 3 Diskette. $19 95 
10% discount (or 2 games, 15% to' 3 or mote 
Games may be played wilh or without joystick. 




SCARFMAN 




SUPER NOVA 

Asleroios Itoai ominously att)una tne 
screen You must aesuoy ine asierwds 
twiwe itiey aesitoy you' [Big asleioids 
Bread mlo lilllfi ones I Vout snip will 
respona lo in'usi lOtate hype'space 
and iiie Watcti out loi trul saucer witn 
tne laser' As reviewed m May 1981 Byte 
Magazine 






GALAXY INVASION 



rr>e SDuna ot ine Hiaxon is catling you' 
Invaders tiave twen spotted waipmg 
toward Eartti you snili ngni arid leH as 
you (ire your lasers A (ew break torm 
atkm and tiy stfaighi at you' Vou place 
your linjei on ttie Ine Dutlon knowing 
ihai this stiol must conneci' Wi;n souno 




TALKING 
ROBOT ATTACK 

INCREDIBLE! This amazing game actually TALKS 
wiihout a speech synthesizer, through Ihe cassette 
AUXpiug 

You are afmed with |usi a hand held laser in a 
remote section ot the space station you encounter 
armed rodois, some march towards you. some wait 
around corners Watch out , the walls are elecinf leO 
Zap as many robots as you dare before escaping 
into a new section where more robots await you 
The struggle continues With Joystick action and 
VOICE OUTPUT, this game will amaze you 

SCARFMAN 

THE LATEST ARCADE CRAZE now runs on your 

TRS-80 

Its eat or be eaten You control Scarfmari around 

tne maze, gobPing up everytliing m your path You 

attempt to eat it all before the monsters devour you. 

Difliculiy increases as game progresses Excellent 

high speed machine language action game. From 

The Cornsoft Group With sound. 

CAUTION: Played with the Alpha Joystick, Scarfman 

may become addictive. 





AHACK FORCe 



As youi snip appears on me Doilom ol 
the maze, eighi alien ships appear on ine 
top. all traveling d"eclly at you' Vou 
move toward mem and lire missiles Hut 
tne more aliens you destroy, (t» taster 
ine remaining ones twcome it you gel 
100 good you must endure ttie Flag 
ship ' WittisounOeilectS' 



COSMIC FIGHTER 



'iiiw Ship co;ties out oi nypeispace 
under a convoy ot aliens. You desl'Oy 
every one. Bui anotttet sel appears 
Inese seem more mieillgent You 
enmmale inem, loo Your luel supply is 
aiminisnmg Vou muSiOestioy Iwo nwre 
sets tietore you can dock THe space 
station IS now on your scanner . Wiin 
sound' 



\^12J 



METEOR MISSION IP 

As you looli sown on yOL.' utcw 
astronauts cry oul lor rescue You musi I 
maneuver mrougti me asteroids & 
meteors iCan you get back lo tde space 
Station?) Fire lasers lo Destroy iKe 
asteroids, but walcli out. there could Oe 
an alien FLAGSHIP lurking Includes | 
sound eKecis! 



THE ALPHA joystick: 
REAL ARCADE ACTION 




■Features the famous ATARI JOYSTICK 
■Works with any Level II or disk system luiodei i 
■Plugs directly into KB or E/i (next lo printer portl 
■Compatible wim any other TRS-80 accessories 
■Saves your Keyboard 

■ Fun to experiment in BASIC Simply use A = INP(O) 
to read Ihe joystick 

■ Fully assembled ready lo plug in and use. 

Price includes Alan Joystick + Alpha Interface + 
instructions + demo program. The Alpha Joystick 
IS backed by an unconditional money back 
guarantee 11 you are noi delighted with it, return it 
within 14 days tor a prompl and courteous relund 




Toll 
Order Line 

(800) 
221-0916 



ADD t l.bQ PER OADEH FOR SHIPPING AND HANDLING 

Au OBOEftS SmIPPF D FIHST CLASS Mill 

Wf flCCfPT iriSA MflSTERCHAHGE CMiCkS MO. 

:UD SOUS? ootnii* 

ausNTiiy oiscuuNrsavAiiAei > ^ 

N * HES1DESTS40D SALES Ifli H 




ALPHA Products 



,^210 



85-71 ?9Jh Street Woodhaven. NY 11421 



(212) 296 5916 
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face relay to dial the number of any 500 
names held in memory, upon keyboard en- 
try of that name. The user enters each 
name and phone number one time. Subse- 
quently, the program lists the names on 
the screen. The program matches the cor- 
rect number to the name entered, and 
dials the number by toggling the cassette 
output from the computer. This signal is 
then processed by the interface relay and 
transmitted to the phone company's 
switching equipment. 

The purchase price of the program in- 
cludes a schematic diagram for assem- 
bling the interface relay and connection to 
the telephone line. The five relay compo- 
nents are listed with their Radio Shack 
part numbers for easy acquisition. As- 
sembly of the interlace relay should be a 
simple matter for most anyone 

This program will be of benefit to any- 
one whose business requires a lot of tele- 
phoning, especially when the user needs 




to know the cost of the calls. Once the 
user has entered the current schedule of 
telephone charges (obtainable from the 
initial pages of the phone book or from the 
phone company's business office), the 
program will time each call and calculate 



its cost. The duration and charges for the 
call are continuously displayed while the 
call is in progress. 

An adjunct to the AutoDialer is the 
Phone Toll Charge program, which is In- 
cluded in the package. Very similar to the 
Auto-Dialer time and charge monitor, this 
program Is intended for use with one-time, 
long distance calls. 

Each of the four programs is available 
separately, but the combined price of one 
package makes it an exceptional buy. The 
accompanying documentation, while not 
super slick in format, is more than ade- 
quate in content, and all programs are 
self-documenting on the screen. All are 
simple to use. 

For the small businessman, the person 
merchandising out of his or her home, 
the club secretary or any person required 
to do a lot of telephoning, this set of pro- 
grams must t>e regarded as packaged 
convenience at a very low price.H 



Crash Course in Microcomputers 

Louis E. Frenzel, Jr. 

Howard W. Sams & Co., Inc. 

Indianapolis, IN 

Softcover, 264 pp. 

J17.50 

by Debra Marshall 

00 Microcomputing staff 

This book is a self-teaching course in 
the basics of microcomputers. It is de- 
signed to provide the newcomer with a 
solid basic knowledge about the con 
struction, internal circuitry, and operation 
of micros so that the reader may proceed 
painlessly to more complicated and less 
generalized material. 

The chapters are fairly short. Each 
chapter covers a very specific part of the 
microprocessor, such as memories, bi- 
nary data, I/O operations, peripheral 
equipment and programming. Each topic 
is covered in a set of short explanatory 
sections, which are further divided into 
single concepts which are eventually as- 
similated into the whole picture of the top- 
ic at hand. Every paragraph is followed by 
a question designed to reinforce the key 
word or concept presented in the para- 
graph, and each chapter ends with a short 
quiz which again covers the concepts and 
vocabulary presented. 

The chapters are built on one another; 
in other words, the concepts in previous 
chapters must first be fully assimilated in 
order to appreciate the information in 
subsequent chapters. I found this pro- 



gressive method to be very effective; while 
new information is constantly presented, 
the old information Is concurrently rein- 
forced. 

Although the questions asked as rein- 
forcement following each chapter section 
often seem painfully obvious, the method 
does seem to work. By simply reading the 
chapter on binary data, I learned more 
about microcomputer number systems 
than I ever hoped to know. In fact, 1 
learned enough to believe Dennis Kitsz 
when he says that machine language is a 
piece of cake. 



"Although the questions 

asked as reinforcement 

. . . often seem 

painfully obvious, 

the method does 

seem to work." 



The book assumes you have literally no 
prior knowledge o( microcomputers. The 
first chapter explains what a microcom- 
puter is. what it does, what it is made of, 
and presents basic terms such as micro- 



processor, data, memory, digital timer, 
and monitor. Explanations are accom- 
panied by nicely executed illustrations 
and photos. 

You do not need an electronics, math or 
technical background to use and appreci- 
ate this book. At the same time, it was 
aimed at an audience which would In- 
clude professionals who wish to learn 
about the microcomputer field, and so the 
tone of the book is businesslike, to the 
point, and highly readable. Its physical 
make-up Is also nicely presented: Type Is 
well set, it Is nicely laid out, and has been 
carefully edited. Figures are simple and 
well-documented. 

In spite of its simplicity, the book 
speaks to readers who intend to pursue 
microcomputers further. The last three 
chapters cover the basics of machine lan- 
guage and Basic programming. Two ap- 
pendices, covering the 8085 instruction 
set and the ASCII code, are also included. 

The book meets its goal: Anyone who 
reads it has to come away with at least a 

working knowledge of the microcomputer, 
and one that will leave the reader weli- 
versed in the lingo of the trade. This book 
would be an Incredible boon to any busi- 
ness office which has just had one of 
those totally mysterious and incompre- 
hensible machines foisted on it, as well as 
to anyone who wants to demystify the ma- 
chine which is steadily making inroads in- 
to the most common areas of society. The 
book is well worth its price, and well worth 
the time it takes to read it.H 
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THE ALPHA 
I/O SYSTEM 

a complete failure? 

THE INSIDE STORY 



■ I happened 3 yu^sago. when ojr presiOsri maae i decision Ai ine time we speciaiizea 
m custoiti analog ana digilal circuit design The decision was lo atlempt lo develop a line ol 
standard interlace harOware lor the emerging microcomputers Ai ilie lime (1977) we had lo 
decide wfiich o( the new machines could Decome llie industry standard ' ot the low cosi 
micros 

Oesoite a lew aggravating but rninoi' deticiencies \t\e TRS-BO seemed lahave the mosi 
chance at success and il had the Desi price /perlormance raiio Also wiIM some imagination 
their large sales organiiahon could Become the largest service network in Ihe world a reassur 
ing Ihrojghl tor the many nov)ces in ihis new tield 

11 became clear mat the TfiS-BO could be jsed iwilh our Ihen hypoiheiicai systemi lo solve 
proOlems in many fields where computers were nol yet used, moslly Pecause ol their high cosi 

The IDEA was simplei ALPHA PRODUCT would supply the missing link Between Ihe TRS 
80 and the ' outside world ' imoreaPoutltiis ' autsideworld' later! 

Early Survival 

□KNBEIII It Radio-Snack entered the same marker we proQably would nol have survived Dul 
me expectation was Ihal Ihey would De too busy developing their basic Ime (drives, pnnlers. 
modem etc 1 Thanks to our more soecialiied products, we would not Be competing with ihem 
IAD STARTI We began with a tailure Our lirst prodL'Ct was supoosed lo be a simple, low cost. 
get^eral purpose device it would allow the TRS-SO lo accepi inpuls other than !t>e keyboard 
Many kinds ot enlernal devices (the "oulside wofid' mentioned before! like photocells 
sensors, thermostats, switches, contacts, etc could be connected easily In addition Ihere 
were Iwo relays to control (on oi ofll eilernat loads such as motors lamps, appliances, 
heaters, etc etc in other words, ii would allow the computer to mteiaci or interface with 
external devices Wb called it the INTERFACES ? What a misiakei ii sounded too much like 
"expansion inlerlace ' Many enthusiastic TRS-80 users caned thinking mat out INTER 
FACER 2" was a tow cost Eipansion inierface lat S8S Ihal woultl have been a real bargain n 
We wanted to Change Ihe confusing name Thai medni reprinting the manual, changing the ad 
scrapping the llyers. discarding the silk screened cases Well ' INTERFACER 2 ' it would 
slay 

TROUBLEt We also lound thai tne majority ol TRS 80 useis were AFRAID ot the hardware Ihey 
could M very comlortaOle with fancy programming bul inoughi you had to De a computer 
specialist or technically inclined to put the INTERFACER ? lo work In truth some IMAGINA- 
TION and a SCREWDRIVER is all you really need Anyone aOle lo wte a switch could use inis 
device 

WOnSEI There was aiso Ihe fear ol plugging a foreign device' mio the precious computer 
This notion has all Put disappeared as there are now so many quality products designed lor the 
TRS-80 thai plugging in a non Hadio-Shack device has Become common 

Our ad <n Creative Compu'ini} (SO-MicrocomiJutinq did nol yei etisll hardly paid for itsetl 




We had a decision to make Were we wrong or jusl too eariy^ Our first iNTEBFACER 2 was sold 
lo someone who wanted 10 and succeeded in conlrolling his lancy model railroad with his 
TRS-80 Interesting, but what made us stick with the concept was ihat some of our INTER 
FACERS Began finding use in applications with iascmaling possiDiiilies Space is lacking to 
describe them bui the most exciting was the successful use of ine system m assisting a handi 
capped young Boy We were pleased lo hear of such a meaningful application 



Today 



Three years later as you can see m our ads The iNTEHFACER 2 is aiive and well Tne 
price went up a bit and despite the introduction ot the more powe'lul INTERFACER 80 Ihe 
sales ngve been steady 

Then came the least underslood producl' the ANALOG 80 This il39 nicely designed 
module IS an Analog to Digilal converlet with 8 mpul channels Used with your TRS-BO it 
provides a powerful data acquisition system' This (argon simply means that you can 
monitor measure and record 8 independanl varying voltages Very tew people realized its real 
power Such a system would have cost over len thousand dollars |ust a lew years ago 

The possiBililies in scientilic and engineering environments are endless Thii system 
coulO replace chart recorders digital data recorders, programmable caiculalors data analyzers 
and many other specialiied and expensive pieces ol equipment Furthermore up lo 8 ANALOG 
80 s could Be used simultaneously lor a total ol 6^ channels r)f analog input' They simply plug 
into the THS-80 using our X series of Bus extenders lEXPANDABUS) 



The Idea was simple. We would supply the 
missing link between the TRS-80 and the 
"outside world" 



Our next product was to be a second generation, input/Outpui interface, with more 
llexiBllity ihan me INTERFACER 2 Careful design and refinement yielded the INTERFACER SO. 
the most powerful real world interface on the market today It has S inpuls, each optically 
isolated and B outputs, each with a relay contact The INTERFACER SO is fully compatible wilh 
our ANALOG SO. allowing these to Be used together in order lo create systems that control 
external devices based on sensed input under control ol the TRS-BO 
A FAILUKEI in spite of our extensive advertising very few are aware ol the existence of ihe 
powenul ALPHA I/O SYSTEM 

The Facts Are: 

[he ALPHA SVSTEM/IRS80 comOinalion loims an inciedtbly versatile and powerful toot lot 

acquisition /ptocessing/conlrol 

-In spile of Its moderate cost the system is sophislicaled and reliable 
■The entire system can Be easily programmed in BASIC using iNPUiand OUT < V commands 

The modular approach and our EXPANDABUS allow fo( instanl expansion as requiiements 

demand 

Ihe following pages contain more infoimalion aPoul the devices meniioneO here Vie invite 
you to call or write lo discuss your particular application 

Device descriptions; NEXT PAGE ^ 



TIMEDATE 80 



^ 




Neat, Compact Design 
3 Years Balteiy Lite 



Slips Inside E/l 
(Y Option Shown) 



Real Time Without 
Expansion Interface 



•Complete, self contained true teal time clock/calendar. TiMEDATE SO continues lo keep 

accuiaie nme and date when the computer is turned oti or experiences a power failure 

•TIMEDATE U only needs to be set once, and it s two replaceable "AAA " Batteries (nol 

included) keep TiMEOATE 80 running in excess of 3 years Cosily Ni-Cad Batlenes and 

cnarging circurls are eliminated 

•The insiant power is applied to the TRS-BO. IIMEDATE BO provides HO/DATE/VH OAV 

ot WEEK, HR MIN SEC and AM/PM intormation wrih quartz accuracy 

•TIMEDATE tO replaces the compuler's internal clock Extremely useful lor automatic 

operation ol remote systems wilh no operator m attendance II the power lails and then is 



WHY LOSE PRECIOUS TIME ? 

restored only TIMEDATE 80 will update the system wilh current TIME and DATE information 
an impossiBility with the compuler's internal clock 

•TIHEDATE 80 is quartz crystal based with INTELLIGENT CALENDAR, including provisions 
lor leap year' TIME disolay may be By 12 hour AM/ PM or by 24 hour military and Eruopean 
tormat 

•TIMEDATE SO plugs directly into the rear of the TRS-ao keyboard and gives Ihe IIMES 
lunclion even without an Expansion Interlace Foi those with a disk system ii plugs into the 
lefl side panel of the Expansion Interlace An optional V ' connector can provide lor lurther 
expansion 

•TIMEDATE SO'i small size keeps the computet table uncluttered II you have an Expansion 
Interlace. TIMEOATE 80 iiierally "DISAPPEARS " By slipping into the empty space in the 
bottom ot the interface 

■ Two sets ot software on cassette come wnn Timedate 80- TiMESET and liMEi 
TIMESET IS a step By step set ot simple msiruclions lor setting TIMEDATE 80 TiMEi 
IS a set Ql poke routines which patch DOS and level It TiMES to read TIMEDATE 80 and is 
easily incorporated into any user software TiMEi wiH always print Ihe lime and data 
when LISTING a program — great for keeping irack of revisions' 

•Other vaiuaBle uses for TiMEDATE 80 are accurate date and time information for Business 
reports like payroll records financial reports etc or lo various I'O devices requiring 2i 
hour clock inpul. such as laboratory mslrumenlalion and lo communicalion syslems 
needing Log In/Log Oui data iBuiletin Boards) 

•TIMEDATE BQ, fully assemBled and tesleo 90 day warranty complete with insliuclions 
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Structured Basic and Beyond 
Wayns Amesbury 
Computer Science Press Inc. 
Softcover, 310 pp. 
$10.95 

by John W. Liskey 

How many times have program writ- 
ers—novice and experienced 
alike— been admonished to design a pro- 
gram before committing a single state- 
ment or instruction to paper? In spite of 
this, how many succumb to that urge to 
reach for the coding form and gleefully 
write code off the top of their heads? And 
how often does this lead to gibberish, 
requiring hours of toil to debug? 

in the early days (a couple of years ago), 
it may have been practical to make a pro- 
gram an individual work of art. Devoted 
hobbyists could afford to spend hours 
getting a tortured jumble of statements to 
execute properly. This is no longer a lux- 
ury business can afford; nor does it make 
any sense with the development of the 
structured approach to program design. 

In Structured Basic and Beyond. Dr. 
Wayne Amesbury presents an approach 
making it possible for students to grasp 
the concept of designing a program be- 
fore going anywhere near a keyboard. Pro- 
fessionals will find this book a new way of 
life if they have never seriously looked into 
structured design before. 

Dr. Amesbury presents pseudo-code as 
the primary designing aid. At no time is 
the discussion bound by any one version 
of Basic. The underlying principle of the 
book is to avoid imposing a particular ver- 
sion on the student- For this reason, there 
is a philosophical basis throughout the 
tx>ok completely independent of any lan- 
guage. From this book, anyone can pro- 
gress to an understanding of Cobol, For- 
tran. PU1 , Pascal or Algol without difficul- 
ty. This book is not written only for the per- 
son who wants to understand the logic 
and process of a program. It causes one 
to understand structured design by simp- 
ly following and trying the beautifully 
clear explanations. If any point is empha- 
sized, it is the desirability of designing 
programs that are portable from one sys- 




tem and language to another. 

While the theme of this book is struc- 
tured design, you should not jump to the 
conclusion It might be vague on the prac- 
tical applications of Basic. Dr. Amesbury 
follows each pseudo-code demonstration 
with examples showing the relationship 
between pseudo-code and Basic state- 
ments. He has also gone to great lengths 
to point out differences between the many 



mini-era. Some programmers will view this 
with sadness, for they have traditionally 
winged it, writing line after program line, 
trying to figure out their program after try- 
ing to run it. The person emerging today in 
professional program design and develop- 
ment is one who never goes near a com- 
puter until his or her program has t>een 
completely designed and walked through; 
one who makes certain anyone else can 



". . . if you want to write 
professional programs, (this boof<) 
will open your eyes to a philosophy, 
of incalculable value." 



versions of Basic, often illustrating how 
the same problem may be solved in differ- 
ent versions. The key element to solving 
these problems is understanding the log 
ic, so when a different version is encoun- 
tered, you can easily make the conversion 
and be on your way. 
Today we are seeing the passing of a 



follow his or her program design; one who 
is sold on the structured design concept. 
If you enjoy debugging a convoluted 
program, this book could ruin your life. 
But if you want to write professional pro- 
grams, it will open your eyes to a philoso- 
phy and approach of incalculable value 
and benefit. ■ 



Introduction to PASCAL 
Including UCSD PASCAL 
Rodney Zaks 
Sybex lr>c. 
Softcover, 422 pp. 

sa.95 

by Dennis Thuriow 

While relaxing at the local inn I 
chanced to hear two fellow stu- 
dents speaking. One explained to the oth- 
er the simplicity of learning programming 
with the help of Pascal. Being quick wit- 
ted, and knowing the pay scale in the com- 
puter field, I decided to find out who this 
Pascal was. 

I bought a copy of Introduction to Pas- 
cal by Rodney Zaks, a "tutoriat and refer- 
ence text," according to the author. By 
confining myself to a comfortable chair 
and following the advice given in "How to 
Read This Book," I was able to complete 
the ifitroductory chapter with ease. The 
exercises seemed simple enough, so I 
continued, with only occasional help from 



a dictionary, through chapter six. 

My understanding of computers, pro- 
gramming, Pascal, and the potential of 
the field were sufficient, at this point, 
for me to keep on reading without any 
problem. 

Further excursions into the book taught 
me about data types, files, arrays, and 
sets. (1 still keep the book close by, as the 
appendices, syntax charls, and examples 
make it an excellent reference manual.) 

Before completing my studies I learned 
of a new, interactive version of my old 
friend, called UCSD Pascal. I could now 
talk directly through a keyt»ard and get 
my answers immediately! The book was 
again helpful, with separate discussions 
in each chapter on implementing the 
material in the UCSD version, and an ap- 
pendix on handling UCSD interactive files. 

Sample answers to the programming 
exercises are given, the publisher is 
dedicated to updating any errors, the 
book iswell indexed, and though the cover 
may only shine like silver, the contents 
glitter like gold. ■ 
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New Uses for the Home Computer 

in the Stock Market 

Thomas V. Lenz 

Spring Creek 

Elko, Nevada 89601 

Softcover, 254 pp. 

$19.95 

by Dave Smith 

Are you looking to improve your score 
in the stock market? Would you like 
to have an edge over the experts on Wall 
Street? Thomas Lenz has provided the 
means for you to do so in this fascinating 
collection of 34 Level I programs for the 
TRS^. 

Possessing a degree in business ad- 
ministration and more than 20 years ex- 
perience as a securities broker, the author 
has developed these programs over the 
course of seven years, borrowing from the 
field of physics the methodology of hybrid 
analysis and applying it to the field of 
stock market timing. 

The Truth Behind Myths 

The book explores the analysis of both 
short (seasonal] and long-term cycles in 
the market, using data which has been 
collected over the course of 96 years and 
which are available to everyone. Using the 
personal computer as a sophisticated 
tool, Lenz demonstrates the truth behind 
numerous market myths and shows you 
how to quantify business cycles that are 
unknown to many expert market analysts. 

The book presents the 34 programs 
with a textual explanation of each. The 
programs are progressive, with each suc- 
ceeding unit built upon previous ones. 
Typical programs run average, percent- 
age series, statistical oscillograph, strong 
cycle test, random trading test, upper 
limit of earnings, statistical resonator (for 
locating cycles), statistical wave filter and 
extensive statistical analysis. The text ac- 
companying each program is clear and 
well presented. Lenz details the creation, 
function and significance of each pro- 
gram as it is presented. A glossary pro- 
vides ctarification of unfamiliar market 
and mathematical terms. 

The programs which are central to the 
purpose of the book let you create, edit 



and duplicate data files. Computer 
sophisticates will deplore the use of the 
lowly cassette tape as the data file stor- 
age medium, but Lenz makes no apologies 
for its use. Since all programs are design- 
ed to operate within 16K of memory (and 
most within 4K), the use of a cassette is 
appropriate. 

From Level I to Level II 

The programs are printed In large, easy- 
to-read type, making them easier to type 
in. Two problems arise, however, concern- 
ing the format of the programs them- 
selves. The first is that they are all written 
in Level I Basic. The best estimate I can 
find says that only between three and five 
percent of the TRS-80s sold operate on 
Level I. That leaves several hundred thou- 
sand potential users of these programs 
who will be required to translate the pro- 
grams into Level II. 

The author in response to this problem 
Included in the book, a Level I to Level II 
translation guide which is where the sec- 



ond problem arises. The guide is seriously 
deficient in dealing with Level II array defi- 
nitions (no mention of the DIM statement 
requirement) and does not comment on 
the translation of logical operators at all. 
Only those benighted individuals who, like 
me, moved to Level II after mastering 
Level I will recall that in Level t """ and 
" + " are the equivalent Level II operators 
And and Or. Level II users who are not pro- 
grammers are likely to be severely disap- 
pointed to find, after translating and en- 
tering some of the more extensive pro- 
grams, that the programs either do not 
work or worse, that they provide erroneous 
analysis. 

Translation problems notwithstanding, 
Lenz has certainly provided In this book all 
the justification needed for purchasing a 
personal computer. Whether you are a 
stock market amateur seeking to broaden 
your knowledge or a daily trader on Wall 
Street, you can only enlarge your under- 
standing of business cycle analysis 
through reading and applying this book. ■ 



Data File Programming in Basic 

LeRoy Finkel and Jerald R. Brown 

John Wiley & Sons 

New York, NY 

Softcover, 338 pp. 

$9.95 

by Hal Knlppenberg 

Have you ever wished someone would 
write a book about Basic offering 
more than a simple introduction to the 
language— a book for those of you 
already writing simple programs that 
would teach you more advanced program- 
ming tricks? 

Two well-known educational consul- 
tants on computers, LeRoy Finkel and 
Jerald R. Brown, have done just that. Their 
new book. Data FHe Programming in 
Basic, is a self-teaching guide for using 
data files with your microcomputer. This 
book explains data files used in TRS-80 
Microsoft and Northstar Basic. And the 
explanations are simple enough to be ap- 
plied to other versions of Basic with little 
effort. 

Although not written for the novice, this 
publication begins with a review of key 
Basic programming statements. Because 
the authors believe programs should be 
readable by computers and people, they 
show several ways to use "prettyprint" to 
improve program clarity. They believe in 
organizing programs from top to bottom 
and using many remark statements to ex- 



plain program logic and make it into 
modules. Their review of Basic state- 
ments is notable because it concentrates 
on string and substring statements. 
Strings are seldom covered thoroughly In 
introductory books on the subject, but are 
essential to the effective use of files. 

After their excellent Basic review. 
Finkel and Brown focus on writing data 
file programs. They show how to build 
data entry and error-checking routines— 
especially helpful information consider- 
ing most program errors occur at data en- 
try time. 



"Sequential files 

are ideal 
for cassettes." 



Once error-free data entry is mastered, 
the authors show how to create and read 
back sequential data files. From this point 
on, you can write programs using more 
data than your computer has memory. 
Your disks or cassettes become a working 
extension of your computer, not just a 
means for storing programs. 

The skills mastered working with se- 
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quentiai files are used to help you build 
utility programs. You learn how to write 
programs for copying files and for adding, 
changing or deleting file data. You even 
learn to combine data from more than one 
file. 

Many of you do not have disks, but are 
able to put data on cassettes. Sequential 
files are Ideal for cassettes, and chapter 
six is devoted entirely to cassette data 
files. 

The book completes your data file edu- 



cation with a thorough discussion of ran- 
dom access files. You learn how to create, 
verify, copy and change random access 
disk data files. You also learn to write pro- 
grams that will convert sequential tiles to 
random access files. 

The final chapter, "Random Access File 
Applications, " shows several ways to use 
your new-found sKills. One very useful 
technique utilizes sequential pointer data 
files to index large random access files. 
By the time you master this technique, 



you will be writing quite sophisticated 
data file programs. 

This is the first book I have read that 
shows how to write effective data file pro- 
grams. After studying this publication, 
you should be able to write these pro- 
grams with ease, modify any commercial 
programs, and adapt data file programs 
found in computing magazines. In short, I 
think Data File Programming in Basic is 
an excellent book and well worth your 
study. ■ 



The Smalt Computer In Small Business 

A Guide to Selection end Use 

Brian R. Smith 

Hardcover, 144 pp. 

The Stephen Green Press 

Brattleboro, VT 

$12.50 

by Bert Lata more 

80 Microcomputing staff 

Author Brian Smith promises that his 
book, "requires no prior understand- 
ing of computers or computer terminolo- 
gy. It Is written for those who want to 
know how a small computer can help 
them run a business successfully." 

Smith fulfills this promise and has writ- 
ten a book belongs on every small 
businessperson's reading list. 

Smith focuses completely on the issue 
at hand. Except for one excursion into a 
brief explanation of computer electronics, 
he avoids talking about technical subjects 
that are not directly involved In the use of 
computers in small businesses. When he 
does use a technical term it is one that 
cannot be avoided and he carefully ex- 
plains its meaning and significance to 
business. 

He educates the reader to all those 
computer issues and terms needed so 
that the business person can talk with 
computer store personnel on an equal 
footing. Smith also provides a glossary of 
technical terms in the back of the book for 
handy reference. 

All of this is relayed in a solid journal- 
istic writing style which is unfortunately 
rare in computer literature. As a result, the 
book is extremely easy to read. 

Deffniilons 

Smith starts his book logically with a 
discussion of what a computer is and 
what it is not. He points out at the start 
thai the computer "is nothing more than a 
very fast, very dumb, adding machine." 



He also points out that the computer 
almost never makes a mistake, that the 
mistakes are almost always made by the 
programmers and operators. This point il- 
lustrates one of the basic Issues he takes 
up later in the book; the businessperson 
has to know exactly what he wants to ac- 
complish with a computer- 
Smith spends his second chapter giv- 
ing the reader a look at how the computer 
works. He explains base 2 math and why it 
is used in computers, and he discusses 
OR, AND, NOR and NAND gates, half add 
ers and the like. 

This is the one place where Smith really 
does get more technical than he probably 
needs to be. The more technical aspects 
of this chapter, particularly the wiring dis- 
cussion, would probably have been better 
placed in an appendix or left out alto- 
gether. However, since he never refers to 
the circuitry again in his book, the reader 
does not really have to understand this bit 
of wiring technology he discusses. 

Do not skip the whole chapter, however. 
He does explain what a central process- 
ing unit is, how the size of its main memo- 
ry is measured and what that means to the 
business user. He discusses input and 
output devices, floppy and hard disks, 
tape storage and the usefulness of each. 
Once through these basics, Smith de- 
fines data processing and discusses how 
this is accomplished with the computer. 
He works with the simple example of a 
payroll clerk equipped with a calculator 
and typewriter and discusses exactly 
what data the clerk will need and how to 
calculate it to determine employees' pay. 
Smith then diagrams the steps in a simple 
flowchart. He gives a chart showing ex- 
actly how the computer would handle the 
same task from the reading of time-card 
data to the printing out of the checks. 

Machine Capacity 

Smith then introduces one of the Im- 
portant themes in his book: machine ca- 



pacity, which he returns to several times 
throughout- He states that one of the 
most common errors is to underestimate 
a small business' computer needs. He 
strongly advises the businessperson first 
study the business carefully to determine 
exactly how much data the machine 
needs to handle. Then Smith advises him 
to buy a machine that has at least twice 
that capacity or one which can be easily 
expanded to allow for growth of the 
business. 

He points out that a computer will 
represent a large up-front expense for a 
small business and it will only pay for 
itself overtime. If the business outgrows a 
machine in a year, that machine has not 
paid its way. 

Software 

In chapter 3 Smith starts with the 
basics— what software is and why it is 
needed. Smith again avoids confusing the 
beginner by presuming the reader has no 
knowledge of a microcomputer and its 
operation. 

Smith goes on to discuss operating sys- 
tems, particularly CP/M, compilers and in- 
terpreters. He also briefly discusses For- 
tran, Basic, Cobol, Pascal, PL/1 and C. 
These discussions are extremely brief — 
he devotes one paragraph to each of the 
last three. He makes no attempt at teach- 
ing the reader to program. He points out 
that there are many good books on the 
subject already available. Beyond that, he 
recommends that the businessperson 
avoid learning to program, and he warns 
that a businessperson who spends his 
days figuring more elegant ways to have 
his machine perform mathematical calcu- 
lations Is not spending his time on the 
computers doing what he should be do- 
ing—running his business. The computer 
can become an expensive and very 
distracting toy. 

Chapter 4, "The Coming of the Com- 
puter in Small Business," is a summary. 
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and represents a study done by Bob 
Vitelli, a former student of Smitfi's at 
Franklin Pierce College in Rindge. NH. 
The cfiapter presents tfie rational for the 
book wfiich, Smith says, was inspired by 
Vitaiii's survey of the attitudes of small 
business owners towards computers. 

"The entire Vitelli study pointed out the 
need for knowledge and information. In 
many cases, either the Information that 
business owners had about computers 
was insufficient, was misleading, or both. 
This book was written to dispel some of 
the myths that the study found business 
owners have about computers, and to pro- 
vide some basic knowledge so that intelli- 
gent questions could be posed by busi- 
ness owners before a decision on a com- 
puter is made," Smith wrote. 

In chapter 5, "Applications," Smith dis- 
cusses which application programs are 
available and what to do if you need one 
that is not. 

Smith starts by pointing out that while 
too often the businessman interested in 
computerization buys a computer, then 
buys software, and finally tries "to shoe- 
horn both the hardware and the software 
to fit the business," the sequence of 
events should be just the opposite. 

Smith says the first step should be to 
"define what it is within the business that 
needs automating." Then find software 
that will handle the jobs you have and 
finally find a machine that the software 
will run on. 

Therefore, Smith starts the chapter on 
software with a discussion of those areas 
of business that are susceptible to com- 
puterization. He concentrates on the 
basic financial areas of receipts and dis- 
bursements, accounts receivable and bill- 
ing, accounts payable, inventory control, 
budgeting, customer mailing lists and 
payroll. 

Smith goes on to explain exactly how to 
discover how large a file each will need, 
using the simple example of an employee 
file for a firm with 15 employees. This is 
very important since the software and 
machine the company buys must be able 
to handle various size files. 

He then defines the four sources of 
software: turnkey systems, packaged pro- 
grams, learning-by-doing with kits, and 
custom written material. He explains the 
importance of error messages, warranties 
and program maintenance contracts. 

Having examined the relative merits of 
all these approaches, Smith proceeds to a 
detailed analysis of the basic business 
functions. He explains the correct proce- 
dures involved for each using flowcharts 
and sample ledger pages, and examines 
the ways that the computer approaches 



each job. He explains what the effect of 
computerization will have on the account- 
ant's work load and gives some idea of 
what amounts of money the average busi- 
ness can expect to save on each task 
because of computerization. 

Chapter 6, "Justifying a Computer for 
Your Business," was my one major disap- 
pointment in an otherwise excellent book. 
I had hoped for a cogent discussion of the 
various financial issues involved in deter- 
mining the cost effectiveness of a small 
business computer. 

While each business is different, and no 
hard rules can be made to cover all of 
them, I am sure there are good methods 
for analyzing just how much a computer 
will save in terms of time and money in 
various applications of business. And I 
am sure there are good rules of thumb 
concerning how large a small business 
should be before it considers computeriz- 
ing. Of course these are usually esti- 
mates, but they are important guides in 
making the decision on whether to com- 
puterize. 

Instead of discussing these In a mean- 
ingful way, Smith took the attitude at the 
beginning of the chapter that he had never 
seen a feasibility study that was not 
biased in favor of buying a computer. 
Therefore, he said, in essence, that the 
businessman will base his decision to 
computerize on his feelings even if he has 
hard data to go by, and any study will 
automatically be designed to do nothing 
more than justify those feelings. 

My contention with this chapter is that, 
if t were a business person I would want to 
know exactly what I could expect In costs 
versus savings before I put a penny down. 



Summary 

I strongly recommend this book to busi- 
nesspersons, computer technicians and 
students, tf you do not have a computer 
you stand to learn a great deal about how 
they may help you if you are in business. 
Those with machines may well learn how 
to better utilize them. Computer techni 
clans in general, and especially computer 
salespeople and programmers working 
for the business market, can also learn 
from this book because it explains basic 
business issues using the computer as 
an aid. 

Finally, it can be a good book for the 
person interested in a home computer but 
not necessarily interested In computers 
as a hobby. Although the book discusses 
business issues, much of its material is 
directly applicable to the home on a 
smaller scale.B 
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Quality Percom products are available 
from the following authorized Percom 
retailers If a retailer is not listed for your 
area, call Percom toll free at 1-800-527- 
1222 for the address of a nearby retailer, 
or to order directly from Percom, 
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Disk Storage: It*s No Place to Compromise. 



A dependable disk system 
means everything to the high- 
performance operation of your 
computer. At Percom, we know 
this. And we do something 
about it. 

For example, the connectors 
on our TFD drive systems are 
gold plated. 

Why? Because solder-plated 
contacts oxidize, forming an in- 
sidious insulation that can 
cause erratic operation. And 
then total failure. 

Gold-plated connectors are 
just one way we make better 
drive systems than the competi- 
tion. 

Now #1 for the Model III 

Quality Percom TFD drives provide more 
features, cost less. Add-on drives start at 
only $439.00. Complete First-Drive Sys- 
tems start at only $749.95. Features: 
"Flippy" Capability — Record your 



To order prcxlucts, or for the name of your 
aulfiorized Percom retailer, call toll free: 



1-800-527-1222 




PERCOM DATA COMPANY. INC. 

n;'2G PAGEMILL no nALLAS, TX 75^i:i 
{?14I 34G-/Qai 

'liddtindik of Petcom Dara Ciimpany Inc 

■(rademaili ol Tandy Radio Shack Corporation which hfl5 np i 



programs and data on either side of a dis- 
kette. Greater Storage Capacity — 

Store 180 Kbytes — formatted — on one 
side of a 40-track TFD drive. Store over 
twice as much on a TFD 80-track drive. 
Think Megabytes — Your TFD drive 
controller will handle up to four drives. 
You can access almost 1.5 million bytes 
of on-line program and data files. Either 
Add-in or Add-On — Your TFD First 
Drive System can be either internal 
(add-in) or external (add-on). In either 
case, you get a complete system in- 
cluding the disk controller, drive, power 
supplies and disk-operating software. 
BASIC-Language DOS — Included on 
diskette with each First Drive System is 
Percoms OS-SO/III'". This easy-to-use 
disk-operating system loads into / Kbytes 
of RAM and then frees the drive for other 
use. With OS-SO'" programs, you can 
have full, read-write interchangeability 
between Model I and Model III diskettes. 
Or Model III TRSDOS* — TFD 40 
track drives work with Tandy's Model 111 
TRSDOS, without modification. For 80- 
track operation. TRSDOS can be easily 
modified with diskette patches supplied. 

Still #1 for the Model I 

Besides greater storage capacities, more 
quality control measures and lower pri- 
ces, all Percom Model I drives are rated 
for double-density operation. 

Pluga DOUBLER'" in your Expansion 
Interface and enjoy the same double- 
density disk storge capacity as Model III 
owners. Included with each DOUBLER is 
a TRSDOS compatible double-density 
disk-operating system. D0UBLE2AP 
programs are available for upgrading oth- 
er popular DOSs for DOUBLER opera- 



tion. And our double-density version of 
OS-80"* costs just $49 95. 

Of course you don't have to upgrade 
your Model I for double-density opera- 
tion to use Percom disk drives. But it's 
nice to know you can. 

Percom TFD drives for the TRS-80* 
Model I are available in 40-. 77- and 80- 
track versions, in 1-. 2- and 3-drive con- 
figurations. Prices start at $399.00. 

System requirements: Model 111 TFD dnves work 
with a ISKbyle system (mini and Model 111 BASIC 
The initial drive must be a first-drive system An op 
tional interconnecting cable is available for expand- 
ing with external drives #3 and #4. Model I TFD 
drives work with a 16-KbyIe system (min) equipped 
with an Expansion Interface, Level II BASIC and 
DOS software, and an interconnecting cable. Two- 
and four-dnve interconnecting cables are available 
from Percom 
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Morse Coda, Baudot and ASCII Radio 
Telatfpa Programming tor the TRS-80 
Modal / and Modal III Microeomputars 
Richcraft Engineering Ltd. 
Chautauqua, NY 
Softcover, 276 pp. 
$18 

by Dr. William M. Laird 

Here is a book that will turn the hair 
white of firms selling Morse code 
and radio teletype Assembly programs for 
the past few years for $149 and up. 

As only a modestly experienced Assem- 
bly programmer, I found the expanded 
commentary in each chapter, plus the ob- 
ject code and source code printouts with 
comments for each program extremely 
helpful in understanding the programs' 
logic and flow. These programs are defi- 
nitely not for the beginning Assembly pro- 
grammer, who must learn the difference 
between a JR and JP Instruction, but they 
are easy to follow if you have read this 
publisher's self-programmed learning 
series of books. (Disassembled Handbook 
for TRS-80, Volumes I, II and III. This book 
is actually Volume IV of the series.) 

The authors have simplified following 
the program flow by using a minimum of 
Jumps. The logic is straightforward for 
each program. The programs have been 
designed so that once loaded from cas- 
sette or disk, the average radio amateur 
can master their operation with minimal 
practice. 
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Chapters l-IV tell you how to generate 
perfectly timed Morse-code, something 
seldom heard on amateur bands. For 
transmission speed, one inputs the words 
per minute desired. For reception speed, 
the operator is asked to input two num- 
bers corresponding to dot length and typi- 
cal space length. This may sound difficult, 
but it is quite easy to master. The two in- 
puts allow the reception program to ac- 
commodate swing fisters— amateurs 
sending less than perfectly timed Morse. 

After about 30 minutes practice, I could 
not find a station whose Morse the pro- 
gtam coulti not copy. The merged pro- 
grams use the cassette-in line to copy 



2,000-cycle audio from the station re- 
ceiver, the cassette-out line to drive a 
2N2222 transistor. That device keys the 
station's transmitter key jack with TIL 
logic, and the cassette motor control relay 
(through a buffer relay) to control the sta- 
tions transmitter/receiver and antenna re- 
lay, when switching from transmit to re- 
ceive with the Clear key. 

Chapters V-VII are worth five limes the 
price of the entire t>ook. Having tieen a 
radio teletype buff for many years, I've fin- 
ally found a home. Gone are the whirring 
and clanking machines of past times. All 
the operator does is tell the program the 
equivalent Baudot speed desired and 
nearly everything else is automatic. The 
clear key is the T/R switch. 

The book includes 22 prepared mes- 
sages may be called from the menu by 
pressing shift and the up arrow in the 
transmit mode. If you do not wish to look 
at the menu, then just press the up arrow 
and the letter for the message desired, 
transmit mode. If you do not wish to look 
at the Menu, then just press the up arrow 
and the letter for the message desired. 

Chapters Vlll-X are similarto programs 
found in Chapters V-VIl, except for 
110-Baud, eight-bit ASCII code Instead of 
five-bit Baudot code. If you study and enter 
the programs In Chapters l-X, you should 
have earned your master's degree in code 
conversion, as you will have mastered a 
number of difficult subjects. 



Further Notes 

None of the programs in this volume re- 
quire the RS-232C interface unit for the 
Model 1 or the Model 111, since they gener- 
ate their own serial to parallel and parallel 
to serial conversion. 

For the programs in chapters V-X, a 
digital port interface (such as the Design 
Solution AN-51 1, Telesis VAR/80 or Alpha 
Product Interfacer 2), is required. All work 
with or without the expansion Interface on 
the Model I, and with the adaptor on the 
Model 111. 

Nearly all available memory is grabt>ed 
by EDTASM. This program details an inter- 
esting approach to writing a mini-program 
in low memory, so your printer prints out 
64 characters or spaces per line. 

The book covers using an adaptor, al- 
lowing the use of almost any Model I ancil- 
lary port operated device (40-pin connec- 
tor) with the Model lil (50-pin connector). 
Only one active TTL chip is necessary to 
switch the I/O bus from output to Input, 
plus the 40- and 50-pin connectors. 

Ever wish you could start printing an 
editor/assembler program being assem- 
bled at any line without starling at the 



'None of the programs 

require the RS-232C 

interface." 



beginning? A simple 39-cent modification 
described in the book may be installed in 
atwut 10 minutes and does the job very ef- 
ficiently. 

A demonstration program allows you to 
generate the 2125^ycle radio teletype 
mark tones and 2295-cycle space tones 
with software rather than a terminal unit. 
It uses only a single chip transducer from 
Alpha Product Company. The program 
outputs the radio teletype test signal 
RYRYRYRY from the transducer at an 
equivalent speed of 60 words per minute. 

A fascinating, yet short, program prints 
out the speed in equivalent words per min- 
ute of any Baudot radio teletype signal te- 
ing received— 60, 66, 75 or 100 speed, it 
also teats for 1 10 or 300 Baud ASCII RTTY. 



Summary 

This is a teaching text and a book full of 
functional, working programs for the radio 
amateur and computer buff who would 
like to use his TRS-80 to communicate 
with the fascinating world of ham radio. 
All programs are divided into individual 
transmit, receive and combined chapters 
to allow the reader the opportunity to as- 
similate the concepts being presented in 
reasonably sized bites, rather than chok- 
ing to death with too big a mouthful. The 
prt)grams may be used as is by inserting 
only your call letters, name and address in 
the appropriate prepared message loca- 
tions with the Radio Shack Edi- 
tor/Assembler. 

All three transmit/receive programs are 
available on two 35-track disks, though 
this tiook is also required for operating in- 
structions. On special order, Richcraft will 
insert your call letters, name and address 
in the proper locations of all three trans- 
mission and reception programs for 
Morse, Baudot and ASCII RTTY. 

The appendices are extremely useful 
and could have been the subject of 
another volume. 

Volume IV deserves an excellent rating 
and should be invaluable to any mlcro- 
computerist who wishes to understand 
the concepts of code conversion and use 
the TRS-60 in telecommunications. ■ 
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The 12 Scot! Adams" Adventures are presented m our Limited Gold Edition. Each tape and disk Is in- 
dividually numbered, and guaranteed untii July lOth. 2001 Each package contains a certificate of 
authenticity, a registration card and an autographed, (rather Interesting) photo of the author. 
The 12 Adventures normally retail (or S239.40 individually on tape and $159.80 for 4 triple-pack disks 

The Limited Gold Edition is yours . . forever 
. . lor S100.00 tape or rtisk. value for value- 
To Order: The Limited Gold Edition is available 
in very limited quantity, from interested Soft- 
, ware Retailers. Ask your local dealer If he does 
■ ' "'1J9 Limited Gold Edition . . . Then call 
il-800-421-5770. In California 
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Th« Creator 

Complete Business Systems, Inc. 

Chlcego, IL 

S295 

by Mary S. QaslorowskI 

Have you ever invested time and ener- 
gy In a data management program 
only to find It did not fit your needs? 

Now's your chance, without Knowing a 
bit of Basic, to create your own personai- 
ized data management program. Cailed 
"the programmer on a disk, for non-pro- 
grammers and smali systems house use," 
the Creator is a disk-based TR5-80 pro- 
gram which writes Basic programs to col* 
lect and manage data. Further, the creat- 
ed programs are modular, well-document- 
ed, compact, welt-designed and easily 
modified by the user without knowing the 
techniques of developing such programs. 

Is the Creator really for non-program- 
mers? Well, yes, though for the documen- 
tation you may need an Interpreter. Here 
is another example of a good program 
made difficult by weak documentation. 
The documentation seems to sttll be in a 
rough-draft stage. Page 50, for example, 
talks attout showing the relationship of re- 
cord size to the number of records on a 
disk in a table "on the next page"— the 
table is actually on page 14. 

Also, after exclaiming several times 
that the Creator is not technical, the docu- 
mentation goes into several somewhat 
technical and vague discussions on what 
packed numbers, records and fields are; 
how many records will fit on a system disk 
versus a formatted disk; how to calculate 
(approximately) how many records you 
can fit on a disk and still allow for expan- 
sion; and how to shorten or compress 
your program. 

Data Setup 

The programs created by the Creator 
are ideal for handling a mailing list or an 
inventory of items— any list of informa- 
tion with any combination of numbers and 
letters. 

A handy form is included In the docu- 
mentation to help you determine the 
length of each piece of information (field) 
In the data item (record). For example, in a 
mailing list, one complete address is a 
record, made up of various parts, or fields, 
such as a zip code. You might allow the 
last name field a length of 15, the address 
field 20, the state field only 2, etc. Also us- 
ing the form, you decide the order in which 
you want the data to be entered— such as 
lest name first or first name first. 

Another major planning step is to deter- 
mine what checks (the Creator calls them 



edits) you want included in the program to 
make sure the data typed in is the proper 
information. To go back to our mailing list 
example, it is wise to make sure the zip 
code is not omitted, or that it has exactly 
five numbers and no letters. Some of the 
other things that can be checked for are 
numbers or letters within a certain range, 
all numbers or all letters, and Inclusion In 
the data of a certain combination of num- 
bers or letters or tx>th. 




You must also indicate the key field, the 
section (field) of data which determines 
where in the entire list of data each record 
should be. In our mailing list, the key field 
would probably be the last name, so that 
the mailing list can be sorted by alphabeti- 
cal order. 

Running the Creator 

Believe it or not, running the Creator is 
as simple as typing Run Creator and an- 
swering some questions about your data. 

Type in a file name for your created pro- 
gram—this Is the name you will call up to 
run your program— and a title to appear 
on the screen. 

Then you will be asked for an exit code. 
When your program Is running and the us- 
er is typing In information, typing the exit 
code lets the program know to stop what 
it's doing and return to the menu. A com- 
mon exit code is the word End. 

The next step Is to describe the data 
fields. First the length of each field is en- 
tered. The Creator keeps track of how 
much room is left- if you make a mistake, 
you can reenter the length. Next, indicate 
which is to be the key field. The Creator 
will then display Information on the types 
of data and checks you can use. 

The Creator will review your outline of 
data fields, reminding you of the length, 
and ask you for a prompting message for 
the user, the kind of data, and the checks 
you want to use on that data. 

In a mailing list, a prompting message 
for the last name of the addressee might 
be: "Type in the addressee's last name." 



The kind of data can be any character 
numeric, numeric and integer(whole num- 
bers between -32767 and -f 32767), 
numeric to six significant digits, or numer- 
ic to 16 digits. 

Finally, enter the checks you want on 
the data and any messages you want to 
appear on the screen if the checks fall. For 
example (our mailing list), If you are look- 
ing for a last name, you want to check for 
No Entry (hitting the enter key without typ- 
ing in anything), Not Alpha (any numbers 
Instead of letters), and perhaps Length 
>15 (to restrict last names to 15 charac- 
ters). Each check produces its own error 
message; for example, If a last name has 
16 characters (flagging the check Length> 
15), you might have the message, "Please 
shorten the name to 15 characters." 

The Creator will proceed through all of 
your data fields, and then suggest a way 
to end your data collection program. 

In this way, you can set up what Kind of 
data you want and what the computer 
should do if the data is Incorrect, without 
knowing any Basic programming. Once 
you have run the Creator to create a pro- 
gram, you need only load and run your 
new program. 

The created program Is well-designed, 
easy to modify, well-documented by re- 
mark statements, modular and efficient; it 
is easy to use t>ecause it is menu driven 
and incorporates error trapping. You can 
update or amend your data files by choos- 
ing that option in the menu. You can 
change one data field without having to 
delete the entire record. 

The Creator Is an easy and inexpensive 
alternative to hiring a consultant to devel- 
op data management programs. It Is 
worth the effort to work through the docu- 
mentation to create a personalized and 
useful program. 

The Reporter 

With the Creator came the Reporter, a 
program which generates programs to 
write reports. You can set the title, column 
headings, tabs, column and field relation- 
ships (such as column(5) = column(2)-*- 
column(4)/2), subtotals, totals, pagination 
and whether you want the report sent to 
the screen or the printer. The Reporter is 
very flexible in its handling of data; for ex- 
ample, if you want to exclude data below a 
certain range, you can say, "If Cotumn{3)< 
10 Then Skip." Just as in the Creator, use 
of the Reporter requires no knowledge of 
Basic programming to develop a useful, 
personalized program. 

As In the Creator, you must give a file 
name for your report program, as well as a 
title to appear on the screen. You must 
also determine whether you want the re- 
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port on the screen or the printer. Unfortu- 
nately, the Reporter is not capable of 
showing the report on the screen, verify- 
ing It with the user and then sending it to 
the printer. (This is one change I suggest 
the author make for his next version of the 
Reporter.) 

Then type In the name of the data file 
you want used for the report (don't forget 
the extension /DAT If the file was created 
by your data program created by the Cre- 
ator). Specify the record length of your da- 
ta—refer to the data form you used for the 
Creator— then describe the various field 
lengths. 

You can then set the column headings 
for your report. Note that the number of 
columns may be different than the num- 
ber of fields of data, since a column may 
be defined as a combination of fields or as 
just part of a field. For example, two data 
fields may be ttie number of items in stock 
and price per item. Two columns may ex- 
actly reflect that data, and a third column 
may be the product of those— the value of 
the inventory. 

You need to plan ahead for the tab set- 
tings for the columns. Use a piece of 
graph paper to determine how much 
space to set aside for each column. And 
don't forget to set aside space for left and 
right margins. 

The Reporter will number your pages, if 
you want, as well as putting the title and 
column headings on each page. The docu- 
mentation claims you can have up to 
999,999 pages, if you live that long and are 
that patient, though I only tried five pages. 

Type in the type of data in each of the 
data fields, then describe how the col- 
umns are related to these fields. This is 
similar to setting up the checks or edits in 
the Creator. You can set a column to be 
exactly equal to a specific field, or any al- 
gebraic or trigonometric combination of 
any numeric fields or columns. Character 
(alphabetic) fields can also be manipu- 
lated; fields can be reordered, combined 
or split up to define columns. For exam- 
ple. In a report based on our mailing list, 
where the last name is in data fleld(1), first 
name in fleld(2), and middle initial in 
field(3), you can define column(1) as fol- 
lows: column(l) = field(2) -t- field(3) -\- field 
(1). This would print out the name In cor- 
rect order in column one in the report. A 
column can also be defined as part (left, 
middle or right part) of a character field. 
For example, if fleld(5) contains area 
codes and telephone numbers (and is de- 
fined as character not numeric), a column 
for the area code can be set up: column(3) 
= left$(f ield(5)). 

The variable V and combinations of it 



are reserved for saving subtotals and to- 
tals. If you want the total of fleld(6) for ail 
the data, you might define V2 = V2 -k field 
(6). You will be allowed to print any totals 
at the end of the report. 

The Reporter is not as well developed 
as the Creator. The screen/printer routine 
should be improved to offer both, and the 
tab setting could be done automatically 
by the program after you specify the col- 
umn headings. The Reporter is not as 
easy to use as the Creator, and it does use 
many more Basic terms and commands. 



and so, requires more from the user. 

The Creator is worth the effort (don't get 
bogged down in the documentation— just 
run the program). The Reporter Is unnec- 
essarily difficult and lacking in several 
useful features. By the time you figure out 
the Creator, you may be able to tackle the 
Reporter. The idea behind these programs 
Is good. Each Is not just a single program, 
but a creator of programs. Perhaps by the 
time you read this, the author will have re- 
vised these programs to make them easier 
to use.H 



Computer Acquire 
Microcomputer Games, Inc. 
Avalon Hill Game Co. 
Baltimore, MD 
$20 

by Mary GasiorowskI 

Have you ever Imagined yourself a fi- 
nancial wizard, the head of a vast 
hotel chain involved in power struggles 
and stock mergers? Do you like exciting, 
fast-paced games? Then keep looking — 
this is not the game tor you. 

Computer Acquire is the microcom- 
puter version of the board-game Acquire. 
There are three versions on the cassette 
tape: TRS-80 Model I (Level II), Apple II, 
and Commodore Pel 2001— all require 
16KRAM. 

Computer Acquire is a game of high fi- 
nance—a game of strategy and luck, in 
which from zero to six players can partici- 




scfftware 



pate (including playing the computer and 
watching the computer play itself). The 
object is to build and expand hotel chains. 
At the same time, you can buy stock in any 
chain to try to get a majority. Merging two 



'Computer Acquire 

is a game 
of high finance." 



chains will give someone a profit, with a 
bonus going to the majority stockholder. 

The game ends when all the chains are 
merged together or are too large to merge. 
The hotels and stocks are then cashed 
in, and the person with the most money is 
(he winner. 

Does it sound complicated? It is. The in- 
structions suggest that the game will take 
two hours to play. It does. 

I played Computer Acquire on the 
TRS-80 Model 111 (it is compatible) and the 
Apple. It seemed fairly well debugged If 
you answer a question with an absurd 
number or letter, you are asked to try 
again. 

Why was this board game put on a mi- 
crocomputer? Oh, the game is okay, but 
little attempt was made to take advantage 
of the various features of the microcom- 
puter. 

You can play the computer, or. If you are 
a fanatical game watcher (rather than a 
game player), you can watch the computer 
play itself. 

There are no graphics, no color, no 
sound. The screen Is harder to read than 
the playing board Included in the original 
(non-computer) version; it is difficult to 
distinguish the numbers of the squares 
from the letters standing for hotel chains 
since there Is no spacing between 
squares. If you really want to play this 
game, I suggest you buy the board version 
($6 for the board, $5 for a set of marker 
tiles). 

I hope Avalon Hill finds a new program- 
mer before they convert any more of their 
games for (he microcomputer.H 
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ACCEL2: Compltor tor 
TRS^ Disk Basic 
Allan Qelder Software 
San Francisco, CA 
$89 

by Bruce Powal Douglass 

Machine code instructions can tw 
executed directly by the 2-80. Run- 
time lor programs written in machine 
code tend to be very fast. High-level lan- 
guages, such as Basic, make the machine 
more accessible to the user by being eas- 
ier to remember. 

These languages must also be trans- 
lated into the machine code for execution. 
There are two ways to go about this: inter- 
pretation and compilation. 

An interpreter fetches the Basic in- 
structions that tell it what to do, and 
changes them to machine code. This must 
be done every time a statement is execut- 
ed. And, although it can take a lot of time, 
there are benefits. Basic programs can be 
easily edited, changed, and rerun with a 
minimum of user effort. 

A compiler, on the other hand, only 
translates the program once, so the CPU 
can execute the program directly. The run- 
time is shortened since statements are 
pre-digested into byte-sized bits. But if the 
program bombs It's harder to debug. For 
many time-critical applications, however, 
a compiler is the best choice, even though 
they usually require large amounts of 
memory and cost a lot of money. 

ACCEL2 is a compiler which offers a 
unique approach to accelerating execu- 
tion spend of Basic programs for the 
TRS-80. Coupled with its low price, its 
capabilities make It a reasonably good al- 
ternative to other options, such as: writing 
machine language programs, embedding 
machine-executable code in Basic pro- 
grams, or spending a lot of money on big 
compilers. 

ACCEL2 comes on a self-relocatable 
system tape, it loads starting at 18944 and 
occupies 5120 bytes. To save it on disk, 
enter Basic2 from DOS and load the tape. 
Relocate it where you want It to reside, 
and reboot. Now you can save ACCEL2 as 
a core image onto disk. 

One of the nice things about ACCEL2 Is 
that 16K tape users can now own and 
operate a compiler that works. Compare 
that with Microsoft's BASCOM, in which 
the run-time system alone is over 14,000 
bytes! 

The lovable aspect of ACCEL2 is that 
you are free to sell programs you compile 
with it without having to pay royalties. 
Microsoft requires nine percent or $195 



per year for programs sold that used their 
compiler. 

To use ACCEL2, you must call It via the 
USR function. When you load It from Level 
II, it automatically loads Its address Into 
locations 16526 and 16527, so you may Im- 
mediately call it by A = USR(0). ACCEL2 
has the built-in capability to save and load 
programs to and from disk, if you want to 
write a self-contained System tape, you 
must purchase TSAVE for $10. 

ACCEL2 takes tfie Basic program In 
memory and compiles certain statements 
Into REM statements with the embedded, 
compiled code. It leaves the statements 
that It cannot compile for the Basic Inter- 
preter to execute. Thus, it will compile 
almost all Basic programs without any 
revision on your part. 

This allows the Break key to still work. 
This Is the only compiler that I know (I 
have three) that has this capability, 
although they may be simulated in the 
others. THON and TROFF, the Trace func- 
tion, also work, but they only trace the un- 
compiied sections of the program. 

The run-time system Is only IK, and yet 
ACCEL2 compiles full floating point for 
elementary operations ( + ,-, *, and /)■ as 
well as single-dimensioned arrays and 
some string functions. 

When you are compiling a program that 
you don't want to type again, t>e sure to 
save a copy. Compiled programs can't be 
edited. If you enter the edit mode for any 
line of your compiled program, whether 
that line is compiled or not, your system 
will hang up, requiring a reboot or reset, 
which Is very inconvenient. If the compiler 
sends you a complle-tlme error message, 
your program has been destroyed. You 
must type in New and reload your pro- 
gram. 

Error messages are limited, but useful. 
You may receive one of six messages: SN 
(syntax error), OM (out of memory), FC (il- 
legal function), NF (Next without For), LS 
(string too long) or UL (undefined line for 
GOTO or GOSUB). 

The compiler also supports tape or disk 
I/O, whereas BASCOM only allows disk 
I/O. This enables you to keep tape files, 
and use your ccrmpller at the same time. 

The program does contain an error in 
how it reads data statements. After com- 
piling a program that contains data 
statements, the program will run (all other 
things being correct). But If you call the 
same compiled program off disk to run, 
you will receive an OD error. This is not 
much of a problem for me since I only have 
one program with data statements, but it 
would be a real pain for someone who 
dearly loves them. It necessitates recom- 



piling the program every time you use It. 
Compile times are relatively short, ex- 
cept for long programs. A very short pro- 
gram will compile In a few seconds. A 6K 
program takes five to 10 minutes, and a 
long program should be compiled while 
you take your mother out to dinner. 

The Manual 

The manual is mediocre. It Is 11 pages 
long and contains useful information, but 
does not go into enough detail. No men- 
tion Is made of the data-statement error, it 
does talk some about pitfalls and about 
speeding up execution. 

ACCEL2 does not compile several 
statements, such as Print, and the 
transcendental functions, such as LOG, 
SQR, and SIN. But it will compile double 
precision for the elementary arithmetic 
operations -k, -, *, and /. This makes AC- 
CEL2 very useful for speeding slow 
doubte-preclslon arithmetic. You can even 
write approximation routines for double- 
precision transcendental functions and 
compile them. 

How much ACCEL2 will speed your 
Basic programs depends on program 
structure. If your program contains mostly 
non-compiled statements, execution time 
will be similar to Basic's. If the major 
reason for slow execution ts comparing 
and branching, then execution time will be 
significantly faster. 

The manual gives a table for relative 
speeds of execution for a variety of conrv 
piled statements. Integer arithmetic oper- 
ations are said to run 47 times faster for 
addition and subtraction, and two to three 
times faster for multiplication and divi- 
sion. Double-precision arithmetic execu- 
tion times are much closer to Basic, rang- 
ing from 1.5 for addition and 1.02 for divi- 
sion. 

The string operations are quicker as 
well. LEN executes 43 times faster, MID$ 
four times faster, LEFT$ three times 
faster, RIGHT$ 2.8 times faster, and CHRS 
almost five times faster. 

Summary 

In conclusion, ACCEL2 offers an inex 
pensive, and efficient method for decreas 
Ing run times for general Basic programs 
Tape and disk I/O are supported, as wel 
as double precision. Rewriting is not nee 
essary, although execution speed may 
often be enhanced by writing more op- 
timal Basic code. Its only real problem Is 
in its execution of Read statements when 
executing complied programs called off 
disk. (If someone does discover the cor- 
rection for this error, please pass it on.)B 
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ow s your 
love life? 



A fittle dull around the edges? 

Routine? PredictaWe? Boring'' Maybe 

all it needs is a tittle Interlude. Interlude is 

the most stimulating computer game ever conceived. 

It combines a computer interview, an innovative 

programming ccwiccpt, and a one-of-a-kind manual to 

turn your low hie into^ydting, adventurous, delicious fun! 




Interlude issromantic. playful... outrat^o';^.. a fantdfy Interlude ts ■ A B4_'d of Rose&. (Inter- 
lude # 1) ■ iMata Hart (Interlude #49) ■ The Cha<u.- flut^rlude #7} ■ Rodeo: (Interlude #71} ■ Th«' King and I 
(Interlude #60) ■ Some Enchanted Eveninr [Interlude #841 ■ Caveman Caper [Interlude #82) ■ I rom Here 
to Lcslasy {Inwriude No. 30) ■ Satin Duams [Interiudt^ #72). 

More than 100 Interludes are included in the program Most are described in detail in thL* accompanying manual, 
but several surprise Interiudes are buried in the program awattinc^ that very „ ^a- 

special time wlit>n ^M>urintervit>w, says you're roady. (When you learn secret IT^^^^^ ^ a^^ ji, 
!' t«Hude #99. your bve life may never again be the same!) Interlude B M iT^ ^ fl Mj C_1| K 



.an give v-.*u experiences you'll never forget. Are you ready for it':* 



The Ultimate Experience. 



INTERLUDE. Oepl. 80. 1063S Rtchmond Avenue. Houston. Texas 77042 I'm really ready. Send nry interlude loday. 



i 



Applellll'VK - TII»-SO<Mo(leU. 16K)" 

Cj Ck>*-iv :?e8.95( U C«»«ftw ($18,95) 
U DiUtftttf ($21.95) [J Diskatt«{S21.95) 
I l>isiMn« - Pa-u:*! or DOS .1.3 ($2195) 
Add $1 75 Im ^rpping and hanciling 

□ MASTTRCARn J VISA 
AccT.>umNo. 



PM4« 

J 20"x24'rvpCDdiicUuiiol 
this ad without ad copy 
{$4 95— Includes 
shipping charges) 

AJIchar9ecu>tonKrsiTiLj( slyn U:"k- 

ExpfeaUnn date 



AvailaUefor iamavdiateskipneBt. 

PleMS endoM your chock payable to irfrKKLU[>E 
or complele'the charge intonnatlon: 



Mast«iCard Bank Coda 



CHARGE aiftTOMERS:OrAri by phone loll Irw! 1-490-231-5768 Ext. 306 Texas: l-«00-392-2348E)rt. 306] 

Mime — . _Aj|« 

Aadresf , 

'Al^4F[lteate9EiGralliidpmdikolAp|A>Ciiinfiui«% tae.**TRS4Dbarti^siei«dliMlennri>ofRa(Bo^h<Kk,a1drMlvCo. 
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In Memory Information 3.0 
Tandy/Radio Shack 
Fort Worth, TX 
$19.95 

by Fritz Milhaupt 

Radio Shack has been selling its In 
Memory Information card filing sys- 
tem since the TRS-80's introduction in 
1978. Since then many versions have been 
offered, the most recent being version 3.0 
reieased last fali for ft^odels i and ill. It is a 
fairiy good system and iacks neariy aii of 
the bugs of the eariier versions. 

The In Memory Information System is 
based on storing information on pages of 
memory referred to as cards. Each card 
may contain up to 14 fields of one line (41 
characters) each definable by the user. 
The card has a maximum length of 255 
bytes which somewhat limits the amount 
of data per field. In some applications it 
may be necessary to break up some en- 
tries into tw/o or more cards. This can pose 
a problem if the cards are sorted later. 

This package consists of three pro- 
grams: the Initialization program, the Sort 
program, and an Update and Retrieval pro- 
gram. All are written in machine-code. 

The Initialization program sets up the 
number and the length of the fields and 
creates the initial data file. During the 
card formatting procedure, the program 
asks whether to justify short entries to the 
left or to the right. Unless left justification 
is specified, leading blanks will have to be 
included in search strings when using the 
Find function later on when using the Up- 
date and Retrieval module. This is not 
mentioned in the manual. 

The Sort module serves three tasks. It 
sorts the file in ascending or descending 
order to user specification, it prints the 
data file on optional 80-column parallel 
printer, and it can also split a long data file 
into two or more sections to avoid over- 
running available memory. 

The Update and Retrieval program is 
the most used of the three in this system. 
With it you can add, delete, or update the 
datacards. Updating can be quite tedious. 
First the card is found (manually or using 
the Find command) and the Update mode 
is entered. The entire card may now be up- 
dated. To skip a line that you do not wish 
to change, hit Enter and the cursor will 
drop one line. To skip more than one line, 
hold down the Enter key until the cursor 
reaches the desired line. Once the last line 
is passed, the Update mode is exited. 
Since there is no global replace or delete, 
updating can get quite tiring. 

Each program allows for the repetition 
of key entries by holding down the proper 



key until the desired number of characters 
has been printed. This is something of a 
mixed blessing since it allows the rapid 
entry of multiple characters. But if you are 
a heavy-fingered typer like myself, it is 
quite an annoying feature, because it acts 
like a badly bouncing keyboard. The only 
real operational bug Is that if the amount 
of available memory drops below twice 
the length of a data card (both of which 
aredisplayedconstantly), allof thedatain 
memory will be lost because the program 
restarts. 

As a package. In Memory Information 
makes extensive use of tape files. In order 
to pass from one module to another, the 
data must be saved, the desired module 
loaded, and the data reloaded. Tape data 
may be saved at 500 baud on the Model I 
and at 500 or 1500 baud on the Model III. 
The programs themselves are loaded by 
their own special loaders. 

This program is exactly as Radio Shack 
advertises, a computerized card filing 
system. It is possible to save and access 
great amounts of information with It, par- 
ticularly In systems with more than 16K 



memory. It has potential for those who 
wish to keep brief records of customer 
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payment or status In very small business- 
es. For most small businesses though. 
Radio Shack's Versatile, which is a shirt- 
tail cousin of In Memory Information, 
would be better suited as long as disks 
were available. 

In Memory Information is a good data 
base for its price, and for most home and 
hobby applications would probably be 
adequate. Compared to other data bases 
in the same price range it ranks 
favorably.! 



Rats Revenge 

Med Systems Software 

Chapel Hill, NC 

16K Level 2 Models I and III 

$12.95 cassette 

$16.95 32K diskette (Model I) 

by Darren DeVlglll 



What makes Rats Revenge stand out 
from the many maze games already 
on the market? It's interesting. Up until 
now every maze I traversed led to tedium. 1 
never found going from one maze to an- 
other very stimulating. 

Apparently the author of Rats Revenge 
felt likewise, as the program is loaded 
with things its predecessors lacked. Sud- 
denly I'm a rat, with the desire to scurry 
around, looking about a maze for a morsel 
of Swiss cheese. I can move one space at 
a time, run down straight hallways, turn in 
place (to get my bearings), and even con- 
sult a Hint Guru as to my relative location 
to the meize's main trail. There is also com- 
petitive scoring, though obviously only 
one person can play at a time. (Try to 
figure out a maze while taking turns.) 

Everything 1 see is in 'rat' perspective. I 
don't get a top view of the maze until I find 
the cheese or quit. Oh yes, there is one 
other way to leave the maze— on little 



phosphorescent wings. Not that merely 
dying Is enough, some twisted mind In- 
cluded the dreaded cheese hallucina- 
tions. 

Besides what you see as a rat, there are 
assorted messages, some good instruc- 
tions, and the mysteriously appearing 
(and somewhat familiar) "hmmmmm." 
Better wait until you see It yourself, no 
reason to tell you everything. The mazes 
are randomly generated before each 
game and take from one to six minutes 
depending on what size maze you choose. 
When you either win, quit or starve, the 
maze is drawn for you and a small dot 
traces the path you took. Small mazes are 
drawn with a double-pixel line, large ones 
with a single-pixel line. Those of you who 
think It Isn't all that big should remember 
you're inside the maze rather than over It, 
and you have a limited numt>er of moves 
to find the cheese. 

All of Med's software comes with a two- 
week guarantee. They don't just guaran- 
tee the program will run, they guarantee 
you'll like it. That's something I appreci- 
ate. Who else has the confidence to make 
guarantees like that? Rats Revenge, as 
with all the Med software I've seen, is 
worthwhile. With its well-drawn graphics, 
total rat perspective, variable skill levels, 
humorous touches, and more, is one 
game you won't play once and shelve. ■ 
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Reader Service tor lacing page ^352-* 



A b^iutif ul match, the Smarlinodefn 
and theTRS-80. ibur TRS-BO can fa/« with 
other computers, overihelel^itwneiifies. 
And with no acoustk: losses or distortions 
Access time-sharing systems and mlor- 
mation utHtties such as ihe ScMjrce; 
CompuServe'^ and MtcroNel 
Direct hooi(-up with no intefference noises 
The Smarlmocem nooks to the telephone 
line jus) like a modular telephone, amply 
Insert In a wall (ack 

Love at first sight - your TRS-60 and 
Ihe Smartmodem! 

Brawny - t>ecause tt does so 
man^thinQB.Aijt(}-(fiai ami auto-answer 
features buiti in Wilh the Smartmodem. 
your TRS 80 canadfwnaf/ca//y dial the 
telephone answer the telephone receive 
and transmit, and hang up the telephone- 
Completely unallended, 
Pulse dialing or Touch-Tone ' * The 
Smartmodem can be connected to any 
letephone system in the U S because It 
allows pul8a-dialir>g, Touch-Tone dialing 
or a combination of the two FCC 
approved. 

Program controUatyte in any language us- 
IngASCIlcharaclorstnngs Thisisauntquo 




Mcrocomputer Comporwnt Systems 

feature of iheMa^-HS S'TjarimwlefTi 

Brainy - because it does them 
all so simply. Seven LED indicators on 
the front panet give you visual signals of 
Ihe status of the Smartmodem 
MR -Modem Ready. SD SendOala 
CD Carrier Oeiecled. etc 
The audio monitor feature leis you 'listen 
in' on the can being dialed and the con 
nedion made, \bu ate immedialely alerted 
to busy Signals, wrong numbers, etc. 
Over 30 different commands can be en- 
tered directly from your TRS-80 keyboard, 
including tt>e unique Set commands 
wNch allow you to select and change var- 
ious optional parameters such as dialing 
speed escape code character length of 



time for a dial tone, and number of rings to 
answer. There are 17 Se! ' commands 
The Smartmodem is completefy compar- 
ib*e with the BeH-l03 type modems, the 
type ol modem most time-shartng systems 
have.Operalioncanbeintult or half-duplex 
with a transmission speed of 0-300 baud. 

The Smartmodem is ready to 
"Bet-together ' with your TRS-80. 
TRS-BOModelliand rHS-80Cok3rCom- 
puters have RS-232 serial ports and can 
immediately interlace with Itte Smart- 
modem Expansions Ihal permit use of 
the Smartmodem with TRS-60 Model I 
and Model II are available through your 
TRS-80 dealer 

Match your TRS-BO wilh a Hayes 
Smartmodem for a sophisticated, high 
pertormanced data communication 
system. Available at computer stores 
nationwide (except T RS-B O dealers) 
call Of wrrte lor the ^f^ _ 
location nearest I m II ta VlOQ 
you Anddoniset- \^J* •"J^^ 
tie for anything less than Hnyes 
Hayes Microcomputer Products, Inc. 
b8i5 Peachiree Comers East 
lsk3rcross Georgia 30092 (404j 449-8791 



Your TRS-80 computer 

and the Hayes Stack Smartmodem. 

^eauly. Brains, and Brav" ' 
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XBE 

Computer Appltcatlona Unlimited 

Rye, NY 

$24.95 

by Bruce Powel Douglass 



XBE makes editing Basic programs 
much simpler than any other program 
of Its type. I almost never write or edit pro- 
grams without using XBE. 

Some of Its capabilities are selective re- 
numbering of a line or a block of lines, 
finding the occurrence of any string of 
characters In the program changing the 
string to any other string of characters, 
block deleting lines, definable macro keys 
for quick entry of Basic commands or oft- 
used words, page the program, scan the 
program a line at a time, or jump to any 
line directly. 

The program comes on tape with a relo- 
cating loader to place the program at the 
top of memory, with 16K, 32K or 48K. Once 
placed Into the appropriate memory loca- 
tion, it may be saved on disk as a core im- 
age, or on tape with T-Bug. it occupies 
5,120 bytes. Once loaded and initialized 
(with a System command), it may be in- 
voked by entering the command XEDIT. 

You must have at least one line to in- 
voke the editor. Once invoked, the editor 
clears the screen and reformats it, pre- 
senting the line numbers In columns zero 
through seven, and the Basic commands 
beginning in column nine. No statement 
will be displayed below the twelfth tine, 
and at the bottom of the screen an area is 
boxed off. This Is for the extended com- 
mands mentioned later. 

You have a blinking cursor with reason- 
ably complete ease of movement and two 
speeds to move the cursor along a line us- 
ing the right arrow. The movement keys 
are repeating. To backspace (non-destruc- 
tive), you press the left arrow key. Shift left 
arrow places the cursor at the beginning 
of the line. To go to the next line, press 
Enter. This is also a repeating key. To go 
to a previous line, press shift up arrow. An 
up arrow without the shift is a recogniz- 
able character, and so it must be accom- 
panied by a shift to move the cursor to the 
previous line. Shift down arrow lists the 
next page of your program on the screen. 

Editing 

When you get to a line you wish to edit, 
you merely type over the offending errors. 
To insert characters, use shift I. This will 
allow you to insert characters until you 
press Enter. The full page remains visible 
and the line wraps around as you insert 
the new characters. To delete, shift D will 



'You have a blinking cursor 
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do the trick. It Is a repeating key, so you 
can hold it down until you have deleted as 
much as you want. Be careful though— 
there is no way to recover characters that 
have been accidentally deleted. They 
must be reinserted. 

Shift X has the same function it has in 
Level 11 editing— it extends the line by 
placing the cursor at the end of the cur- 
rent line and entering the insert mode. 

if you enter the insert mode, shifted 
characters are now macro keys. They 
have default strings which may be chang- 
ed to your desire. Thus you press only a 
single key to enter Print, LPRINT or 
CHR$(. You are limited to six characters 
with the macro keys. 

Ciear Command Mode 

You have an entire mode called Clear 
command mode, twcause it Is initiated by 
pressing the Clear key at the right of the 
keyboard. The following commands must 
first be initiated In this manner. 

To position the cursor at the first line of 
the program, press Ciear T. To exit the 
editor and return to Basic, press Clear E. 
To find a previously defined string, press 
Clear F. 

To delete a line, press Ciear D. To insert 
a line, press Clear 1. The default increment 
Is five, but that Is easily changed. If there 
is no room for your line (with the given in- 
crement), you will be given the message 
"No Room Between Lines." You may then 
renumber the entire program with larger 
Increments between lines, or change the 
Increment for the Insert function. 

You may mark a statement for a variety 
of purposes. Clear C marks a statement 
for copying, while Clear M marks it as a 
statement to be moved elsewhere (effec- 
tively, a selective renumbering of that 
line). Copy makes a copy of the line where 
you tell It to, while Move moves the line, 
thus with the former function, you have 
two copies of the line, and with the letter, 
you have only one. Clear H says, "This Is 
where I want the line (or block of lines) 
moved or copied to." You place the cursor 
at the line preceding the location where 
you want the line(s) to appear, and press 
Clear H. 

Clear B is a marker for blocks of state- 



ments to be moved, copied or deleted. You 
mark the first line with Clear B, and then 
the last line with the Ciear command func- 
tion you wish performed. A square lights 
up at the lower right corner of the screen 
to remind you that you have something 
marked. 

Mora Features 

There is also an Extended Clear com- 
mand mode. You enter this with Clear 
space bar. The cursor is then positioned 
at the bottom of the screen. From here you 
can: change the increment value on lines, 
renumber the entire program, search for a 
line number, search for a string, change a 
character string, or redefine your macro 
keys. Enter executes the command. 

By entering In, where n Is a number, you 
can set the increment value for Inserting 
lines. With Sn, where n Is a number, you 
can look for line number n and position It 
at the top of the page. You may also use 
Fstring, which tells the editor to find the 
first occurrence of string, and the string 
may be up to 20 characters. Remember, 
you may invoke Clear F to search for fur- 
ther occurrences of the string. Once the 
string Is located, you may reenter the ex- 
tended Clear command mode and enter 
Cstrlng. This will change every occurence 
of the string used in the Find command to 
the string given In the Change command. 
The strings needn't be the same length 
either— the lines will adjust themselves 
(unless the length becomes greater than 
240 characters). 

This mode also allows you to renumber 
the entire program with the extended 
Clear command Nn1,n2, where n1 Is the 
starting number assigned to the first 
statement in the program, and n2 is the in- 
crement. 

Finally, you can enter D(key)(strlng) and 
redefine any letter key A through Z to the 
macro key of your choosing. This macro 
key may be invoked anytime you are In the 
insert mode by pressing Shift. Thus it may 
be used when in insert-in-a-llne, X, (extend 
a line), or Insert-a-line modes. You are 
limited to six characters. 

1 have used this program extensively 
since I received It In the mall, and I am still 
impressed. It is an excellent piece of well 
written software that is long overdue.! 
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There are several editor/assemblers 
available for the TRS-80. Each trade- 
oft among conflicting design goals such 
as mainframe features, size of text buffer, 
speed, I/O options, flexibility and ease of 
use. 

One way to avoid excessive memory 
consumption without sacrificing features 
which require lengthy code is to use an 
overlay system. With this method, a large 
program is broken up into two or more 
smaller parts so that not all the code need 
occupy memory at anyone time. The most 
familiar example of such a system Is 
TRSDOS. In editor/assemblers, the sim- 
plest application of the overlay approach 
is to use two main overlays, one for the 
editor, and the other for the assembler. 

Since most assemblers perform more 
than one pass through the source code 
during an assembly, the assembler Itself 
can be broken up Into several overlays. 
This technique does offer lots of source 
space without skimping on features, but 
the frequent loading of the various 
overlays tends to make performance slug- 
gish. 

At one end of the fancy versus quick- 
and-easy spectrum is Radio Shack's 
Editor/Assembler. It supports only tape 
I/O and does nothing flashy, but is 
straightforward and easy enough to use. 
At the other end of the spectrum is Micro- 
soft's ALDS {Assembly Language Devel- 
opment System). ALDS has all the high- 
level features referred to and more, but is 
awkward to use, hard to comprehend and 
slow. Because of these drawbacks, sur- 
prisingly few assembly language pro- 
grammers seem to be satisfied with 
ALDS, despite Its advanced features. 

In the middle is a variety of software 
products. Near the low end are various 
modifications and upgrades to Radio 
Shack's editor/assembler. These would In- 
clude AsPatch, DiskMod, and Apparat's 
EDTASM. At the high end are completely 
new products, such as Microsoft's new 
editor/assembler, and EDAS. I think that 
for most purposes, EDAS has accom- 
plished the most practical trade-off of de- 
sign factors, and is currently the best 
available choice. 

EDAS 

EDAS, written by Roy Sotoff, is a disk- 
based editor/assembler. Tape I/O Is not 



supported. Unlike ALDS, the current re- 
lease of EDAS does not support macros, 
relocatable code generation, or condition- 
al assembly. The next release of EDAS, 
which will be sent free to all purchasers of 
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earlier releases, will implement some corv 
dltionai assembly and other new features. 
However, It is unlikely that macros or relo- 
catable code generation will ever be sup- 
ported. But don't assume that EDAS Is not 
for formidable programming projects. The 
LDOS operating system was developed 
on EDAS. And the new releases of Kim 
Watt's SuperUtility, a 24K machine-lan- 
guage program, were edited and assem- 
bled on EDAS. 

One of the problems for assembly-lan- 
guage programmers is the size discrepan- 
cy between object and source code. Even 
on a 48K system, a program which assem- 
bles down to only a few K of machine 
language may have a symbol table and 
source code which occupy more room 
than is available in an editor/assembler's 
buffer. This is especially true if the code Is 
highly commented and labeled. ALDS' re- 
locatable module generation solves this 
problem by letting the author preassem- 
ble various segments of his/her program 
in relocatable fornn and then having 
Link-80, ALDS" llnklng-loader, link them 
together Into a run-time program. 

Unfortunately, this usually involves 
multiple assemblies and seemingly end- 
less disk I/O operations, all at a surpris- 
ingly slow disk data transfer rate. 

EDAS has a different and remarkably 
effective approach to many of the prot)- 
lems which ALDS attempts to solve. For 
instance, EDAS is not organized in over- 
lays. Normally, it's all there in memory at 
the same time. However, if you're 
cramped for text space, EDAS' X(extend) 
command allows the text buffer to over- 
write the assembler. This, In effect, 
achieves an overlay system, since the as- 
sembler can be reloaded and run after the 
source has been moved to disk. But you 
will rarely need to txjther with that proce- 
dure because EDAS solves the long 
source file problem in another way. 

Via the Get statement, EDAS assem- 
bles directly from disk. One assembly may 
use any number of Get statements. Thus, 



EDAS lets you break your source program 
into several modules, each of which is 
stored in a separate disk file. Since a file 
assembled as the result of a Get isn't ac- 
tually buffered in memory, a module may 
be larger than 48K. 

If your In-memory source code consists 
only of a series of Get statements and an 
End statement, most of your computer's 
memory is available to hold the symbol 
table. This solves the source size problem 
and permits editing and assembling of 
large programs. It also provides the basis 
of a subroutine library management sys- 
tem. 

In fact, If there are no ORGs in any of 
the Get modules, they will all be sequen- 
tially arranged In memory relative to the 
ORG in the text buffer. In essence, this ar- 
rangement achieves the same effect as 
does ALDS' relocatable code generation, 
except that the relocatable modules exist 
In the source state instead of the object 
state. 

The EDAS assembler also accepts a 
View (filename) command which causes it 
to display the requested disk file on the 
video screen. This allows you to make 
sure you are Getting the right file. And to 
further enhance its disk utility, EDAS 
allows viewing disk directories (Including 
file size allocations and free space) and 
killing files without leaving the editor. 



Other Features 

Three other nice features of EDAS have 
a synergy which results In a breakthrough 
in debugging ease. I am referring to the 
/IM assembly switch, the Branch com- 
mand, and EDAS' warm start capacity. 
The \MI switch lets you assemble a pro- 
gram directly into memory instead of to a 
disk file. The Branch command lets you 
jump to any specified address, such as 
the entry point of the program just assem- 
bled into memory. And EDAS' reentrant 
nature lets you escape from test execu- 
tion of your object code (by reset if neces- 
sary), and return to EDAS with your source 
intact (providing your testing hasn't run 
wild and squashed it). 

One word of caution with regard to 
reentering EDAS. EDAS keeps its text 
pointers in low memory— starting at 
about 53(X)H. Therefore, going to DOS and 
using any of the library commands is like- 
ly to result in a confused EDAS after reen- 
try. This will probably be corrected in 
EDAS' next release. 

In the meantime. If you have used EDAS 
to assemble some code to memory and 
want to debug it, the best way to leave 
EDAS is to Branch to 30H. This puts you 
into the restart routine, which invokes De- 
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bug without issuing the DOS Debug ii- 
brary command. From Debug you can op- 
erate on your program in the usual fashion 
and finally jump back to EDAS with your 
test intact. 

Upon entering EDAS, you are presented 
with a memory size question similar to 
that of Level li Basic, if you defauit by hit- 
ting Enter, EDAS uses the address point- 
ed to by HIGHS (DOS' pointer to the high- 
est available byte of memory) as its mem- 
ory ceiling. If you answer the memory size 
question with a hex address, EDAS uses 
that address for its ceiling. This aiiows 
you to protect driver routines, monitors, 
and such in high memory. In either case, 
the text buffer and symbol table are 
cleared for a new session. Finaliy, if you 
answer the memory size question with 
zero, or by pressing Break, EDAS makes 
no restoration of its pointers. Thus, you 
may go on editing the same text you were 
working on before you last left EDAS, pro- 
viding nothing has stepped on it in the 
meantime. 

EDAS also supports lowercase. To avail 
yourself of this support, you must, of 
course, have a lowercase keyboard (no 
problem on a Model III) and lowercase 
driving software (again, no problem with 
the Model III). If necessary, EDAS' 
Memory Size feature can be used to pro- 
tect the driver In high memory. 

Once set up for lowercase, EDAS offers 
two modes of operation. In one, both up- 
per and lowercase characters are main- 
tained In the text buffer just as they were 
keyed in. This allows you to use EDAS' 
powerful editor to prepare word process- 
ing files. 

In the other mode, certain lowercase 
letters are converted to uppercase as they 
are inserted, because assembler syntax 
requires instructions, mnemonics, and 
labels to all be uppercase. Even in this 
mode, EDAS does not convert material in 
quotes or comments, since lowercase in 
those areas would not generate assembly 
errors. 

EDAS has several other Improvements 
over what Is available in editor/assembler. 
For example labels may be up to 14 char- 
acters long. E/A's limit is six letters. The 
extra letters are important to those us 
who would like to choose labels with a 
mnemonic quality or which contribute to 
the self-documenting nature of the pro- 
gram. 

Another such improvement is EDAS 
treatment of DEFM, DEFB, and DEFW. 
Each of these now allows you to con- 
catenate values. 

Each value is separated from others in 
the value list by a comma. ASCII values 



are surrounded by single quotes. For ex- 
ample 

10 DEFM This i3 example',' ','# ',1 assembles as 54H 
68H 69H 73H 20H 69H 73H 20H 65H 7eH 6)H 6DH 70H 
6CH 65H 20H 23H 20H 01 H. 

This String of hex characters, when 
looked at through ASCII-colored glasses, 
becomes: This is example # 1. (Note: the 
digit 1 in this example assembles as a hex 
1, not an ASCII 1.) Items in the value list 
may also be expressions, for example: 
20 DEFM 'T'-f20H,' = t' assembles as 
74H3DH 74H, which in ASCII ist = t. 

Another nice thing about EDAS' han- 
dling of DEFM and DEFB is their compact 
presentation in the assembled listing. 

One of EDAS' smallest, but most use- 
ful, advantages over E/A is its enabling of 
the clear key. I use this feature almost 
constantly, as I like to present myself with 
neat cohesive screenf uls of data when I'm 
programming. With E/A, I've had to hand 
scroll superfluous material off the screen 
by pressing the down-arrow 15 times in 
succession. 

EDAS' documentation is well written 
and complete. Amazingly, it Is printed on 
70-pound lined paper, which makes mere- 
ly turning the pages a luxurious experi- 
ence. It does not contain an instruction- 
by-instruction explanation of the Z-80 op- 
codes. Those who need a course in Z-80 
machine language will have to supple- 
ment the EDAS manual with additional 
material. The EDAS documentation quite 
correctly restricts itself to detailing the 
operation of the editor/assembler, and 
that It does quite well. There is a source 
file on the EDAS disk which has an un- 
commented list of all the Z-80 instruc- 
tions. 
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Finally, I would like to mention that a 
few minor bugs have been discovered In 
EDAS. They are cosmetic or documenta- 
tlonal. None of them interfere with the 
basic functioning of the program. For in- 
stance, when explaining the Write com- 
mand, the documentation indicates that a 
comma should be used to separate the 



starting and ending line numbers. Actual- 
ly, a colon (:) must be used.B 

Just as this article was about to be 
typeset, I learned that Misosys is ready to 
release EDAS 3.5. All registered EDAS 
owners will receive a notice to mail in a 
disk for a free upgrade. Here are the major 
improvements in the new version of EDAS. 

There is now a cross-reference (X-REF) 
utility. It generates files containing every 
table declaration and reference. For each 
declaration, the value of the symbol is 
given. For each reference, the file name 
and line number of declaration are record- 
ed. A source file of EQUs for all referenced 
symbols can be generated. The user can 
specify a page heading (and other page 
formatting specifications) for X-REF to 
use when printing its files. 

A new utility, called Tape to Disif (TTD) 
has been added to the EDAS package. It 
converts EDTASM or EDTASM + source^ 
files from tape to disk. 

Another new utility is CMDFILE, which 
allows the user to transfer object files 
from tape to disk and vice versa, merge 
object files, and perform similar manipu- 
lations. 

A number of improvements have been 
made to EDAS itself. It now accepts the 
additional logical operators: integer ', in- 
teger/, logical OR, and logical XOR. Four 
conditional operators for conditional as- 
sembly are now available. 

The following improvements have been 
made to provide compatibility with 
ti^icrosoft's f^acro-80 source files: A 
dollar-sign ($) now may be the first 
character of a label. A label may be alone 
on a line. EDAS can now read and write 
Macro-80 source files with or without line 
numbers, and with or without Macro-80 
headers. 

A couple of new pseudo-ops are provid- 
ed including COM, which forces a com- 
ment line to be written to a load module. (A 
comment line does not get copied into 
memory when the load module is loaded.) 

EDAS 3.5 allows an object code filespec 
to be put into an assembly command line, 
and Gets a file that starts with a comment. 
Also, you now have a better chance of 
reentering EDAS from DOS with your 
source code intact, because the crucial 
vectors are being stored higher in 
memory. EDAS can now be run from a JCL 
(Job Control Language) file. 

Certain prompts (like 'Mem Size' and 
'End of Page') have been dispensed with. 
Users may specify the pertinent informa- 
tion when entering EDAS from DOS. Since 
this relies upon DOS' parameter scanning 
routine, the new version of EDAS is not 
compatible with NEWDOS-80.U 
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Last month we discussed ways of 
ichaining programs so one can call up 
another. Examples of the "master menu" 
type of operation (where one program 
calls up any one of several programs) 
were given. 

The same principle may be used to 
chain sequentially through a string of 
programs. As soon as a student finishes 
one program, the next is automatically 
called up. 

The chaining technique can be effec- 
tively used in demonstrations and in in- 
struction, where it is often advantageous 
to carry information from one program to 
the next or to accumulate data across a 
series of programs. 

The First Chained Program 

As an example, suppose the first chain- 
ed program asks the student for his name. 
You would not want subsequent pro- 
grams to ask for the same information; it 
is better to arrange for all of them to 
"know" the answer. Another use is to have 
each chained program store the student's 
score so you can access his achievement 
on each one. This could be accomplished 
by printing the scores, but who has a 
printer connected to every computer? 

Fortunately, these and similar pro- 
cedures may be done in the computer's 
memory (RAM). There must be extra mem- 
ory—some memory at the top not re- 
quired by any of the programs In the 
series, in which to store any information 
to be passed from program to program. 

The first step Is to reserve memory. Do 
this manually before loading the first pro- 
gram—answer the memory size question 
with the proper number. You will find, 
however, that there are several advan- 
tages to having the first program set the 
memory automatically. (If you have forgot- 
ten how to do this, review the procedure in 
the October Education 80.) 

Once you have set aside memory you 
must make a special effort to store and 
retrieve data in that area. (A good thing, 
too; it prevents all but the most sophisti- 
cated student from changing it!) We'll use 
POKE and PEEK to place and retrieve the 
data. 

The statement examples which follow 



were developed for a 48K Model III. Use on 
the Model I should require no changes. 
However, either machine with only 16K or 
32K will require that the POKE, PEEK, and 
memory size addresses be changed ac- 
cordingly. 

10 POKE 16562, 255: POKE 16561 , 228 

This first statement sets the memory 
size at 65510 just as though the question 
had been asked and answered with that 
number. Twenty-five RAM locations have 
been reserved for special use. 

30IFPEEK(-3) THEN 310 

This example is taken from a master- 
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menu type program chain. If any value 
other than zero is found at -3 (65533), 
program executioh transfers to line 310. 
Any time the menu program is run after 
the first run, the introductory material is 
skipped and the program goes straight to 
the menu. 

There are times the locations above 16K 
must be referred to as negatives. Beyond 
the 16K boundary, PEEK and POKE re- 
quire negative numbers which decrease 
to - 1 at 65535 (see your TRS-80 manual 
for further details). 

150 INPUT B$ : REM FOR STUDENT NAME ENTRY 

The name in B$ will be lost as soon as 
another program is loaded. In order to 
keep it, we use the following technique: 



160 Y = LEN (B$) - 1 : IF Y > 20 THEN Y 
= 20. This statement sets the value of Y 
equal to one less than the length of the 
student name. Because of the amount of 
RAM reserved, Y is limited to a maximum 
value of 20. 165 POKE - 3, 1 sets location 
65533 to the value of 1, to be read by line 
30 the next time the menu is run. 168 
POKE -4, Y POKES the length of the 
name (Y) into 65532. 

170 FOR X = -26T0-26 + Y 

: POKE X, ASC (MID$ (B$, X + 27, 1)) 
[NEXT 

This line POKEs the student's name 
(one letter at a time) into reserved 
memory, beginning at 65510. Here is how 
it is retrieved: 



310 Y = PEEK (-4) 
315F0RX - -26 TO -26 + Y 

:B$ = B$ + CHR$(PEEK(X)) 

: NEXT 
320 PRINT"HELLO. 'BS''. IT'S GOOD TO SEE YOU 

BACK. HERE IS THE MENU AGAIN," 



Line 310 gets the name length from 
reserved memory. Line 315 concatenates 
the name letter by letter into the variable 
B$. The student will be addressed by his 
name every time he returns to the menu to 
make another selection. 

This technique can be used to pass any 
kind of information from one program to 
another. By putting line 315 in any subse- 
quent programs, they will "know" the stu- 
dent's name or whatever data you have 
stored. 

If you wish to accumulate the student's 
scores, have each program POKE its 
score in a different RAM location. You can 
use a special program to PEEK at the 
numbers and present them to you at any 
time. 

When It Won't Wortt 

There are three circumstances which 
will prevent this technique from working. 
if any program in the chain POKEs into the 
area where you are storing data, that data 
will be lost. If the student presses the 
Reset button, all will be lost. Finally, if the 
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computer is turned off and then on, there 
will be no information stored. You can 
take steps to minimize the possibility of 
these things occurring. 

To clear out stored data before another 
student uses the program chain, you can 
depend upon newly stored information 
which is POKEd in to replace the data 
from the previous student. Should you 
decide not to do so, you can turn the com- 
puter oft, press Reset, or POKE in a string 
of zeros. 

Passing values from one program to 
another has many advantageous uses in 
your CAI (Computer Assisted Instruction). 
It also opens up another dimension in 
your programming. 



Word Processor Update 

In an eariiercolumn I mentioned Delmer 
Hinrjchs' excellent word processor, listed 
in the June 1980 issue of aOM/crocompuf- 
ing. It was {and is) the best "freebie" word 
processor I have come across. It does a 
good job in preparing term papers, reports 
and the like. It has two major disadvan- 
tages. 

A lot of time is required to Itey it into the 
computer the first time. (But, then, one 
hears that student labor Is cheap!) Also, 
the response time Is a bit slow because it 
is written in Basic. (One also hears that 
few teachers or students are such great 
typists anyway!) 



5'(9 REMARKS 

from page 6 

tially. When we cut costs that generally 
means a few more pages of magazine for 
you. 

We are seeing more and more articles 
on the use of word processors, and even 
hear them mentioned on television. It 
didn't hurt when Jimmy Carter (remember 
him?) turned to word processing for his 
writing. ■ 

Making Money 



Ever since the microcomputer busi- 
ness began I've been asked for advice 
on which firms appear to be the best for in- 
vestment. With the recent media attention 
to the industry my calls from people with 
venture money have been increasing. 

I've been cautious about making any 
recommendations for several reasons. 
There have been some products which 
seemed to have good possibilities, but my 
confidence In the management of the 
firms was low. It is a sad fact of life that 
marketing and promotion go more to mak- 
ing a product a success than the value of 
the product itself. Indeed, we've watched 
some very good products go down the 
tubes as a result of mismanagement. 

With the entry of IBM into the micro 
field there will be a new rash of business 
opportunities. Just as the Radio Shack 
system has generated an industry depen- 
dent upon it— as you can see from the 160 
or so pages of ads in this magazine— so 
we will be seeing a similar phenomenon 
with the IBM (and the Xerox, and so on). 
Some of these peripheral firms are al- 
ready into the tens of millions of dollars in 



sales, so this "support" type of business 
can be very profitable. 

In recent weeks I've talked with a cou- 
ple of small firms which have products or 
ideas which could, I think, quickly develop 
into massive money makers. Each need 
the money to get started with the promo- 
tion and production of their product. 

Most of these firms need between a 
quarter and a half million dollars to really 
get going quickly. Each of three that I can 
think of are well established firms, but 
none have that amount of cash on hand 
for getting a new product out fast. The 
product sales should mushroom, when 
you consider the 300 percent yearly In- 
dustry growth pattern which seems to be 
continuing and perhaps accelerating. 

I'm going to look into the legal ramifica- 



"It didn't hurt when 

Jimmy Carter. . . turned 

to word processing 

for his writing." 



tions of setting up an investment venture 
capital fund for getting needed products 
and services started with each share at 
$1 ,000. The fund would own a share of the 
businesses and be on the board of direc- 
tors, thus keeping an eye on the manage- 
ment of the firms. With some diversifica- 
tion, even if every investment didn't grow 
into a bonanza, it would be difficult to 
miss on all bets. At $1,000 a share, I'll bet 
there are a lot of people who would like to 
get in on the action. I'll let you know if this 
looks feasible. ■ 



If you want to avoid all the typing and 
get a word processor that reacts faster, 
you might want to get in touch with 
Delmer (2116 S. E. 377th Avenue, 
Washougal, WA 98671). He has several Im- 
proved versions available for tape or disk 
operation. Better yet, his prices are low. I 
would not imply that his word processors 
are equivalent to Scripsit or the Pencil, but 
for the price, they are terrific. 

Delmer even has a word processor 
which will print a letter repeatedly, paus- 
ing to pick up a new name and address 
and use the first name in the text wherever 
you wish. Could be very handy when you 
are writing original letters to parents or 
students. 

Upgrading from Model I to III 

There is no question that Radio Shack 
is selling a lot of Model III machines. As 
time goes by, more and more schools will 
be replacing their Model 1 machines. 
When we upgrade from a Model I to a 
Model 111, we have a different situation 
from those of you who start off with a 
Model III. 

Model I users have accumulated a vari- 
ety of utility programs. Some may not be 
needed after upgrading, because their 
functions are built into the Model III. Most, 
however, would continue to fill a need if 
they would work on the Model ill. 

Since I upgraded, I have found some of 
my old utilities work welt; others function 
only partially and still others, not at all. 
Replacing a lot of utilities can be impossi- 
ble after the school or activity budget has 
been broken in the upgrading process! 

Fortunately, some producers of utilities 
are very cooperative in these circumstan- 
ces. The general policy seems to be that for 
the difference In cost between the two ver- 
sions, they will provide you with the Model 
lit version. 

To date, ! have found two producers to 
be quite helpful. One of these is Cottage 
Software (if you aren't using Packer, you 
must not be writing programs). The other 
is Computer Applications Unlimited. 

This is not to say that the other 
manufacturers are uncooperative in solv- 
ing this problem; I have written to some 
others and have not yet given up on receiv- 
ing a reply. 

To help each other through the ex- 
change of information, let me know your 
experience with utilities in the upgrading 
process. Which have you found that work 
just as well on the Model III? Which won't? 
What reactions have you gotten from the 
producers? Be sure to give me your Model 
I set-up and the new Model 111 configura- 
tion, as well as the names of the utility and 
the producer. ■ 
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SWITCH TO^'^" DOUBLE DENSITY 



FEATURES 

• 5- and S-inch' disk drives 

• Single- & double-density 

• Any ttse and density in any mix 

• Read Model 1. II* and III disks 

• &- or 8-inch* system disk 

• Single & double sided disk drives 

• DOSi 3.3.9 included, with Disk 
BASIC. 

• 6 month warranty 

• Up to 3.75 megabytes online 

• Easy installation - plug-in & run 

• Analog phase lock loop data 
separation 

• Precision ATite precompensation 

• Regulated power supply 

a Guaranteed operation at 4MHz 

• All ointacts gold plated 

• Solder masked & silk screened 

• Runs under DOS- 3.3.9. TRSDOS 
2.3. NEWDOS 2.1. NEWDOS/80 
1.0. LDOS. NEWDOS/80 2.0. 
and ULTRADOS 

• Reads 40- and 3&-track disks on 
80-track drives 

• FD1791 controller + your FD1771 

• Fits Model I expansion interfaces 

• Fits LNW expansion interfaces 

• Track configurations to 80-tracks 

• & inch disk storage increased to: 

161,280 bytes - 35-lrttck SS/DD 
322.560 b%t«e - 35-track DS/DD 
I84.:i20 brtes - 40-track SS/DD 
368.640 bytes - 40-tTack DSA)D 
368.640 bytes - 80-track SS/DD 
737.280 b>-te» - 80-track DS/DD 

• 8 inch disk storage increased to: 



591.360 bytes - 77trark SS/DD 
1.182.720 bytes - 77-track DS/DD 
SS: sin|{le-f>ided DS: dnuble-sided 
SD: »inf[ledensily IJD: double-density 

COMPLETE - The LNDoubler 5/8. 
switches your Model I or LN\V-80 
into the most versatile computer you 
can own. The LNDuubler's switch 
allows you to boot from 5- or 8-inch 
system disks, and it's accessible from 
out«de the interface. The LNDoubler 
5f8 comes with a double-density disk 
operating 8>-*tem VDOS+ 3.3.9). 
complete with BASIC and utility 
programs . . . ready to run your 
Boaware NOW! 

VERSATILE Whether you want 
single-dided. double-sided, aingle- or 
double density, 6- or 8-inch operation, 
complete versatility is here today! 
Any combination of 5- and 8-inch disk 
storage is possible with the 
LSDoubler 5/8. Each of your pre»ent 
40-track. single-eided 5-inch drivefi 
will store up in 18-t,320 byten 
(formatted storage! - that'ii on 60"( 
increase in storage capacity for only 
half the cost of jwtt one disk drive. 
With three 8-inch double density, 
double-sided drives your Mi>de1 I will 
have 3.75 Megabytes of online storage 
- that's more storage than a Model II 
or Model III! 

ADVANCED - The LNDoubler 5/S 
is the most technically advanced, 
tested and reliable double-density 



board you can buy. The LNDuubier 
5/8 has more features, more options 
and more software ftupport than any 
other product of its kind. 

EASY TO INSTALL The 

LNDoubler 5 /H is easy to install. 
There are no traces to cut, no wiring 
to do. just a screwdriver and a few 
minutes of your time is all that is 
required. The instructions are fully 
illustrated for all interface*. In 
minutes you will be 'up-and-running'. 
and enjoying your computer as never 
before. 

COMPARE - Compare features, 
compare quality, compare value, and 
make the SWITCH U<iay: 
Immediate delivery from stock 



at 



vour dealer NOW for only 

"219.95 

DKAI.RKS Yqu (^k. con 
make The SwUh. 
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THE ASSRIBIY IINE 



by William Barden, Jr. 



"When we fast left our 

wimpy hero, the Color Computer, 

he. . . was trying to pass an argument. . . " 



Last month we covered some prelimi- 
nary ground on the use ot machine 
language subroutines in the Color Com- 
puter. This month we'll complete the 
course and send you your gold-embossed 
Certificate of Completion for 6809 
machine language programming. 

When we last left our somewhat wimpy 
hero, the Color Computer, he had suc- 
cessfully run some machine language 
programs and was trying to pass an argu- 
ment to the machine language subrou- 
tine. As we tune in this month, we con- 
front the floating-point accumulators. 

There are two floating-point accumula- 
tors in page of RAM (locations through 
255). They are designated FAC 1 (loca- 
tions 79 through 84) and FAC 2 (locations 
92 through 97), Each of these is six bytes 
long. They hold floating-point numbers, 
numbers that represent a form of "scien- 
tific notation." Let's review what we know 
about scientific notation. . . 

Scientific Notation 

Scientific notation uses a mixed num- 
ber and power of ten to represent any size 
number. A somewhat standard form for 
Basic is shown by this example: 1 .2E -h 1 0. 
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A 10 is taken to the 10th power, or 
100,000,000,000, and multiplied by 1 .2. The 
actual number represented is 120,000,000, 
000. Negative numbers can also be 
represented, as in 5.333E-5, which is 
1/1,000,000 X 5.333 or .00000533. 

To convert any number to scientific 
notation form, move the decimal point to 
the right of the first significant digit and 
count the number of places. The count 
becomes the power of ten, either positive 
(original number greater than one) or 
negative (original number less than one). 
The following are examples: 

12345 = 1234, 5E + 1 = 123.45E + 2 = 12.345E + 3 = 

1.2345E + 4 

.0000234 = 0.000234E - 1 = 0.00234E - 2 = 0.0234E - 3 = 

0,234E-4 = 2-34E-5 

The advantage of scientific notation is 
that arithmetic operations can easily be 
carried out on a range of numbers. 

Basic uses a modified form of scientific 
notation internally for floating-point num- 
bers. In place of powers of 10, powers of 2 
are used. In place of a mixed number, a 
fraction is used for the mantissa. To see 
the form used, we'll use still another ma- 
chine language program with a Basic 
driver. 

Program Listing 1 shows the machine 
language program. Let's go through the 
instructions step by step: The first two in- 
structions store A and X as before, into 
$2000 and $2001. $2002. The next instruc- 
tion loads the B register with six, B is used 
as a loop counter tor six passes through 
the loop. 

The next Instruction loads the Y register 
with a value of $2003, This value points to 
the $2003 area. The LDA instruction loads 
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Program Listing 2. Basic Program to Display FAC 
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the memory location pointed to by the X 
register. Since we entered the subroutine 
with X pointing to the FAC area, the first 
byte of the FAC (79) will be loaded into A. 
The plus sign means that the X register is 
incremented by one to point to 80. The 
STA stores the A register contents Into 
the location pointed to by the Y register. 
Since we just loaded Y with $2003, the 
contents of 79 will be transferred to $2003. 
The Y register Is then Incremented by one 
by the plus sign. 

Next, the count in B is decremented by 
one to five. If the count is not equal to zero, 
the loop is again executed. Each time 
through the loop, one more byte will be 
transferred from the FAC area to the 
$2003 area, until all six bytes are trans- 
ferred. (We used six bytes on blind faith 
from the Extended Color Basic manual,) 

The Basic driver is shown in Program 
Listing 2. This program transfers the 
decimal data form of the machine lan- 
guage code to the $2009 through $201C 
area. (The $2000 through $2008 area is 
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CENTRONICS 739 L 

With Graphics and 

Word Processing Print Quality 




• IB X 9 dot rratiix; suitable for word 
procesEing • Undarliring • proportional 
spacing • righl margin justification • uflf 
lypolace • eaiOO CPS • 9'.V Pin 
Feed'Fncnon faed • R«vars0 Platan • 
son 32 columns* Top otfofiTi 

CENTRONICS 73»-1 (Parmllal) iLisl S96b $725 

CENTRONICS 73»^(Ser(al| (U«tS10l6> flIB 

QflAPPLERTM Appla gnpti'ca Irtarfac* tlW 



ANADEX 





Dot Graphics. Wide Carriage 



• 11 X 9 dot rrairU. lower case descen- 
der» • Del resolution grapriica • Bt- 
direciiorai, logic seeking • Up to 200 

l' CPS * HS 232 Serial A P*rallei • Fornns 

^* conlrol • X-ONfX-OFF • Up to 6 part 
copy. 

ANADEX M01 lUei$l660} »Cali 

QNAPPLn^''' Apptographktinitrfaca S16S 



VISTA — C. ITOH STARWRITER 



Daisy Wheel Lattar Quality 
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reserved for A, X and the six bytes of FAC.) 
Next, the input X command is executed so 
we can use various values in the USRC 
call. 

After the USRO call is made with X as 
the input argument, the area from $2000 
through $2008 is printed. Typical values 
are shown in Fig. 1. 

The first value represents the contents 
of A coming Into the machine language 
program. It is always zero, indicating a nu- 
meric (rather than string) value. The next 
two values are the pointer in X coming into 
the machine language program. X always 
points to location 79, the FAC. 

The next six bytes represent the num- 
ber in floating-point format. The first byte 
of this is the power of two plus 128. What? 
The 128 bias is used to simplify arithmetic 
operations on the floating-point number, 
and additionally, to cloud programmers' 
minds. Look at an input argument of one. 
The exponent value is 129. A value of 
1 29 - 1 28 = 1 , so the power of two repre- 
sented is one. 

The next four bytes are the fraction. An 
input value of three, for example, has 192 
or 11000000 for the first byte, followed by 
zeroes. The fraction is therefore .110000 
OOOOOOOOOOOOOOOOOOOOOOOO. {The frac- 
tional powers of two are 1/2, 1/4, 1/8, . . .). 
The floating-point form of three is there- 
fore 130- 128 = 2= X. 11 =3. The fioating- 
point form of 100 is 135-128 = 2'' 
X. 11001000=1100100=100. 

The last of the six vaiues is the sign of 
the fraction. A value less than 128 is a 
positive sign, while a value greater than 
127 is a negative sign. (This byte is a 
signed eight-bit value representing - 128 
through -t- 127 in two's complement form.) 
Fig. 2 shows representative negative 
values for the FAC. 

That is the format of numbers held in 
the floating-point accumulator. This does 
not mean we must work with floating- 
point numbers in the machine language 
subroutines. As a matter of fact, most pro- 
cessing will not be using floating-point 
numbers, but simple integer numbers that 
can be held in 16 bits. Why then the inter- 
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face to floating-point numbers— Only 
God, Radio Shack, and Microsoft know 
the reason. This USR call is similar to the 
Model II, which also uses a pointer to a 
floating-point number. The Models I and 
III, however, pass only 16-bit integer 
values, which, to my mind, is much more 
convenient. 

INTCNV to the Rescue 

Reading on in the Extended Color Basic 
manual, we find it's possible to call a ROM 
subroutine named INTCNV, which will 
convert the argument to a 16-bit value. The 
code in Fig. 3 shows this. JSR$B3ED calls 
INTCNV with X pointing to the FAC. The 
INTCNV subroutine converts the floating- 
point value in the FAC area to a 16-bit in- 
teger value and puts It in the D register 
(the A and B registers taken together). The 
STA stores A and the STB stores B into lo- 
cations $2000 and $2001, respectively. 

Program Listing 3 is the Basic driver for 
these four Instructions, The equivalent 
data values are first POKEd into locations 
$2003 through $200C. The argument is 
then input, and a USRO call is made. After 
the call, locations $2000 (A) and $2001 (B) 
are printed. Fig. 4 shows the A and B 
values after the INTCNV conversion. They 
represent the values in the USRO call. The 
numbers are signed 16-bit values, in which 
the most significant bit is the sign 
(1 = negative, = positive). 

The two bytes make up 16 bits. To find 
the equivalent binary value, write the first 
value in eight bits, immediately followed 
by the next value in eight bits. 1 17, 48, for 
example, becomes 01110101 00110000, If 
the sign bit is zero, the number is correct 
as it stands -117,48 represents $7530, 
or 30,000. If the sign bit is one, change all 
the ones to zeroes, all the zeroes to ones, 
and add one to get the negative value rep- 
resented (138,208 becomes 10001010 
11010000, with the sign bit = 1). "Com- 
plementing" produces 01110101 00101111, 
and adding 1 gives a final result of 
01110101 00110000, or 30.000. negated. 

INTCNV is one way lo pass an integer 
value to the machine language subrou- 



STA 


$2000 


B7 


2000 


183,32.0 


STX 


$2001 


BF 


2001 


191,32,1 


LDB 


#5 


06 


05 


196,5 


LDY 


#52003 


loeE 


2003 


16.142,32,3 


LOOP LDA 


,X + 


A6 


80 


166,128 


STA 


,Y* 


A7 


AO 


167,160 


DECB 




5A 




90 


BNE 


LOOP 


26 


F9 


38.249 


RTS 




39 




57 


Program Listing 4. 





JSR 


$B3ED 


BD 


B3ED 


189,179,237 


STA 


S2000 


B7 


2000 


183.32,0 


STB 


J2001 


F7 


2001 


247.32,1 


FITS 




39 




57 


Fig. 3. INTCNV Example 



AfiGUriENT- e 

a 

ARGUf1EM= 1 
B 1 

ARGUriENT- a 
B 3 

arguhenT' jwea 

AHGOflEMT- 32747 

127 25S 
ARSUneNTi-l 

255 255 
ARSUflENT— 2 

25S IS* 
*RSUMEMT— 3BBBB 

1313 2m 
ABGUtlE N T — 327 68 

12a 



Fig. 4.A + B Values after the INTCNV 
Conversion 



tine, albeit a somewhat roundabout way. 
Another way would be simply to POKE an 
eight-bit or 16-bit value into dedicated 
memory locations and then have the ma- 
chine language code pick up the value di- 
rectly. This would work well for multiple 
arguments. Make certain the dedicated lo- 
cation is in the protected area of RAM and 
does not overlay the program area. 

Passing Siring Arguments 

How about the case in which the argu- 
ment passed by the USRn call is non-nu- 
meric? A non-zero value In A Indicates a 
string argument will be passed. In this 
case, X will not point to the FAC area, but 
will point to a string parameter block. 

The string parameter block Is shown in 
Fig. 5. It is made up of five bytes. Byte is 
the length of the string, up to 255 bytes. 
Byte 1 is reserved. Bytes 2 and 3 contain 
the address of the string. This may be in a 
Basic statement for strings, such as: 100 
A$ = "SUCH STRINGS AS. . ." or the ad- 
dress may point to the string storage area 
at top of (non-protected) RAM. Byte 4 is 
reserved. 

This column is loaded with programs. 



BYTEO 
1 

2 
3 

4 




string Length 


Reserved 


Address 


Of siring 


Resented 







Fig. 5. String Parameter Block 
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but I suspect you (and I) need all the 6809 
programs we can get- Program Listing 4 
sliows another machine language pro- 
gram built along the lines of preceding 
ones. It stores A in $2000, X in $2001 ,$2002 
and the string parameter block in $2003 
through $2007. 

The Basic driver lor this machine lan- 
guage wonder is shown in Program List- 
ing 5. As before, the data values repre- 
senting the machine language code is 
transferred to $2008 through $201 B. A test 
string of $A is entered and passed to the 
program via the USRO call. The output 
argument B$ Is a dummy string rather 
than a numeric variable. 

After the USRO call the string starting 
address SA is picked up from the param- 
eter block copy at $2005, $2006. The value 
of A, X, and the parameter block is printed. 
SA Is used to print the length of the string 
by a series of PEEKs, shown in Fig. 6. The 
first entry of Fig. 6 shows an A value of 255 
{string variable), an X value of 31,149 
(8085 = string parameter block location), 
and the five bytes of the string parameter 
block, length 22, string location 63, 129 or 
16257. 

The same scheme as above can be fol- 
lowed to find the location of Basic text 
strings. This Is a handy feature if the ma- 
chine language subroutine is searching or 
sorting strings, or if the strings are dum- 
my strings containing data other than text, 
such as multiple arguments to be passed 
to the machine language processing. 

Using VARPTR 

We now come to a confusing paragraph 
in the six pages on the use of VARPTR. 
VARPTR in the other TRS-80s will point to 
a variable, string parameter block, or the 
first element of an array. For example: 

tOOB = VARPTRlAA| 
110C^VARPTR(ZX(0)) 
120D = VARPTR(S$} 

will set B equal to the location of variable 
AA. C equal to the location of the first ele- 
ment of array ZX, and D equal to the loca- 
tion of the string parameter block of string 
S$. 

As it turns out, that is exactly the way 
VARPTR works in the Color Computer. 



233 31 1*9 22 SP 63 233 B 
STRING ADDRESS- 16341 
STRING- TAHDV TOWERS OVER ALL' 

233 31 1*9 3e a3 IBl 9 

STRING ADOResa- i63e<' 

ETniNG-n*i/£ vcm HUGGED voun cc »<>Dnvi 



Fig. 6. String Parameter Block format 



](M DATA iB3.32.e. i91.3;.l. I?e.^.le.l*2,32.3.i66. i;-e.li7, 16C'9a. 38- 2*9.57 

ieb DeFU5Re<'tK2eee 

120 FOR i-<(H::eee to khI'SIB 

13a READ A 

i^e POKE i.A 

I^Q NEXT ] 
IbB INPUT A* 
172 B*~USR(DlA«j 

iia FUR i-i,H2oae to u*29a7 

288 PRINT PEEMIM 

218 NE>T [ 

1'20 PRINT 

7d» PRINT -STRING AIJ[)IIESS-'!Sft 

2«e PRINT -STRING-" 1 

25B FOR 1-1 TO PeEI<im2«W31 

268 PRINT CHHHPEEKISA*I-1 ) 1 ! 

778 NEXT I 

2BB PRlNTtPRINT 

:'9e GOTO ibe 

Program Listing 5. Basic Driver tor String Anaiyzer 



SAVE 

BIG 

BUCKS 



Model II 64K $3395 

2MI60 1 Drive Exp $1014.00 

26-4161 2 Drive Exp 1559.00 

26-4162 3 Drive Exp 2099,00 

26-4530 Scripsit II 259,00 

26-4512 Profile II 159.00 

26-451 1 Vwicaic II 259.00 

26-4501 On Ledger 179,00 

26-4506 Mail List 72.00 




MODEL III 

26-1061 4K I $ 599.()0 

26-1062 16K III 8.59.00 

26-1066 48K III 

W/2 Drives. RS 232 2225.00 

26-1162 1st Drive 76.5.00 



IDS PAPER TIGERS 

Dot Resolution Graphics quality print 

IDS 445(; 7 wire printhead. graphics (List $ 985i $ 795.00 

IDS 460G 9 wire printhead, graphics (List 10941 886.00 

IDS 560G9wir«, wide carriage, graphics. ..(List 13941 1129.00 



Model I 

26-1140 Expansion Interface $249,00 

26-1141 16K Exp. Interface 359,00 

26-1 142 32K Exp. Interface 469,00 

26-1145 RS232C Board 84.00 

26-1160'l Mini Disk Drive 419.00 

28-1563 Scripsit-Disk 79.00 

26-1566 Visicalc 83.00 



PRINTERS 

26-1167 9^2 Line Printer VII ,... $360.00 

261166 Line Printer VI 1080.00 

26-1158 Daisy Wheel II 1798.00 

26-1165 Line F»rinterV 1710.00 

26-1401 Cable 36.00 



Color Computer 4K $353 

26-3001 4K $353.00 

26-3002 16K Ext. Basic 533.00 

26-.3009 Joysticks 22.50 

26-3010 Color Video 353.00 

26-1206 Recorder 54.00 

All prices are subject to change without notice. Freight, handling, and 
insurance charges are extra. Most items are shipped United Parcel 
Service. Model II and other hardware weighting over 50 lbs. is ship- 
ped freight collect by truck. Certified Check for immediate shipment 
from stock. Master Charge, Visa or Bank Card add Yi surcharge. 

Vern Street Products 114 West Taft Sapulpa, Ok 74066 
The Computer Store, Inc. 4949 South Peoria Tulsa, Ok 74105 

^"' 918-747-9333 



-See List of Advemsers on page A02 
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THE ASSEMBLY LINE 



STA 


S2000 


B7 


2000 


183.32,0 


STX 


(2001 


BF 


2001 


191,32,1 


JSR 


SB3ED 


BD 


B3E0 


189,179,237 


TFR 


D.X 


IF 


01 


31.1 


STX 


$2003 


BF 


2003 


191,32,3 


LDB 


#5 


C6 


05 


198,5 


LDY 


«2005 


108E 


2006 


16.142,32.5 


LOOP LDA 


,X + 


A6 


BO 


166.126 


STA 


.Yt 


A7 


AO 


167.160 


DECS 




SA 




90 


BNE 


LOOP 


26 


F9 


38,249 


RTS 




39 




57 


Program Listing 6. Store A/C/FAC 



The output or VARPTR is a pointer to the 
variable. The Extended Coior manual 
states "X = USRO(VARPTR(A)) passes a 
pointer to the variable A." It isn't quite as 
easy as picking up the pointer in X on en- 
try to the machine language subroutine 
thinking it will point to the variable. 

For a USRn call with a numeric call, the 
X register always points to the FAC area 
at location 79. That's true even if VARPTR 
is used, as in: 100 X= USRO(VARPTR(A)). 

The pointer is converted from a 16-bit in- 
teger value into a floating-point number in 
the FAC area. If VARPTR(A) is 7988, indi- 
cating that variable A is located at loca- 
tion 7988, the 7988 will be converted into 
floating-point format and put into the FAC 
at 79. To find the VARPTR location we 
must use INTCNV to convert the FAC val- 
ue to an integer value. After we do this, the 
D register (A and B) will hold the address 
of the variable. 

Sure enough, we have another machine 
language program to show you how this 
works. Program Listing 6 stores A into 
$2000 and X into $2001 ,$2002 upon entry 
to the machine language subroutine. 
INTCNV Is called at $B3ED to convert the 
FACX value to integer. The integer value in 
D is transferred to X and stored in $2003, 
$2004. 8 is then ioaded with a loop count 
of five and Y with a pointer to $2005. 

The loop is executed five times. Each 
time through the loop, the byte pointed to 
by X is stored into $2005 through $2009, 
transferring the five-byte variable into the 
$2005 area. At the end of the subroutine, 
we have stored data as shown in Fig. 7. 

The Basic driver for this program is 
shown in Program Listing 7. As usual, the 
data making up the program Is first trans- 
ferred to $200A through $2025, Next, vari- 
able B is input. The machine language 
subroutine Is called by USRO<VARPTR(B)). 
The data in $2000 through $2009 is then 
printed. 

When the above program is run with 
sample values (Fig. 7) for B, we find some 
interesting results. A is always zero, Indi- 



>^a DAI A ie3.3£.eti9it32>i<ie9ii79t237i3i. i.i9i.3;.3. i'*e.5,ifc. I'.r.ai.?, I66.1: 

UB DATA ta7>IA«>''e<38.2«9<57 

128 DEFUERB-mzee* 

130 FOR I=)cH2eiBA TO ftlllB^l 

ii^e READ n 
lae po«E i>A 

160 NEII I 

iva INPUT e 

laa A"U3Ha(VARPTR(e) > 

i9e Fon i-sH2aee ro m^evf 

i-BB PRINT PEEK! II: 
2111 NEXT I 
22a PRINTtPRlNT 
230 60TO 170 



Program Listing 7. Driver for VARPTR Analysis 



eating a numeric variable. X always points 
to location 79 on entry to the machine lan- 
guage subroutine. The next two values are 
the location of B in RAM. The two bytes of 
31,52 are 00011111 00110100, or 7988, the 
location of variable B. The next five bytes 
are the floating-point representation of 
the variable. As the manual states, "float- 
ing-point variables are stored in the vari- 
able table in a slightly different format 
than they are stored in the FAC." 

The format here is very similar to the 
FAC format. There are five bytes rather 
than six; the last byte represented the 
sign in the FAC format. The sign, however, 
can be represented in one bit\ The sign bit 
becomes the first bit in the mantissa, re- 
placing the first mantissa bit. Since this 
first bit Is always a one, we haven't lost 
any information! But why is the first bit 
always a one? 

Every floating-point number in the vari- 
able table is "normalized." Normalization 
simply means adjusting the numtier until 
the first fractional bit Is one, similar to 
our scientific notation normalization; this 
is done by shifting right or left, with each 
shift adding or subtracting one to the ex- 
ponent. The format of variables, therefore, 
has all the precision of the FAC, but is a 
little harder to read. 



S2000 

S2001 
S2002 
S2003 




















X AFTER INTCNV 




S2004 
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t2005 






VARIABLE 




$2006 






FROM 




? VARIABLE 


S2007 
$2008 
$2009 



























Consider the value of B = 100, in Fig. 8. 
The exponent is 135. When the bias of 128 
is subtracted, the power of two is seven. 
The fractional part is 72, or 010010OO 
000. . .00. The sign bit is the first frac- 
tional bit, or zero (positive). When the one 
bit that should be there is added, the frac- 
tion becomes 11001000, or 1/2 -f 1/4 -f 1/32, 
or 200/256. Two to the seventh is 128 and 
128x200/256 is 100. 

Negative values must be two's comple- 
mented as in previous examples. 

When VARPTR is used with string vari- 
ables, the pointer in X is to a string 
parameter block as previously discussed. 

Passing Arguments 

The last page and a half of the six pages 
discuss passing arguments back from the 
machine language subroutine. The Basic 
interpreter assumes that the FAC area will 
hold the argument passed back. 



10OA = USRO(1OO0) 
IIOPfilNTA 



In the above example, A will be set equal 



Fig. 7. Store Variable Program Storage 



e- B 

e B 79 


31 32 a 


e- 1 
e 79 


31 32 129 B a 


B' 2 

B a 79 


31 52 130 e B e 


B- 3 
e 79 


31 5? 130 fc* a a B 


e- itw 
e 79 


31 S2 135 7i a a B 


8=-l 

79 


31 52 129 128 Baa 


B--2 
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31 52 130 I2B CI 
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a a 79 


31 52 135 200 B 


Program Listing 8. Divide by Two 


Program 
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RM(t0f Sfnic* for lacing pag9 ^224- 



Even if you have one of the other versions on the market, 
you'll still consider this program a MUST for your collection. 




A [I'ViSiON or SCOTT ADAMS, iHC- 
BOX 3435. LONQWOOD. Ft »7S0 
C3051 M2-6917 

WRITE FOR OUR FREE CATALOG 
OF ISO PACKAGES 



SPACE INTRUDERS is for the 

TRS80 MODEL 1 & 3TAPE16K 010-0116 $19.95 

TRS-BO MODEL 1 &3 0ISK32K 0120116 $20.9B 

TO ORDER: SEE YOUR LOCAL DEALER. IF HE DOES NOT 
HAVE THE PROGRAM YOU WANT THEN CALL; 
TOLL FREE 1 800 327 7172 (Orders Only) OR WHITE US. 



^fc. 



% 



^«^/ 



'%. 



'!?% 



r% 



BUGOUT 



MODI 




THE ULTIMATE ftOG CATCHE.RI 

THREE POWERFUL MACHINE 
LANGUAGE MONITORS 

UNEQUALLED ASSEMBLY 
LANGUAGE INSTRUCTION 

A few monins ago, we PuDiisUta a lesl version oi 
BUGOUT Trie response was ovoiwhelmingi Wir 
received numerous exclamations similat lo me loi 
lowrng tiom f1 E m Philadelphia 

Alinough I am jusi a beginner al Assernbly 
Machine Language I lounO Ihe program and l>ooli 
exceiier^t I can truly say inal I learned more in iwo 
hours wiih your manual than i was able to team m 
the previous Iwo months t say this wiifi no eiag 
gerat'on Thanks lor an excellent program its 
worth twice the price' 

Now aher considerable e<change o' ideas wilh 
BuGOUT owners, we are proudly introducing the 
loliowing new producls lo complirnent our mitiai 
□llering The p'oOucls shown below wiii provide a 
choice ol power according tfj your neeos 

BUGOUT/BEG 

ir-i! original BuGOuT MONITOR II does most 
iriings t>etter man any other incnitor on ihe market 
An ideal product for the t>udgel-'Tiinded beginf>ei 
who wants lo grasp machine language as rapidly 
as possible with a modest investment 
INCLUDES ONE m BOOK BUGOUT ASSEWBL'' 
LANGUAGE COURSE 

Ord«r No BUGVIT TAPE 124 95 

Order No BUGVIO DISK SJS 95 

BUGOUT/INT 

A" iriyrrnediate ler^ion o' BUGOuT containing 
may. ol !he leaiuies ot SuGOuT'PRO aescnbed 
Delow It 'S 'or ine aeginner who wants an tne 
power he can get 81 an intermediate price, or to- 
those working eiciuSively ■" a t6K environment 
This product II NON-RELOCATABLE and resides 
in h,gh 16K memory The disk aeision overlays 
DOS 
INCLUDES TWO (2i BOOKS ASSEUBLV COURSE 

4 ADVANCED MANUAL 

Order No 8UGV2T TAPE J« 9S 

Order No BUGVID DISK 149 9S 

BUGOUT/PRO 

Tr .' Ultimate rJeOugger We have ta«en tfie 
Dest lOeas trom other monitors comtMned Ihem 
with our best ana the best 'rorr BUGOUT owners 
lo create a truly protessonal aebuggingleatning 
paciiage No other moniio' can give /ou the Men- 
ibiiiiy ease ol operation and POWER oi'ered ny 
BuGDUT PRO BAR NONE' Order the DEMO 
TAPE i' uncertain rou Will become a Deiiever' 
INCLUDES TWO '2i BOOKS aSSEMSLv COURSE 
& ADVANCED MANUAL 

Order No BUGV3T TAPE S64 95 

Order No euaV30 DISK SG9 95 

DEMO-TAPE a'-d DETAILED INFORMATION 

PACKAGE 1 S 00 

Re' ,rc!>t e on pu-chase r>l any BuGOu' -e'Sion 

UPGRADES Irom WO lo V2.0 

at V2.0IOV3.0 119 95 

UPGRADES Irom V1 lo V] 139 95 

Al. iQ'eign orders piaase add S 5 00 

All C O D ar other special handling 

oleaseadd S 5 00 

We accept Maier Charge Viss Money O'Oers c 
Ciec's - 'f/as'Mngion S'a'e 'esidenrs cease add 

5 J°- safes rai 

THE SOFTWABE PLANTATION 

P O SOX «623 

TACOWA WA 98444 

!206> 531 '506 



DEALER INQUIRIES 
INVITED 
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THE ASSEIiBlY IINE 



to 1000, as the Basic interpreter picks up 
1000 from the FAC. 

As I mentionea previously you will prob- 
ably not be working with lloating-point 
numbers in your machine language pro- 
grams. You will typically be picking up 
eight and 16-bit integer arguments, pro- 
cessin'g them, and returning eight or 16-bit 
integer arguments. The question, then, is 
how to return an argument to the FAC. 
Fortunately, INTCNV has a counterpart 
that converts an integer into a floating- 
point number in the FAC. where it can be 
picked up by Basic on the return from the 
USRn call. 

The subroutine is GIVABF, and is locat- 
ed in ROM at $B4F4. A call must be made 
to GIVABF with D (A and B) containing the 
16-bit integer argument to be converted. If 
the argument is only eight bits, A is zeroed 
and B holds the value. 

To see how this works, we have one 
finai machine language program. Pro- 
gram Listing 8 shows how to divide by 
two. INTCNV is first called to convert the 
value in the FAC to a 16-bit integer value in 
D. The LSRA instruction means Logical 
Shift Right A, and shifts the A register 
right one bit position. A zero goes into the 
most significant bit. and the contents of 
the least significant bit are shifted out in- 
to the carry condition code. RORB rotates 
the B register right one bit position. The 
bit in the carry is rotated into the most sig- 
nificant bit of a. and the least significant 
bit of B falls off the end into the "bit 
bucket." At this point, the D register (A 
and B) has been shifted right one bit posi- 
tion, effectively dividing the entry number 
by two 

JSR $B4F4 calls the GIVABF subrou- 
tine in ROM to convert the contents of Dto 
a floating-point number in FAC. The RTS 
then returns. Program Listing 9 Is the 
Basic driver for this program. It simply 
transfers the data values as before, asks 
for input, calls the machine language sub- 
routine, and prints Ihe output value. 

Passing Back Multiple Arguments 

The SIX pages finish with "passing back 
multiple arguments" and cautions about 
the use of string variables on output, 
I don't know how practical it would be 
to pass back modified variables, as again. 



JSR $B3ED BD 


B3ED 189,179,237 


LSRA 44 


68 


RORB 56 


se 


JSR SB4F4 BO 


B4F4 189,180,344 


RTS 39 


57 


Program Listirig 8. Divide by Two 


Program 





itie DATA ieQ> 1 79i 23T>6e<e(i. ie9- iEie> i-A^. '^' 
110 FOR i-ftH.;Bgia 10 AH^eee 

12a READ A 
130 P'jUt l.A 

lie '*iT 1 

i;0 OErLrSRO-SH^BM 

160 itvpur A 

I7IA B:l/ER«IA> 

lee PRINT B 

19a GOTO IbB 

Program Listing 9. Basic Driver tor 
Divide by Two Program 



we would primarily be concerned with in- 
teger arguments. Probably the reserved 
block approach is best here— dedicate a 
block of memory for input and output 
arguments, and use POKEs for input argu- 
ments and PEEKs for output arguments. 
The comments on string use are excel- 
lent, and if the cautions are followed, ma- 
chine language code can process strings 
nicely in sorts and searches. Bear in mind 
that strings, like variables, move! Make 
certain VARPTR is used directly in the 
USRn call; if it is not, a garbage collection 
routine in Basic may have shuffled around 
the string locations. Also tie wary of 
changing strings within Basic programs, 
Basic lines terminate on a zero, and re- 
turning a zero value in a dummy string 
may wreak havoc upon return from the 
USRn call. In general, I wouldn't recom- 
mend using strings for passing output 
arguments. 

It's the End of Him, But Just 
the Beginning tor Us, . , 

A favorite line from a Grade C monster 
movie, , , Yes, "Assembly-Line" readers, 
this is my last column. I've enjoyed writing 
very much, and sincerely appreciate the 
many letters I've received (except for the 
one from Manny, who sent me a 250-page 
listing with a demand to "straighten out 
his eight-dimensional string sort"). You'll 
see me again in some other articles— 
there's a lot of exciting things happening 
and I intend to keep writing. Keep on 
assembling. . . ■ 



The editors of 80 Microcomputing re- 
gretfully say goodbye to Bill Barden as 
author ot "The Assembly Line." The As- 
sembly Line will be l<ept rolling In a new 
column that will begin next month, to be 
written by Roger Fuller ("Supermap 
author). To keep our advanced Assembly 
programmers happy, we are planning a 
new column, to begin in January, which 
will be written by a variety of programmers. 

And we don't plan to let Bill go without a 
struggle. We have him on line tor a feature 
article on Color Graphics, which will run in 
our March Color Graphics issue. 



/^i^"E PROGRAM STORE s^Vit-'^^ls 




By Sparky Starks"rrom Adventure Int. 
A* mercenary and galactic police officer, you 
must maintain the condition and control of all 
parts of your spacecraft. You sit at the con- 
trols while peering out of the digital space- 
view port. Suddenly something appears on 
your screen: is it a Starpirate or a friendly 
merchant ship'' You can't tell yet, and at this 
speed you may have only a fraction of a 
second to make an attack /no attack decision. 

Model I t MI. 16K tape. . . $24. 9S 
Model I disk version $29.95 

MISSILE ATTACK 

By Philip Oliver from Adventure Int. 
You must use your twin silos of ABMs to fend 
off barrage after barrage of enemy missiles 
that rain down toward your cities. As your 
skill increases so does the difficulty and 
speed of this machine language arcade game. 
Watch the skies and may your aim be true' 
MISSILE ATTACK has sound and fast-moving 
graphics galore. 

ISK tspe...$1<).9S 3;K disk...S7D.95 




By Wall t Moncrief from Adventure Int, 
You get a vast lunar landscape, graphically 
depicted in both long range and close up. 
with many choices for landing sites. Choose a 
more difficult site and get more points -- if 
you can land successfully. You have complete 
control of your LEM via main engines and 
small side thruslerS; and a successful landing 
is heralded with a flag raising ceremony. 
Creat oraphics and sound add to the realtime 
challenge and fun. 

16K tape...$1it.9$ 




xxet* SCARFMAN 



From Cornsoft Croup 

Action filled arcade game that pits you against 
the monsters. Race your Scarfman around a 
maie. gobbling up scoring dots. You are pur 
sued by five monsters ■ if you eat a "+" they'll 
lower their eyes and you can eat them, other- 
wise they'll eat you! 

With exciting graphics and sound. SCARF- 
MAN may be played using the keylxiard or 
Alpha Product's Joystick. WARNING . MAY BE 
HABIT FORMING! 
Tape. ..$15. 95 
Disk {specify mod. 1 or I II) , . . $19,95 



VOICE 

Sound Effects 

By Hogue t. konyu from Big Five 
One of the top names in TRS 80 arcade games 
adds a new dimension: voice sound effects' 
It's you against the robots in this fast 
-moving shoot-em up. Electrified Maies and 
the "Flagship" complicate things as you stalk 
the evil androids. 

The inrvovations built into ROBOT ATTACK 
take your TRS-80 near the limits of its capa 
bilities. You MUST see and hear it! 

leK tape $15.95 32K disk S19.95 



INVADERS ,^ SPACE COSMIC FIGHTER 



By Carl Miller from Acorn 

A fast machine language approach to this 

classic land addictive) space game. The 

aliens drop t>ombs. move around, and try to 

overrun your bases. 

You choose the speed, enemy bomb frequency 

and accuracy, and how many shots and bases 

you have. Unlike other games of this type, 

you can move your base and simultaneously 

fire at the invaders. Fun for all ages and skill 

levels, it has full sound effects for even more 

excitement . 

IbK protected tape $14.95 

16K protected disk $20.95 

SUPER NOVA 

By Hogue E Konyu from Big Five 
Asteroids surround your ship. You must slioot 
the asteroids, as well as any of the five types 
of alien spaceships. Use your thrusters for 

full movement and rotation of your ship if 
you are overwhelmed, you can even jump to 
hyperspace' Written in fast machine code with 
superb graphics, this game is CREAT! 
16K tape $15.95 32K disk S19.9S 



By Hogue t Konyu from Big Five 

Terrific sound, graphics and unique chal 

lenges mark this space game a winner' While 

fighting off the alien convoys -- each more 

skillful than the last you must keep track 

of your rocket fuel or risk explosion. Finally 

your space station appears. Can you dock 

immediately, or is the station overrun by 

aliens? Find out by ordering Cosmic Fighter 

today. 

16K tape. ..$15.95 32K disk. . . S19. 95 




METEOR 
MISSION 

2 




By Hogue S Konyu from Big Five 
Six astronauts are stranded on a desolate 
planet. You must undock from your command 
module and maneuver your rescue shuttle 
through the asteroid field to save them. You 
can only save one at a time, and each landing 
burns away parts of your landing sites. 
Order this realtime action game now or live 
with the astronauts' pitiful screams forever. 
leK tape. . .$15.95 3ZK disk. ..$19.95 



By Steven Kearns from Acorn 
Gigantic antimatter rocks appear on the Tac- 
tical Display Screen of your ipacecrsft. You 
blast away with lasers and they just explode 
into smaller chunks. To score in this fast ar- 
cade game with sound, you must destroy the 
rocks. To stay In the game at all, you must 
avoid them! 

To add to your woes, time bombs appear peri 
odically. If their timers reach lero 600M1 
And if that's not enough, the aliens will be 
glad to send out some spaceships loaded with 
antimatter torpedoes. Fire thrusters to move, 
shoot laser cannon. Jump to hyperspace 
anything to avoid the onslaught. One or two 
players can compete, with nine levels of diffi- 
culty. 

iSK protected tape. ..S19. 95 
16K protected disk.. .$19.95 




ATTACK 
FORCE! 



By Hogue E Konyu from Big Five 
Unlike the usual "shoot em ups," Attack 
Force lets you control both speed and direct 
ion as you maneuver all over the screen in 
search of the alien Ramships and Flagships. 
Enemy ships chase you everywhere, and the 
Flagships' lasers can fire in any direction' 
The Ramships can even impersonate your 
spacecraft, so don't look away even for an In- 
stant. Machine language action with sound. 

16K tape.. .515.95 32K disk. . .519.95 



For information 
Call (202) 363-9797 



TO ORDER CALL TOLL FREE 800 424-2738 



THE PROGRAM STORE 

The Program Store carries more than 1000 programs for TRS-80, Apple, and Atari 
If the program you want is not listed here, call us: we probably have it in stock! 
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Now you can easily print 
BOLDFACE, ^i|vl^r 1 in&d text, 
lildkiiiud B's, special chacactets, 
sjpersctipttt <• BiibBcriptB 

(A*^ X ItH! lA.-A l).in(i note! 

By Richard Wilkes from Acorn 
Using your SUPERSCRIPT modified SCRIPSIT 
Word Processor and a compatible printer, you 
can no* underline, boldface, insert tent 
during printout, slash leros, set type pitth, 
subscript and, of course, superscript' You 
can even read your directory and kill fites 
without ever leaving SCRIPSIT. 

Includes drivers for popular printers and 
easy instructions. For TRSBO model I (re- 
quires 32K. 1 drive. SCRIPSIT/LC) or model 
III (requires 32K , 2 drives for initial trans 
fer, model 1 versionofSCRIPSIT/LC). 

SU9.95 




I 



From Soft-Tools 

Computer may not make misteaks. but people 
do. That's *hy you need PROOFREADER if 
you use your computer for word processing. 

In about five minutes, this program can 
check any word processing disk file against 
its dictionary of more than 38, 000 words. Any 
words that don't aqroe with Ihe dictionary are 
listed on the screen and, optionally, to a disk 
file for later retrieval. 

For words words you use that aren't in 
PROOFREADER'S vocabulary, an easy to use 
auxiliary file is provided. Five minutes with 
PROOFREADER can save hours of time proof 
reading. 

Model I, 32K disk ( 1-drive min.) .., 554.00 
Model 111, 32K disk (1 -drive min. ) . .S6U. 00 

QRAMMATil< 

meromi »ti.uNa cmeckinq 



From Aspen Software 

Actually checks your word processing docu 
ment for common grammatical errors. CRAM 
MATIK comes with its own error dictionaries 
which can be expanded to encompass addi- 
tional grammar use of your choice. It will pick 
up errors of usage, wordiness, redundancy, 
punctuation, and much more including use 
of "sexist" termsl It even offers suggestions 
for change. A versatile utility, this program 
belongs right alongside PROOFREADER in 
your word processing toolkit. 



ACCEL 2 

BASIC COMPILER 

From Allen Celder 

Turns your BASIC program into a machine 
languageiBASIC hybrid that may run many 
times faster. Foi* those who plan to sell their 
programs, compiling by ACCEL 2 offers the 
additional advantage of protection the source 
code and REMarks are not included in the 
compiled version. 

Mhile all compilers may require some modifica- 
tion of the BASIC program (usually because 
of improper structuring), we have found that 
ACCEL i requires Ihe least, and even works 
with program "tricks" like string-packing, 
etc. 

ACCEL 2 works with models 1 or III, requires 
a minimum amount of memory, supports cither 
disk or tape (*ith TSAVE. optional at S9.95). 
and does not require extensive rewriting of 
your BASIC programs. Unlike other com 
pilers. no royalty is required when selling 
ACCEL compiled programs. 

Supplied on tape for 16-18K ... 588.95 



PACKER 



From Cottage Software 

Packer's five commands allow tremendous con 
trol over the readability aid efficiency of 
your BASIC programs. Specify "PACK" and 
the program will compress text into multiple 
statement lines. This really speeds Up stor 
age, load, and execution time. PACKER Is al 
so useful in compressing code lo be compiled 
by ACCEL 2 (abovej. 

Also included are four oilier handy utilities. 
"MOVE" lets you relocate program lines, "RE 
NUMB" allows program renumbering, 

"SHORT" deletes unnecessary words and 
REMarks, and "UNPACK" separates multi- 
statement lines lo ease editing. 
I6K , 32K t «aK tape.. .529.95 



BOSS 



By V. Hester from Soft Sector 
This utility is the perfect too! for creating 
and debugging BASIC programs. It allows 
sinqte stepping through the Basic program, 
setting up to five breakpoints within the pro 
gram and tracing of program logic using only 
a small portion of the display screen. With 
BOSS, you can review selected variables 
during program execution and return to the 
program with the display restored. Allows 
storing programs in high memory for later re- 
trieval. For" Level II, TRSDOS, NEWDOS-. 
NEWDOS'80. VTOS. 
Wodel I or III (specifyl tape: SI8.9S 



DDT 



Disk Drive Timer 



s 



0.;! If". 



su.n »s.0D 
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T^ZM T'i.tl in.ll VK! 

.1 ....I....I....I .,..1 

from Disco Tech 

Analyie and adjust your disk drive motor 
speed with a realtime graphic display. Manual 
details use for virtually all popular drive 
units. Avoid the many errors that Improper 
drive timing can cause. All you need Is DDT, 
two screwdrivers and five minutes. 



J? L.'Vi^ 1 na^ LDCs i.nns Lr«."'S ldcs ldos ldcs 



DOS LDOS LDOS I.DOS LDftS LDOS LDOS tDn<; 
l:"-- LLX.-S _, j» j-r -DOS LDC5 LOT. 

'•^ '""'LDOS' ''"*^ ^4 ^°* 

. rx^s ■.■• ^"^ ^^^^ OS LDns Lii; 
'■-i l:-)^ L:t'i LDCS :,tii">i :.rio'; ldhs uw 



■ ■■js l:x>s l>''S loos ldos idos 1-DOs 



From Lobo 

"...LDOS is by far the best disk operating 
system for the Model I TRS 80." 

Paul Wienner, 

June 80-MICROCOMPUTINC 

"...If you are a serious programmer, you 

should have LDOS." 

George Blank, Editorial Director 
September CREATIVE COMPUTING 

A totally new and advanced operating system 
that offers benefits lo everyone from novice 
to advanced system programmers. LDOS 
comes with one of the most complete and well 
written documentation t>ooks ever, wilh 
easy-to-follow instructions to get started plus 
a wealth of supporting information for when 
you need it. This, plus a toll free customer 
service number means that LDOS supports 
you as no one has before' 

Completely device independent , LDOS pro 
vides for routing, linking, setting, and filter- 
ing of the input .'output of a number of 
peripherals. Up to eight disk drives are sup- 
ported in almost any mixture: S", 8", 
single. 'double density, up to 80 tracks, even 
hard disks. 

"Job Control" can end the tedium of repetitive 
keystrokes needed to call up and manipulate 
programs. Once you tell LDOS what it needs to 
do to gel you up and running, il executes the 
series thereafter with a simple command. And 
LDOS notes the date all Files were created or 
modified - even flaciqing files that haven't 
been backed-up after modification. 

We've just scratched the surface of LDOS' 
capabilities, and we'll gladly send you a 
pamphlet that goes into more detail. But 
belter yet, order LOOS now and begin 
enjoying the power that this system will bring 
to your computer use. 

Disk nilh manual: $169.95 
Specify model I or Mi 

BASIC 
Programming Asst. ^,^ 

From Instant Software 

What an aide to the writing and debugging of 
BASIC programs^ With BPA you can list out 
your proaram variables, with a notation of 
variable type, whether each is an array or 
not, and a notation of line numbers where the 
variable occurs. What's more, BPA even tells 
you the line numbers where any variable 
changes value! You can also produce a cross 

reference to all COTOs. COSUBs, and 
IF. .THEN statements for easy visualiialion of 
program flow. Want lo find that last INPUT 
statement? BPA will give all line numbers 
ift^ere selected BASIC keywords reside. Save 
time and frustration by using BPA when you 
program. 



12K minimum («8K optimum) 
Model 1; 51)9.95 Mode! Ill . S59- 95 

Visit our other stores: Seven Corners Center • Foils Church, VA ft W. Bell Plozo • 66O0 Security Blvd. - Baltimore, MD 



Model I disk. ..SI"). 95 



Tape for I6K , 32K & ilflK . . ,$11. 95 



EB3 m TO ORDER CALL TOLL FREE 800 424-2738 



For information 
Call (202) 363-9797 
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THE PROGRAM STORE 

4200 Wisconsin Avenue NW, Dept. Ell Box 9609 
Washington, D.C. 20016 

«-MORE 



MAIL ORDERS: Send check or M.O. for total purchase 
price, plus S1 .00 postage & handling. O.C. residents, add 
6% tax. Charge card customers: include all embossed 
information on card. 



Get th« most from your micro with 
software and accessories from one of 

the world's largest ielections. 



"-_ CALL TOLL FREE 

t^ 800424-2738 



iUjVENTURC 

Prepare yourself for the adventure of your 
life B* this classic fantasy/logic game takes 
you into the world of the Colossal Cave. Your 
computer is your guide as you search for 
treasures, solve puiiles, explore, and avoid 
the dangers that lurk within. 

Complete version of the original Adventure. 
originally written for the DEC PDP-10 In FOR- 
TRAN. The program has been translated to 
bring you all the enjoyment in your home com- 
puter. 

Model 1 , 32K disk . . Jl^t^ '5*^<1 ^ 

SPECIAL SAVE ilO il9,95t(iiij U : i\:^^ 



1 

O 
R 
K 



6y Infocom from Personal Software 
In Zork, the Great Underground Empire, un- 
earthly creatures guard 20 treasures. Bring 
all the treasures back to the trophy case and 
you can leave alivel Vou must pick your way 
through intricate mares, collecting objects 
that may help or hinder you in your quest. 
You may use standard Z-word responses or 
speed things up by using multipart state- 
ments. But keep your wits about you, be- 
cause In Zork, they lake no prisoners! 

Model I, 32K disk... $39. 9S 



^i^^^'^ ASYLUM 

From Med Systems 

You are sitting alone at 2 AM. Your eyes are 
bloodshot as you peer Into your computer's 
screen and cry, "t must be CRAZY!" If this 
has never happened to you, you've never 
tried ASYLUM. It's Med Systems most ambi- 
tious 3-D graphics adventure yet! 

ASYLUM places you on a cot In a small 
(padded7) room. Periodically the Janitor lobs a 
hand-grenade through the window. What you 
do next could mean escape — or disaster. 

leK tape. ..$14.95 



DEATH 
MAZE 




From Med Systems 
A new breed of adventuring! Venture 
through a graphically represented 3-D maze, 
with halls that could dead end - or recede to 
Infinity. Step through the doors or drop into 
the pits. Will you encounter monsters and 
mayhem, or will you be treated to useful ob- 
jects and information? Will you ever get out 
alive? 
1GK tape. ..$14.95 32K disk. . .$19.95 




From Med Systems 

A nightmare of an adventure in graphically 
depicted three dimensions. Corridors stretch 
toward infinity right on your TRS-BO screen 
as you search this maie for treasures. If you 
get the feeling you're not alone, it's because 
you're not! 

You use the arrow keys, plus two-word com- 
mands to move, manipulate objects and avoid 
the many pitfalls (pun intended] that await 
you in Laliyrlnth. 

1«K Tap«...S14.95 

MICROWORLD 

From Med Systems 

One of the strangest adventures yet, with 

wierd-sounding rooms and baffling tools n' 

treasures -- it all takes place inside your 

TRS-80! You're In the keyboard, exploring 

the inner structure. Co from chip to chip as if 

you were a piece of data trying to get from 

one end of the bus to the other. Fascinating 

and instructive. 

ItK Upa.. .$19.95 I6K disk. ..$24.95 

FORBIDDEN PLANET I 

By Wm. Demas from Fantastic Software 

The first TALKING adventure! With skill, 

luck, and tenacity -- and a little help from 

your chatty TRS-80 - you may survive Part 

One of this multipart adventure! You don't 

need a voice synthesizer, this program talks 

to you via the cassette port. And It's a good 

thing It does, 'cause otherwise you'd get 

mighty lonesome on desolate FORBIDDEN 

PLANET. 

4BK dlsk...S39.95 



TEMPL£ 




TEMPLE OF APSHA1 

The first of the DunjonQuest series, and still 
one of the most popular. In exploring over 
200 rooms In the magical labyrinth, you will 
encounter more than 30 kinds of fearsome 
monsters guarding over TO treasures. Some of 
the treasures will help you in your quest, but 
you must stilt watch out for the many mons- 
ters and traps that spring out from the walls 
and shadows. 
ieK tape or 32K disk. ..$39.95 

LOWER REACHES OF APSHAI ; Four more 
levels. Requires above program. $19.95 

HELLFIRE WARRIOR 

Sequel to APSHAI, this thriller gives you four 

levels to explore with sixty rooms each. New 

monsters, new traps, new challenge! 

16K tape or 32K disk... $39. 95 

KEYS OF ACHEREON: Four more levels. 
Requires above program. $19.95 




By Godwin E Knowlton from Acorn 
Not for everyone. One reviewer said, 
"...don't bother with Everest Explorer." 
Another commented, "It holds your attention 
for quite a while and I have yet to get bored 
with it." 

Most people here love It. This is a game of log- 
istics in which you try to lead a team up Mount 
Everest. If your skill, the weather, and luck 
hold out, you'll make it. But remember, you'll 
also have to get back down safely. 
1GK protected tape. ..$19.95 
32K protected disk (with "save game" fea- 
ture) .. .$19.95 

LOST COLONY 

By David Feitelberg from Acorn 
The scene is the world's first attempt at col- 
onizing a planet In deep space. An election 
was held for an economic manager to straigh- 
ten things out, and guess whio won! 

You must either make things better or be 
voted out of office In shame. A remarkable 
simulation, LOST COLONY arms you with maps 
and charts as tools for resource management. 
You assign human and robotic labor forces, 
explore new land, and allocate production 
quotas. Input to the computer Is free form: 
you can use terse commands or full senten- 
ces. A challenging game, LOST COLONY 
might give you Insight into real life manage- 
ment as well. 

16K protected tape. ..S19. 95 
31K protected disk.. .S19. 95 

Prices Sutnoci 10 Change 




ATiAurmH 




From Interpro 
An illustrated adventure for the TRS-flO. It's 
said that °a picture is worth a thousand 
words," and in this program you'll see why. 
While stilt in the classic text-type moid, the 
graphics give you a new perspective and aid 
your sense of direction. This saga of the sea 
contains a 150 word vocabulary and depicts 32 
graphic locations. 

Model I 4eK disk. . .$29.95 

161C tape (Text only. No graphics] .. $11.95 
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^ VOYAGE TO 



NEW 



VALKYRE 



By Leo Christopherson from AOS 
Combine the animation and music techniques 
pioneered by Christopherson with the chal- 
lenge of his first fast-moving arcade game 
and you have VOYAGE TO VALKYRE! 

You speed through a magical maie guarded by 
ferocious birds that swoop down to attack If 
you don't get them first. To list alt the play 
and options of this exciting game would take 
the 16 pages of instruction included. 
16K tape, . .$31.95 
16K disk..,S39.95 

DUEL «N» DROIDS 

By Leo Christopherson from Acorn 
Your 'droid has already learned NIM, so now 
it's time to teach it how to wield a laser sword! 
Starting out as a lowly clown, you teach it 
how to use a laser sword by controlling its 
movements -- advance, attack, even retreat if 
necessary. After training it to be a "Grand 
Master." you enter the tournament against 
the program's skilled 'droid. Revel in the fan- 
fares of the victorious -- or hear the funeral 
dirges of the defeated! Entertainment for all 
ages. 

Protected tape. . .$14.95 
Protected disk. . .$20-95 

Our Most Popular 

Unbelievable Realtime 3-D Graphics! 



FLIGHT SIMULATION 

From Sub -Logic 

The wait is over! If 3-D graphics seem impos- 
sible on the low resolution TRS-80, you 
haven't seen this brilliant program. During 
FLIGHT SIMULATION, you instantly select 
instrument flight, radar, or a breathtaking 
pilot's-eye view. But be sure to strap your- 
self in you're liable to get diizy] 
Once you put in some air time learning to fly 
your TRS-80, head for enemy territory and 
try to bomb the fuel depot while fighting off 
five enemy warptanes. Good Luck! 
Model I, 16K tape.. .$25.00 




NEW 




By Chris Crawford from Avalon Hill 
In this combination computer and board 
game, you control up to eight German tanks 
or anti-tank guns against the computer's 
Russian forces. It alt takes place on the east- 
ern front of WWII and rages through a land- 
scape of forests, lakes, roads, and rough 
terrain. To beat the computer you must 
develop good armored tactics and judgement, 
but have a willingness to take risks. 

16K tape including colorful wargame 

board. . .$23.95 



By John Allen from Acorn 

More features, thrills, and sound than even 
John Allen's famous PINBALL. Once you load 
ASTROBALL into your TRS-80, the arrow 
keys become flipper buttons, the screen 
becomes the play board, and you become the 
"Pinbalt WIzardr" 

A flying saucer, spaceships, meteors, and 
black holes add to the fun as your ball realist- 
ically lings around the board. ASTROBALL 
will have all your family and friends lining up 
for the pinball action and challenge. Five 
skill levels. 

16K protected tape. .. $19. 95 
16K protected disk. .. $19.95 



PINBALL 



£^ 



\J\V/ Dribble 



By John Allen from Acorn 

You have to be fast to keep up with the action 
as you try lo outscore your opponent in five 
minutes of one-on-one baskettjall against a 
friend or your TRS-80 model I or 1 M . 

16K protected tape. . .$|i|. 95 
16K protected disk.. .$20.95 



Game of the Year 



By John Allen from Acorn 

Get your flipper fingers ready for action in 

this real-time, machine language game. 

Lots of sound and flashing graphics make this 
fast action game so much like the real thing 
that you'll have to remind yourself not to 
shake your TRS-80. Choose from five playing 
speeds lo match your skill. Can you beat your 
friends' scores? Will you avoid the infamous 
"Bermuda Square?" Get PINBALL today and 
find out. 

1GK protected tape.. .$14.95 
16K protected disk... $20. 95 

NEW 
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jfo^ PRO- DECATHLON ^rush^^rumh 

*-_.. ~>^ i* Dl^/ By Timothy Smith from Microsoft ^TlCl X_jXlOml3 ! 

J^~^? J ; f* I JL The graphics capabilities you were promised From Envx 1 



^ PIX 
'81 



By Tally Ho from Adventure Int. 
This ingenious program provides a computer 
projection of the winners and point-spreads 
for the 1981 professional football season. 
Each week you enter the current scores into 
this self-modifying program, and it updates 
the strengths and weaknesses of each team. 
Forecasts are designed to become more accur- 
ate as more data is accumulated. 

32K disk. ..$21.95 
Visit our other storvs: S*v*n Cornors 



By Timothy Smith from Microsoft 
The graphics capabilities you were promised 
when you bought your computer are finally 
utilized in this marvelous series of programs. 
Just like the real Decathlon, you compete in 
10 demanding games that encompass different 
forms of running, jumping and throwing. 
Play alone or with as many as eight competi- 
tors. 

You MUST see this system in action. Other- 
wise, you simply won't believe the combin- 
ation of outstanding graphics. fast-paced 
action, nail-biting intensity, and even a 
touch of comedy you'll experience with 
Olympic Decathlon! 

Model I, 16K tape. .$2a.35 32K disk. . $24. 9S 



From Epyx 

It's a monster movie, and you are the mons- 
ter! You can be The Glob, Kraken, Mantra, 
Mechismo, Arachnis, or Coshilla -- or even 
design your own "custom" monster [disk ver- 
sion only). This hilarious action game is 
loaded with graphics and sound as you prac- 
tice your vjllany. With 6 monsters, H cities, 
and 5 game objectives, you get a choice of 
more than 100 possible scenarios. A monster's 
life is not all carnivorous crunching, though: 
The combined resources of the police, 
science, and armed forces are bent on your 
destruction. 
IGK tape or 32K disk.. .$29.95 



Contor- Falls Church, VA A W. Boll Plaza ■ 6600 SMurity Blvd. ■ BalHmor*, MD 



ES H TO ORDER CALL TOLL FREE 800 424-2738 



For information 
Call (202) 363-9797 



MAI L ORDERS: Send check or M.O. for total purchase 
price, plus $1 .00 postage & handling. D.C. residents, add 
6% tax. Charge card customers: include all embossed 
information on card. 
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News From 

KITCHEN TABIE SOFTWARE, INC. 



by David Busch 




The TLS-8E microcomputer— flagship 
of Kitchen Table Inc.— has reached 
full maturity with the recent announce- 
ment by that fictitious firm that a new 
comprehensive line of retrofixes, en- 
hancements and optional repairs for the 
model's design defects will be offered 
later this year. 

The new upgrades are welcomed by all 
serious S-80 buffs. Astute observers will 
remember that as long as Radio Shack 
was able to keep creating cassette load- 
ing modifications, buffered expansion in- 
terface cables and mods, lowercase fixes, 
and other corrections, the TRS-80 Model I 
remained a popular, viable product. It was 
only after the computer was semi-perfect- 
ed it became necessary to introduce the 
Model III and a corresponding new round 
of debugging. 

So I viewed with great pleasure the 
213-page addenda, errata and corrections 
manual arriving at my home late last 
week. It meant the United States' only 
Z79-A-based microcomputer was gaining 
new ground. I quickly sifted through the 
mass of data to glean the items of most in- 
terest to 80 Microcomputing readers and 
put through a collect phone call to KTI to 
ask for clarification on a few points. Here 
are the results of my research. 

A Trip to Sr) Lanka 

The most important offshoot of the 
modification campaign is the institution of 
a brand-new network of authorized repair 



service centers for the TLS-8E. My Tandy- 
loving friends crowed about how simple it 
is to take their computers to their local 
Radio Shack for repair. After little more 
than an hour disconnecting cables and 
unplugging AC cords, they can cart their 
portable, 97-pound microcomputers for a 
session with diagnostics specialists. My 
TLS-8E, my friends point out, has to be 
shipped to the KTI factory in Sri Lanka just 
to replace a fuse in the power supply. 

No more. Qualified, independent ser- 
vice shops throughout the nation have 
t>een recruited by KTI. Each repair center 
is supplied with a free TLS-8E technical 
manual, exploded drawings showing how 
the computer looks after it has exploded, 
and a hot-line number the service techni- 
cian can call at any time— night or 
day— to find out the correct time and 
temperature. 

An intensive training course, conduct- 
ed by telephone, ensures each authorized 
repair center has at least one person who 
can recognize the TLS-8E on sight as a 
computer. 

Having nearby service can be extremely 
comforting. In my town, repair is offered 
by Vito's TV Sales & Service. Last week I 
had to take my TLS-8E to replace a defec- 
tive fuse. I went back the next day for an 
estimate, and they told me they'd have to 
send away for parts. Now, that's what I 
call knowledgeable, fast service. 

Your local repair center can install any 
of the following mods for you or if you can 
tell the business end of a soldering iron 
from the handle, you can do the work 
yourself. 

Many of you have been highly vocal in 
your complaints about keyboards in- 
stalled in the early TLS-8E units. For some 
unknown reason, a significant minority 
prefer the QWERTY key layout found on 
some other computers and many office 
typewriters. 

To meet these needs, KTI has introduc- 
ed an expansion keyboard for the TLS-8E. 
It can be described in one word: huge. In 
addition to a full complement of keys silk- 
screened with the usual alphanumeric 
characters, it has a bunch of other keys 
with their tops obscured with masking 



tape. I found strange markings under the 
tape: QPOUNDER/CHEESE, FF, LGCOKE, 
FILET and BMAC. 1 couldn't figure what 
these special function keys or the cash 
drawer located under the keyboard could 
t>e used for. Then it hit me: KTI had clever- 
ly bought a bunch of surplus keyboards 
from some supplier and recycled them for 
lucky TLS-8E users. 

Name That Tune in Five Bytes 

Those of you who elected to stay with 
the stock TLS-8E keyboard haven't been 
forgotten. Kitchen Table has introduced a 
pair of modifications of interest to you. 
The first is a keyboard debounce kit. It is a 
jar of rubber cement and a foam rubber 
pad which can be glued to the bottom of 
the keyboard. 

More practical is a sound-feedback kit. 
When installed, the mod produces a tone 
when a key is pressed. This lets the user 
know an entry has been made. A clever 
touch has been added by KTI. Each key 
depressed produces a different sound, so 
users with perfect pitch can determine 
which key was hit without looking at the 
keylabel. 

This innovation introduces some inter- 
esting possibilities. Typing in certain key- 
words produces recognizable bits of 
song. For example, entering "print using" 
generates the first two bars of Johnny 
Carson's theme song. "On error Goto 
1200" produces the opening measures of 
Beethoven's Fifth Symphony. My family 
and I spent an entire evening playing a 
game we invented: "Name That Tune in 
Five Bytes." 

I discovered, by accident, how the in- 
verse procedure works. By referencing 
sheet music and entering the tune at the 
keytward, some interesting program lines 
result. Barry Manilow's "Mandy," yields a 
pretty nifty data base management pro- 
gram. I invested two days inputting Han- 
del's "Messiah," and found it produced a 
Basic version of "Mystery Fun House." 
Quite a revelation! 

17-Jewel, Swiss-Made 

Another hardware defect in the TLS-8E 
has been the lack of a real-time clock. The 
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system has always had its own internal 
clock— even if access was denied to the 
user. Because the TLS-8E has this internal 
clock, It would seem a simple matter to 
make it available to the user. However, KTI 
has offered a hardware solution: an add- 
on clock. The unit Is described as the only 
■■17-jewel, Swiss-made real-time clock 
available for a microcomputer." I plan on 
adding this feature to my TLS-8E as soon 
as it becomes available. 

A second generation of TLS-8E ROMs 
has been introduced by KTI. They reduce 
available memory by 255 bytes and add no 
new features. The firm has also unveiled a 
new, one-chip ROM nearly Identical to the 
previous version in function, but with com- 
pletely new jump vectors to the ROM rou- 
tines. Our usually reliable KTI source ex- 
plained this change was made to confuse 
programmers who Insist on using undocu- 
mented addresses in their software. 

The latest ROMs, with the routines 
shuffled in an interesting manner, were in- 
troduced for two reasons, KTI reports. The 
company has a new SUPERDUMPMAP II 
It hopes to sell to all SUPERDUMPMAP I 



owners. In addition, Kitchen Table has 
found the previous ROMs had an alarm- 
ingly short shelf-life and needed to be re- 
programmed at Intervals. It seems the Sri 
l-ankan factory thought ROM meant Re- 
member Only Momentarily. 

I won't go into the other retroflxes and 
modifications. They are obscure changes 
of interest to only a few TLS-8E users. 
One, for example, provides a means of 
Isolating the CRT chassis from the 
keyboard. Even a non-hardware type like 
me can see the CRT is already isolated 
from the keyboard. In fact, nothing con- 
nects the two at all, except for few feet of 
wire and ribbon cable. Why bother with 
this one? 

Red-Blood»d American Modifications 

My recent talks with KTI personnel in- 
dicate the company is firmly committed to 
improving both Its hardware and software 
expertise In the future. The firm is not rely- 
ing totally on the design skills of its Sri 
Lankan factory team. Several of the new 
modifications were developed by red- 
blooded Americans. And the KTI double- 



density board (The DOUBLOON) was de- 
signed and built by a KTI shipping clerk 
who gained considerable electronics 
knowledge by building three HEATH kits 
(including his own color television that 
can predict the weather.) 

With dedication like that, I have nothing 
but the greatest confidence in the future 
of an innovative firm like Kitchen Table 
Inc.H 
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Will you SCARF your way to 
victory? 

Can you avoid the speedy MONSTERS that 
guard the maze? 

Answers to these questions await the brave, who 
dare to enter the maze where the monsters live. 
SCARFMAN is a new arcade game for the TRS-80' 
by the author of MiSSILE ATTACK. Written in 
machine language, SCARFMAN features quality 
GRAPHICS, SOUND, REAL TIME MONSTERS and 
hours of ENJOYMENT. Nine progressive skUl 
levels make the game more difficult as you get 
better. SCARFMAN is compatible with Alpha 
Product's joystick. 
Do you have what it takes to reach skill level 9? 

ORDER NOW! 



The Cornsoft Group -^es 

6008 N. Keystone Ave., Indianapolis, IN 46220 (317) 257-3227 
Model I & III tape — 16.95 Model I disk — 20.95 Model III disk — 20.95 

Prices include shipping and handling 
Checks, Money Orders, VISA and MASTER CARD accepted. 

( TRS-aOis a Tandy Corpoiklion tridvmwh) ■'■-,- 
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PEN ULTIMA TE 
Space War Game 

is HERE! 




TRS-80 
Moden & 3 
16K and up — Tape 
010-0102 $24.95 

32K and up — Disk 
0120102 S29.9S 
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A DIVISION Oh St:OIT ADAMS. INC. 



BOX 3435 • LONGWOOD, FL 32750 • (305) 662-6917 

ORDER FROM YOUR FAVORITE DEALER 
or CALL TOLL FREE (800) 327-7172 
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5!7 ACCOUNTANT 



by Michael Tannenbaum C.P.A. 



If the microcomputer suffered from 
an image problem, it doesn't now. 
The Great Computer Company IBM has 
joined Tandy, Commodore and Apple and 
spawned a microcomputer. Suddenly, 
small computers are now legitimate. Pres- 
tigious publications like the New York 
Times and the Watt Street Journal are run- 
ning feature articles on the coming revo- 
lution in personal data processing. For 
those of us who have been participating in 
the data-processing revolution, this is 
heady stuff. After years of defending our 
"clever little toys," it is difficult to re- 
strain a triumphant grin and cheery "I told 
you so." 

Unfortunately, these new small com- 
puters complicate the market. Instead of a 
small selection of microcomputers avail- 
able from a limited number of vendors, 
there will be an abundance of devices 
available from any number of major re- 
tailers. For people selecting a computer, 
this market will be a strange and confus- 
ing place. 

The Competition 

An early question will be: Compare Ra- 
dio Shack equipment to IBM. Based on ini- 
tial information, the IBM two-disk system 
will cost more than a Model III with about 
the same capacity. The cheapest IBM unit 
will be three times the price of a Color 
Computer with the same capacity. No per- 
sonal computer configuration compara- 
ble to the Model 11 is available from IBM. 

Can the IBM Personal Computer meet 
the requirements for successful business 
installation? The Great Computer Compa- 
ny has the resources and skill to market 
its product successfully. A problem will be 
selling the unit through retailers, not di- 
rectly to the user. The firm will lack the 
short communication channel between 
vendor and consumer proven important in 
correcting problems in Tandy hardware 
and software. 

It will take time for IBM and other new 
vendors to overtake Tandy's lead in appli- 
cations software. The some 300,000 com- 
puters sold by Tandy have created an 
enormous market. There is also a large 
amount of user-designed software avail- 
able. It is safe to say there is a program for 
almost any need for Tandy equipment. 



Aware of this, IBM and other vendors 
have announced their hardware is com- 
patible with the CP/M operating system. 
Almost all CP/M software will be usable 
on these new computers. This will no 
doubt make CP/M the defacto standard 
for microcomputers and encourage an ex- 
plosion of new CP/M applications. 

That explosion should not affect Tandy 
models. Those products are CP/M com- 
patible, although the Models 1 and III are 
limited due to their read-only lower memo- 
ries. That restricts available memory and 
could disqualify those models from some 
CP/M applications. The Model II has none 
of those limitations and functions effec- 
tively in CP/M. 

It is a data processing axiom every new 
piece of computer equipment requires a 
settling down period until the kinks are 
worked out. Veteran Model I users recall 
the early days when TRSDOS was flaky 
and the central processing unit often lost 
contact with the expansion interface. 
Every session was a new and uncertain 
adventure. Purchasers of new IBM equip- 
ment will no doubt go through a similar ex- 
perience. They will be unable to go directly 
to IBM for assistance; they must return to 
the primary vendor. If he or she cannot re- 
pair the computer, the owner may have to 
send the machine to an authorized repair 
station at his or her expense. 

Although the record of Tandy's repair 
centers has not always been good, at 
least they are in place. There have been 
enough problems and upgrades in Tan- 
dy's 300,000 computers to build a knowl- 
edgeable national repair staff. Tandy's 
philosophy calling for the repair cen- 
ters to support the retail operation bene- 
fits the customer. A retail store manager 
is an important ally when a repair center 
can't fix the problem. 

At this point, I believe Tandy prod- 
ucts are still a good choice for anyone im- 
patient with the problems linked to new 
computers. 

New Mailing List Program 

This month's software mailbag includ- 
ed MAIL-X from Micro Architect Inc. The 
system from the Arlington, MA firm in- 
cludes a report writer generating up to 10 
report formats applied to the data base. 



Each format specifies the report's name 
and filtering criteria used to limit the rec- 
ords accepted for printing. The report writ- 
er includes four sort fields to arrange data 
in proper sequence. 

MAIL-X has a greater capacity than Ra- 
dio Shack's MLS II. The Micro Architect 
product can pack up to 3,200 records on a 
disk (10,000 on a four-drive system) and 
files can span disks. However, MAIL-X 
does not interface with Scripsit, Radio 
Shack's text editing program. 

The system from Tony Row's firm is 
also more flexible than MLS. MAIL-X can 
be set to Indicate the dates of a record's 
creation, expiration and last time refer- 
enced. Using this feature, the Micro Archi- 
tect system can act as a data-base man- 
ager for a subscription fulfillment system. 
If you select the expiration date option, 
the system will automatically enter a date 
365 days in the future when a new record 
is added. To provide an audit trail, the 
system offers the option of creating a new 
data entry log in the file maintenance 
mode. This printout is essential to pro- 
cess inquiries from subscribers. 

The system also offers more flexibility 
than MLS when defining file formats and 
record sizes. Field sizes and names can 
be altered allowing the program to be 
used for other list-processing applica- 
tions. I adopted the program to control 
equipment deliveries during installation 
of a large data-processing system. 

Micro Architect's long experience with 
Radio Shack hardware is apparent in 
MUTIL, one of eight programs in the sys- 
tem. This file utility can extend the size of 
a data base, delete bad records, append 
files and change passwords. 

I found moving from program to pro- 
gram in the system difficult. Unlike MLS II, 
this system is a series of unlinked pro- 
grams. Some menus are present, but of- 
ten a program can only be called by return- 
ing to TRSDOS and executing a do-file. 

Each program signs on with an initiali- 
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zation menu and options list. After going 
through this sequence many times, the 
sign-on protocol becomes annoying. This 
system needs one-time initialization and a 
transfer fiie. It parameters need to be 
changed, the routine in the transfer fiie 
could be called up and changes made. All 
sign-on parameters should be satisfied by 
the transfer tile. 

I cannot comment on the system's doc- 
umentation; i received an early reiease of 
the system with a preliminary manual. 

i did not have time to enter a iarge 
enough data fiie to test the sort-merge 
features of the system. This routine is 
calied when a fiie is greater than available 
memory. The largest file I tested was 
about 70 records. With a file that size, the 
sort is almost instantaneous. 

MAIL-X requires a more knowledgeable 
operator than the ^4LS II. However, an ex- 
perienced Model II owner should be able 
to work with the system without difficulty. 
Since the programs (with the exception of 
the sort) are in Basic, the user may cus- 
tomize them. The code is well-written and 
easy to follow— even a file layout is pro- 
vided for the programmer. ■ 
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LENGTH 12PAK 24 PAK 

C05 69c 49c 

C-10 79c 59c 

C-20 99c 79c 



LENGTH 12 PAK 24 PAK 

C-30 1.19c .99c 

C-60 1.49c 1.29c 

,C-90 1.69c 1.49c 
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MICRO-80' INC. 

E-2665 BUSBY ROAD • OAK HARBOR, WA 98277 



-ATTENTION ALL TRS-80^ OWNERS— 

No mailer how your Model 1, II, or III is used, whether it be busmess 
or pleasure, this product can benefit you. 

The FATJGUE FIGHTERtm reduces the operator fatigue 
(irritated, watery eyes and headaches) caused by the harsh white 
video display thereby making computer use more efficient and/or 
enjoyable. The graph at the right will help explain how it works. 
Superimposed on the standard eye sensitiviiy curve is the band pass 
curve of the FATIGUE FIGHTERim as recorded by a 
spectrophotometer A marker is also on the graph al the ideal 
psychoiogKal tolerance color. As you can see, the green color of the 
FATIGUE FIGFTFERtm takes advantage of both eye sensitivity and 
psychological tolerance to make the display less irnlating. 

The FATIGUE FIGHTERim is madeoftough -Rinchlhickafrylir 
sheet which adds absolutely no distortion or fuzziness to the display 
and IS industry proven to be an excellent material for optical filtering 
(eg. lenses for laser safety goggles). It installs easily on al! three 
TRS-80* models with a pressure sensitive adhesive which wilt not let 
the filter fall off yet allows easy removal if necessary. Finally, t he black 
and silver border design makes it a perfect match for the computer 
styling. 

If you want a FATIGUE FIGHTERtm of your own but prefer not 
to order by mail, check with your local computer stores to see if they 
have them in stock. Otherwise follow the ordering instructions below. 

TO ORDER' ^"<i **'"<* ^'^O^'t^UatiwOtirlifnnVim't^hCbickotManti 
' Ori)«r|US FUNDSilor SI?9S ticMncludIng snippkifl Cinadiin 
Orderi )<ld tl .00 ticn M\ omi Fortlfln hderi kit t?X Each ta< 
Shtptilng NO tREQir CARD ORDERS CODi lUS.OnDERSaNLTjwt 
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Yellow Orange 



SOUTHERN INNOVATIVE DESIGN 
1520 NORTHEAST 12TH STREET 
GAINESVILLE, FLORIDA 32601 ^zt3 
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-See Lisi at Aave'iiseis on page 402 



80 Microcomputing, November 1981 • 65 



J!9NEWS 



Xerox, IBM storm market, 
pull wraps off their micros 



Xerox and IBM have challenged the 
hold Tandy/Radio Shack, Apple Com- 
puter Inc. and Commodore International 
Ltd. have on the small business micro- 
computer market. A 16-blt microcomputer 
selling for $1565 and a data and word pro- 
cessing system with multiple work station 
options have been Introduced by IBM, 
while Xerox' 820 desktop model has word 
processing, printer and software options. 
Both companies are competing for the 
small businessman, who Is, In many 
cases, a first-time computer user. 

Thus far Tandy's reaction to their new 
competition has been blase. "I don't think 
we're going to lose any business because 
of it," says Jon Shirley, vice president of 
the Fort Worth, TX, firm's computer 
division. 

Though Tandy won't release sales fig- 



ures, market analysts estimate they hold 
atraut 25 percent of the personal comput- 
er market, with Apple of Cupertino, CA, 
garnering about 22 percent and Nor- 
rlstown, PA-based Commodore 20 per- 
cent. Shirley says about 96 percent of 
their Model II units have been sold to 
small businesses. 

What can Xerox and IBM offer the busi- 
ness user that Tandy cannot? Both com- 
panies have a respected service network 
and a sales force with many contacts In 
the business world. Their micros are also 
compatible with other company products. 
They will compete with the Model II, but 
the question Is how much and how soon. 

These new machines "will not have an 
Immediate effect," says market analyst 
Al Hirsh of Datapro Research Corp., Del- 
ran, NJ. Hirsh feels that the new com- 




puters will have the swiftest Impact on 
Tandy's major accounts because their 
competitors have so many business 
contacts. 

Other marketing people think the new 
computers— particularly the IBM per- 
sonal computer— will affect Apple com- 
puter's sales more than Tandy's. "The 
IBM personal computer is aimed smack at 
Apple," because its price and capabilities 
are similar, says Gerald Hallaren of the 
Yankee Group, a Cambridge, MA, market 
consulting firm. Nonetheless, all three 
new computers will be marketed with the 
small businessman in mind and are bound 
to cut Into Tandy's share of this boom 
market. 

Dalamaster 

At almost $10,000, the most expensive 
of the new competitors is the IBM Data- 
master, but experts don't agree on wheth- 
er the cost will affect sales. Some think 
the IBM name will be enough to sell the 
system. David Folger, a consultant with 
International Resource Development Cor- 
poration, Norwalk CT, thinks Datamaster 
will be bought by "people willing to spend 
more money than they have to." 

"IBM's cashing in on their reputation," 
agrees Stan Green of Datapro. He con- 
tends users are willing to pay $5,000 to 
$6,000 more for an IBM product based on 
the Armont, NJ, firm's reputation alone. 

Consumers will pay a base price of 
$9830 for a single IBM computer work sta- 
tion and an 80 character per second print- 
er. The computer features 128K of RAM 
and 112K of ROM. The terminal display Is 
the standard 24 by 80 and features upper 
and lowercase and five character sets, in- 
cluding Nordic and Spanish. 

The system's dot-matrix printer Is bi-di- 
rectional. A second printer Is available at 
$3200. To achieve letter quality printouts, 
IBM uses a strike-over mode that reduces 
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speed to 40 cps. This option costs $3500. 

Single or dual disk drives are available 
and users can add another disk unit to the 
system. Each drive contains 1,1 mega- 
bytes of storage; when the 5246 disk unit 
is added, each work station will have 4.4 
megabytes of storage. Total memory with 
two work stations is 6.6 megabytes. 

What IBM considers the system's most 
attractive feature is the ease additional 
work stations, disk drives and printers can 
be added as a company's business grows. 
Up to four printers (and two disk units) can 
be used with two work stations. 

The Datamaster also comes with a 
word-processing option ranging from 
$i100-$2200. The circuit card costs $600 
and the software is $500. It the user wants 
a letter quality printer, it's $1100 more 
than the 80 cps printer. 

Smaller IBM 

IBM's smaller personal computer offers 
many of these features at a much lower 
price. The standard system includes 16K 
of memory, keyboard, cassette jack, 
speaker, and Basic language interpreter. 
IBM has made it easily adaptable to word 
processing. There are 10 keys for scrolling 
and editing; an upper and lowercase dis- 
play; and a dot-matrix printer option with 
page spacing and column skip. The printer 
runs at 80 cps and features 12 type styles. 
Easywriter, the word-processing soft- 
ware, is a comprehensive text editor 
without automatic hyphenation, repagina- 
tlon or scrolling. 

A 64K system with single disk drive and 
3 display costs $3005. A full business sys- 
tem, including two drives and a printer, 
costs $4500. 

Up to 256K RAM is available, with 40K 
ROM; up to two disk drives can be at- 
tached with 160K per disk. An RS-232C 
asynchronous adapter hooks the system 
to data bases and other computers. Be- 
cause the personal computer uses the 
CP/M operating system, a host of pro- 
grams are available for it, including the 
Visicalc financial package, Peachtree 
Software's accounting programs, and 
communications software allowing ac- 
cess to data bases and other computers. 

Xerox Entry 

Xerox" 820 computer also supports the 
CP/M system and has word-processing 
capabilities. Though less powerful, its fea- 
tures are strikingly similar to IBM's— a 
96-character ASCII format with a 10-key 
numeric pad; dual 92K byte single-sided 
mini-floppy Shugart disk drive; and stan- 
dard 64K RAM with 4K ROM. A dual RS- 
232C port connects printers and other 
communicators. Xerox is pushing the 



daisy-wheel Diablo 630 printer as an 820 
option; the $2995 printer is bi-directional 
with 40 cps letter quality output. 

Their $495 word-processing package 
has a long list of features. Text editing 
functions include global find and replace, 
standard insert and delete, auto return 
and a command moving copy from file to 
file. Text formatting includes pagination, 
headers and footers, reformats, tabs, mar- 
gins, auto centering, justification and su- 
per- and subscripts. 

The Key 

Software will be the key to whether 
these systems are marketable, says Kar- 
en Horowitz of the Venture Development 
Corp., Wellesley, MA. "People won't be 
buying 64K memories, they'll be buying 
solutions to problems." 

Since IBM's Datamaster fs not CP/M 
based, the firm is offering its own 
business accounting package— for a 
whopping $6150. The six program pack- 
age includes billing, accounts receivable, 
accounts payable, inventory accounting, 
payroll and general ledger. A unique 
feature of the package is the ability to 
enter information from one program and 
have it automatically transferred to an- 
other without re-keying. 

Another software package. Brads Ml, 
will soon be available. It's designed for 
unique business applications like sales 



analysis, and costs $1 145. An IBM spokes- 
man said he was confident people would 
be writing software for the system. 

Though the Datamaster's software is 
more expensive, some say the small busi- 
nessman would rather pay the extra price 
in exchange for adequate user support. 
Hirsch of Datapro praises the IBM soft- 
ware package for its Integration and says 
many first-time users prefer company- 
backed software to dealing with third- 
party distributors. 

With the Datamaster and personal com- 
puter so far apart in price range, there's 
also the question of their competing with 
each other for the small business market. 
But marketing experts seem to agree the 
two will appeal to different camps in the 
business field. 

"The type of guy who keeps his own 
txjoks will go for the personal computer," 
says Hallaren of the Yankee Group. Larger 
businesses with a txiokkeeper or two 
would be better suited to the Datamaster 
because "it's fantastically easy to use" 
and has multiple work stations. 

Others say the personal computer Is 
the more attractive of IBM's offerings. 
"The Datamaster Is over priced (and) 
there's nothing technologically advanced 
about it," says Hirsch. The personal com- 
puter, on the other hand, has word pro- 
cessing and communications links with 
other systems and could even be convert- 
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ed to hard disk. One million of them will be 
sold by 1985, he predicts, whiie after 
50,000 Datannasters are soid by next year, 
the machine will tie "put to rest," because 
of its expense and Incompatibility with 
other units. 

But IBM's promotion of the Datamaster 
will be heavy. They're sinking $3 miliion in- 
to a 90-day television ad campaign, as 
well as a radio and print blitz. 

Different Views 

Experts differ on the Importance of price 
to the small businessman. Some say the 
first-time user is reluctant to make a large 
investment. 'The first-time user isn't go- 
ing to pay that money as readily. He has to 
be convinced of the economic value (of the 
product)," says Francis O'Reilly, an inde- 
pendent marketing analyst in Ardsley, NY. 

An analysis by Venture Development 
Corporation also stressed the "need for 
small businesses to increase profits with- 
out making a large capital investment." 

Both IBM and Xerox have respected 
and recognized names in business cir- 
cles. "Like we used to say In the data pro- 
cessing business, nobody ever got fired 
for buying an IBM computer," observes 
BIshnsy. Their reputation for senrice and 
reliability could hurt Tandy, whose pitch 
for major accounts is "in its Infancy," 
HIrsh says. 

Sales Approach 

Ultimately, what may matter most In the 
micro market Is not cost and function, but 
how the companies sell and distribute 
their products. The appeal of Xerox and 
IBM to businessmen will be a key factor in 
product promotion. Both are disseminat- 
ing their products In a variety of ways. 
Dallas-based Xerox Is relying on their 
500-strong sales force, office dealers, dis- 
tributors, and 25 outlets. Datamaster will 
be sold via IBM's General Services Divi- 
sion, using 50 outlets and their three main 
product centers— Baltimore, Philadelphia 
and San Francisco. A personal computer 
marketing organization has been set up 
within the Data Processing Division. They 
also have a mammoth sales force. 

Because it costs IBM $100 every time a 
salesperson calls on a customer, the com- 
pany is establishing seminars bringing 
clients to the company according to 
Hirsch. Whether these seminars will ac- 
complish as much as visits to customers 
remains to be proven. 

Retail Outlets 

What's new for both companies is the 
use of retail outlets to distribute their pro- 
ducts. Xerox will sell the 820 at retail 
outlets such as Computerland; IBM is sell- 



ing Its personal computer through 200 
Computerland stores, five Sears, Roebuck 
and Co. business machine stores, IBM 
product centers and a sales arm of its 
Data Processing Division. 

But retail stores may not be the best 
way to reach the small-business owner. A 
VentureOevelopment survey Indicates on- 
ly a small percentage of users bought 
their systems at a retail outlet; an even 
smaller percentage of potential users 
would consider buying a retail computer. 

Apparently, small businessmen— par- 
ticularly first-time computer users— con- 
sider company back-up more important 
than any money they save at retail outlets. 
Buying direct through salesmen or com- 
pany outlets appeals to the novice, who 
needs a lot of "hand-hoiding" from the 
company. 

Anticipating this, IBM Is offering com- 
plete service back-up for the personal 
computers sold through Sears outlets. 
Maintainance contracts will cost 13 per- 
cent of purchase price per year. They have 
also set up a toll-free line for Data 
master users. 

How will Tandy's distribution match 
up? With 2,000 dealers, 168 computer cen- 
ters and 4,800 retail stores, they've pretty 
much got the field covered. They also 
have some direct accounts sales people, 
though this Iscertainly not their strongest 
point. Shirley of Tandy thinks their retail 



units are the key to escaping the influx of 
IBM and Xerox. "They're selling them in 
stores where they sell Apples and PETs," 
he says, theorizing those two producers 
wilt feel the brunt of the competition. 



Micro Versus Mainframe 

Though they are making a healthy stab 
at the micro market, both Xerox and IBM 
may have problems divorcing their micro- 
computers from larger office products. 
Marketing analyst O'Reilly says IBM must 
alter its marketing approach to maintain 
all its product lines. "I think IBM should 
divide itself like an amoeba." to accom- 
modate microcomputers. However, he is 
skeptical of their mass market capability. 
"I don't think IBM has had any experience 
in high volume production." 

O'Reilly also questions Xerox' credibil- 
ity because of their abrupt withdrawal 
from the mainframe business several 
years ago. At that time Xerox bought Sci- 
entific Data Systems, whose mainframe 
product had an "esoteric" application, ac- 
cording to Xerox spokeswoman Marcie 
Williams. Xerox' forte is mass production, 
not customized products, she says. The 
new 820 blends in much better with their 
mix of office products. 

Both corporations have worked hard to 
fit the micros into larger offices as well as 
small businesses. Datamaster and the 



IBM micro's nitty gritty 

Computer boasts speedy microprocessor 



The new IBM Personal Computer is 
a machine designed for business, 
school, and home use. This is the low- 
est-priced computer system IBM sells, 
with prices ranging from $1565 to 
$6300. 

Standard equipment includes: a de- 
tachable 83-key keyboard; a cassette 
tape jack; five expansion slots for addi- 
tional memory and display, printer, 
communications and game adapters; 
built-in speaker for music program- 
ming; automatic self-test of com- 
ponents after power-on; an enhanced 
version of Microsoft Basic; 16K 
characters of user memory; and a high 
speed 16-bit microprocessor. 

The system can accept two 5.25- 
Inch disk drives. The memory Is ex- 
pandable up to 256K bytes. Either a 
monitor or a television with radio fre- 
quency modulator may be used to pro- 



vide a display of 25 lines of 80 charac- 
ters per line. 

Software already available for the 
IBM Personal Computer includes: a 
disk operating system; a Pascal com- 
piler; CP/M and the USCD p-system; 
VisiCalc; general ledger; A/R; A/P; a 
word processor; Microsoft Adventure; 
and communications software to use 
the optional RS-232C asynchronous 
adapter. 

Service for the IBM Personal Com- 
puter will come from IBM and from a 
nationwide network of authorized 
dealers. 

First deliveries of the IBM Personal 
Computer are scheduled to begin in 
October. ■ 

by Bruce Metzger 

Data Processing Manager 

Wayne Green Inc. 
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TEXAS COMPUTER SYSTEMS 



Offers Lowest Prices on 



FOR PERSONAL BUSINESS 
OR ENTERTAlNMErfT 

Color Computer 

4K Level I $319 
16K Level I $439 
16K Extended Basic $489 

With TCS Memory: 

16K Level I $369 

16K Extended Basic $449 




TEXAS COMPUTER SYSTEMS 



Offers Lowest Prices on 



Expansion Interfaces 

Zero K Interface $254 With TCS Memory: 

16K Interlace $359 16K Interface $318 

32K Interface $469 32K Interface $388 



Epson Printers $Gall 

lill«' Quliily matdi onnltr Us luli soltwire contTot d! 40. 30. 66 (x U? column) SO cps Mi'tCIionil 
tT]c1(H leM. dispouD'e pnplhud tSOO'lcsi injr neirntcomiMtitivearinie: Lsis SH6 ClU tor out 
low price 

MX-80 Tractor Feed MX-100 Graphtrax, Friction 

MX-80 FT Friction and and Tractor up to 15 " 

Tractor wide. 

Graphtrax for MX-80. MX-80 FT, graphics option. 



SOFTWARE 

EPSON MX-80 

PRINTER DISKETTE 

A LOiioieTe diskeiie tviii b i nnoieie iiip* lor use 

'e.iai '0 use 

M/CMD- SecoiiionrieEosorPtinrefcixrnanas 
!o lie D'liier f.-ectly ircm DOS o' as pari ol a.T mK 
Eoolifig sysierT Sel liC ■"? p'mtei f'om [K)S 10 trie 
rvoesT^.e -itj A.iiil '•'■('• 'jf 11^ D'Ogram 

BIGLETT/BAS ■ P'MlC" ■i'oe gra^hK: Wieis o" 
yoijrO"nter.i''ilinre'i Ourriitlt ielTe'S 'Jimr-'e: ar 
:o 0(5k Allows ;> P Keren' 5i;p IpllefS 10 Ihg cinrler 
PipgramrimeniiO'lven Vou mjv^lsocorslrucliacge 
Idle' tillesto' WFRGEing mlo your C^sic ptogram 

f PSOH/SUB Merge Ihis '^mjll module iitD any 
B^vc prog'ar" aid lien i55Lie jny al ine D'lnlei COf- 
■".!r<;5ft!!P J ?lelif'CD"r^^nni*ili!eite'5'Bcresen 
ling ^^e cu'oose oi ifle commanO YOi newt lol ie*e' 
Mck inO lorW Id oocumeilalion Eit'er^f ly essv ^o 
use and makes using the oun'e'' ""JCi eas*! :'i" 
eve' tie 'ore 



jm MTCH Ir»s parcres NiWOOS ? i i"a 
'lEiVDOS SO SO :rai 're JKl tunctujr aiM prml tw 
'ftSB0 5'ao'iics«'iiiel^ep'inie"e''uiisinirie sMn 
flaril mode rathei ihantne THSMmooe Tris ain>*5 
ill ol Ihe leal u'M oMrie prmiei [oWusMt>utv3i.can 
aiimp fhe sceen 1u the p-intBr at any iiire willi hN 
qiaofiics 

DEMO/BAS A super tutorial program wilh nun 
Dreflsol REMs and fiundredsol screen prompliifial 
leacfi yOu Ixm easy it is to create miractet wil'i your 
Epson M»80 0'inle< 

LABCL/US- CjStQiT iaOel rruiimg program ir- 
cluOirg grap^ICS Makes cjsta-n rrail^rig labels an 
easy rob 

DfFSTATE/SUB A series ol one word p'lnif 
cpmmanas Ifiai can oe merged mlo any Ba'^n Pro- 
grams thai allow vanous aulomatii; lunclions in oc 
cur Print [illes with graphic borders around ihfm 
ftilfi one «ord Center anv ip.l wild one cor>im,inO 
etc 

Special Price All seven ol ihe above 
modules on one diskette or on tape ( less 
JKL) for your Model I or III for only 
S29.95 



COMPUTERS 




Model II 64K $3288 

An excellent compuler tor your business 
needs Easy expandability & compatibility 
No format operator training needed All ac- 
cessories available— disk expansions, 
printers, software, at our low discount 
prices Our fas!, fully insured air freight 
service can assure mosi deliveries within 
seven days after payment is received 



Corvus Hard Disks $Call 

5 10 W JO r-wqatjyles 0( Storage fw 1M ModeH li Or i:i Iftt car cor'igj'e a sysler-i 'w you wilti e'thet 
TRSDOS *iEWDOSBC wCP'Mlorone.or sweralcwnpuierssharingasing^riardOr'.esin-jiiar^ousiy f» 
exarripie Iron i laSMooelll s may share a Single large dala base Mithtr>e Corvus Cixisle'lahO'^MulifMiiei 
This also afows you lo use Oitlerent manufaclijrefs computers on ihe same hard disk system at »ie same trne 
Also Ills Apfx Soperbram A'losatd mosiolber cwnputers As your Dusiness grows aOOilionalsiorageaid 
termiiuls may be added easily inexpensively Why wailmonlhs lor other spipmises^Wecahdelrveilbese 
reliable prmen hard disk systems NOW' Corvus has SC'd and shipped ten limes more hard dnves lor 
iTKrocompijlers than all ir«ir competilors cocnb'ned Can w lor tba lowail price! 



MICROSOFT 

BASIC-U Fi'c'rded disk Sasic long vaii.ibie 
n^"-e' (.nainina .■ nabieienginrerords ANSicom 
pataD'e ^iie-tpreMtive version SIM w/mumwU. 
SMnanaioiiiT. 

BASIC COHPILtn Sanir Basic ian<ii>.iw ^s 
RA'^ir so eicepl romprles Basil piogiani in(o .1 



fli-'.L'i, •'i-fi. liri'* 'i':!* .ir.inip I'^.^chiiip UiKli..!!]!' 
li* OpeialesJIO lOlmieslasteilh.inreriiii.i' B.isir 
irciirde'. Macio 80 Assembtet Sperily i.PU 01 
TRSrtns UISw/«iMaal.S»iMnMl(ml*- 

FORTHAH-U ■.ii3P0'K*NSIfi(>pluvm,inyp. 
leT.,no^ ,r:( i.<i.'Ki MACPO 80 Hm Wim'v «i"i 
man.ir,ei reiocil-iftle odiecl cumiiiiei and l.iikmi; 
loader S400iN/nianual. SIO manual onhl. 



Of lakeaSiGdiscounlityou buylhis Item wilti purchase of Ihe Epson MX-80 




Model III 16K $835 

Modellll32K$979 
Model III 48K $1089 



TRS-80 



Vfe (lilt III Radio Sfixli comouleii and Kcesta 
■n. ind I nvntbei of other brind computf ittmi 
Oil ui Id youi ipeCilK needi ind |tt I con ol our 
cililct 



With TCS Memory: 
Model III 32K $909 
Model 1II48K$969 



Model III 48K 2 Disk RS232 $2100 
Model 111 32K1 Disk $1729 

Model III 48K 1 Disk $1849 



Word Processor Package $2679 

Includes 2 Disk Model III with 48K, Epson MX 80 Tractor Feed with cable, and 
word processing software ready to operate Lists at $3300 Our low price 
special this month: $2f7l. For MX-80 FT Tractor and Friction, add J99- 



Special -With TCS Memory 
if Model III 48K 2 Disks 

Uses pr(r>cn MPi drives irtodrlied to> Hippy operation and 
Ptrcom (onlroller |im>leO 90 day wtrranly Call lot 

details 



S1895 



Printers 



Daisy Wheel II 
$1695 



Carbon ribbon lypewiiter gual'iy lor wo'd O'lKi'ssing .11 
COS Standard Cer'IrDrics oaralei nlp'la;e Full In" 

mail .rioniOjai sneeis r;. ir.ctoi '"efl iracicr ii^ri 
S?W eilra Fasies' Daisy W"ee a.^'aft: al 'f'S 3'ite 



Line Printer IV $825 
Line Printer V $1599 
Line Printer VI $995 
Line Printer VII $350 



Pocket Computer 
& Ace. SCall 

PKket Computer Prmler 
Interlace in stock 



1 Pa,rr.eni Uwiey Order C3'i''-ier s C^eck Ctriititd 
deck Perscna' checks take 3 wks VISA MC 

aid 3% 



• P'rce; si/ti|ec' to ciarge any ii-ne 

' No lai out ol Slate ieians aoo SV, 

• Delivery subject to avaiiahiiity 

■ SItippinq eilra quoted Oy plione i^25 



TCX AS COMPVTf II SSiSTCMS 

Box 951, Brady Texas 76825 

For fast, efficient service, we can air freight from Dallas 
to maior a/p near you Call for mlormation 

Toll Free Number 800-433-5184 

Texas Residents 817-274-5625 



-See Usl ol Advertisers an page 402 
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Xerox 820 are compatible with other com- 
pany products. 

The Datamaster, which many feel Is a 
redesigned version of the lii-fated 5100 
series computer, features business level 
Basic compatible with the IBM System/34. 
Also available is an $875 software pack- 
age that converts 5110 and 5120 Basic to 
Datamaster Basic. 

Local Networks 

Xerox' 820 can be used with Ethernet, 
the company's communications network. 
A user simply needs an RS-232C board 
and communications server. Some manu- 



facturers, including Intel Corp., are work- 
ing on a chip for a direct connection. 

It's also rumored IBM may soon release 
a communications system similar to Eth- 
ernet to be linked with the personal com- 
puter. An IBM spokesman denies this 
however. 

With the business end of the microcom- 
puter market growing the fastest— Ven- 
ture Development predicts it will total $2 
billion annually by 1984~companies will 
have to meet the needs of the small busi- 
nessman. This means cost-efficient sys- 
tems, adequate software, user support 
and ample memory. But to capture the 



brunt of the niarket, companies like Tandy 
must compete for the major accounts 
sales to larger companies. That's where 
Xerox and IBM hit the hardest. 

Everyone but Tandy is taking the en 
trance of these corporate giants serious 
ly. Speculation was rampant on Wal 
Street after IBM's 16-bit personal comput 
er debut. But Tandy remains non-plussed 
Shirley of Tandy contends they have the 
market cornered and "everybody else can 
go fight it out among themselves."! 

by Betty Thayer 
80 Microcomputing staff 



Bill targets computer crooks 

Nelson of Sunshine State takes aim at purloining programmers 



A bill making many kinds of computer 
crime a federal offense has been rein- 
troduced into the US House by Rep. BIN 
Nelson (D-FL). The bill would mobilize the 
resources of the FBI and federal Judiciary 
system to fight the rise in computer crime. 

Known as the Federal Systems Protec- 
tion Act (H.R. 3970), the new bill is present- 
ly before the House Judiciary Commit- 
tee's Subcommittee on Civil and Common 
Law. Hearings have not been scheduled 
on the measure yet. 

The bill is the latest version of a pro- 
posed act sponsored for four years by re- 
tired Sen. Abraham Ribicoff (D-CT) and re- 
ported out of a Senate subcommittee at 
the end of the 96th Congress last year. 

The bill makes it a federal offense to 
use, for illegal purposes, a government 
computer or a private computer owned by 
a firm involved in interstate commerce or 
owned by a financial institution insured 
by the federal government or in the Feder- 
al Reserve System. It also makes acts of 
destruction against any such machines a 
federal offense. 

The bill provides a fine up to twice the 
proceeds from the illegal act or $50,000, 
whichever is greater, and imprisonment 
for up to five years. 

Congressman Nelson represents an 
area of Florida hosting several high-tech- 
nology companies. He sponsored Florida's 
first computer crime legislation while a 
state legislator. That bill, the Florida Com- 
puter Crimes Act, became law in 1978 and 
was the first state law to deal directly with 
computer crime. 

Critics 

Some critics feel the bill In Congress 
will create federal intrusion into what 




should be a state matter and inclusion of 
provisions to carefully monitor any feder- 
al actions on computer crime to avoid 
such problems has not satisfied the critics. 
Others have criticized the lack of a mis- 
demeanor charge for minor unauthorized 
use of a computer. Some programmers 
have argued the bill would make federal 
offenses the use of computers to keep 
track of trawling league scores, print 
Snoopy calendars and the like, common 



applications In many data 
processing shops. 
Others are concerned with 
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KISS 

BASIC 
GOODBYE 

^..^mKf^^^^ Announcing the new quick and easy 

way to write custom business applications 

in hours instead of weeks. 



At last, you can get a microcomputer 
business application development system 
that Is designed for one purpose 
only . . fast production of bug-free 
professional-kxjking custom business 
appttcalions. 

Thinks" Uw Way Bu»lnMs TMnks 

Quic-N-Easi Is the revolutionary screen- 
format-oriented application development 
system that thinks in terms of transactions, 
records ar>d fields. Ttw same way business 
thinks. QuJc-N-Easi expects an application 
to include custom formatted key entry. It 
lets you set up the character, fiekj, and 
record validity checks business wants by 
merely filling in the blanks. It automatically 
signals in real lime when errors occur 
and "explains" what is wrong in plain 
English messages you select for each 
custom application. 

Much FMt«r than BASIC 

Ouic-N-Easl programming is much (aster 
than BASIC because the standard busi- 
ness applications (key input, file handling, 
arKJ output reporting) are handled via 
pre-programmed parameter driven sub- 
routines. To produce finished professional 
looking custom business programs, you 
merely: 

Draw the txjsiness formats directly 
6n the CRT in minutes. 

^ Fyi in the blanks for field attributes. 
valkJations, tables, etc. 

ra Invoke the Quic-N-Easi interpreter 
^ — ' to check fields against tables, check 

limits, access data files, and perform 

business calculatkws. etc. 

•'Sm Utt ol AOimrfmmt on ptg* 402 



H 
H 



rn optionally define file and output 
'—- ' formats right on the screen. 

Paya for lUalf in a Week 

By eliminating the coding drtidgery of 
writing screen, field, file, and format 
programs in BASIC, programnrers are 
free to concanirate on the unk^ue busir^ess 
aspects of each custom applicalkxi. No 
professronal programmer can afford to 
develop one more business apptkatkwi 
without Quic-N-Easi. The savings are so 
significant with Ouic-N-Easi. it can actually 
pay for itself in only one week. 

Ohras You Much Mora than a 
Scraan BiriMar . . . tha Only 
Complata Businaaa Davalopfnant 
System for Microcomputers 

Quic-N-Easi handles the entire application 
devetopment job from key entry to final 
output. You get everything you need, 
including detailed documentation to begin 
writing professional programs the first 
day. You gat . . . 

r;^ A singularly capable QuIc-N-EasI 
' — ' screen builder 

r^ A comprehensive parameter driven 
' — ' Quic-N-Easi content editor 

r^n A full QuIc-N-Easi interpreter 
' — ' lar>guage 

r^l A complete Quic-N-Easi file 
' — ' management system with Index 
Sequential. Random, and 
Sequential File Access Method 

r^ A complete Ouic-N-Easi print format 
' — ' handler 

r^ A detailed Quic-N-Eati reference 
' — ' manual 



TM 



r^ A Quic-N-Eaal seH-teaching guide 
r^ A Quic-N-Easi quk;k refererK:e card 
r^n An interface to other program files 

ORDER NOW— Don't Waste 
One More Day Coding BASIC 

Your time is too valuable to waste hours 
on erxJ writing BASIC code. The first 
week you use QuIc-N-Easi. your finished 
business programs will kx>k better, run 
t>etter. arxJ return rrrore dollars to you. 
Don't delay. Order Quick-N-Easi today. 
Phone ... 215 968-0689 



nuic- n - Easi 

STANDARD MICROSYSTEIMS INC. 

136 QRANrTE HILL COURT, LANOHORNE, PA 19047 

Pricing Information 

a Complete QuIc-N-Easi system $395 

■ Manual only $60 

■ Visa and Mastercard accepted 

■ Deater Inquiries invited 

Minimum System Requirements 

48K • CP/M • Z80 • Ftoppy Disc 

Other Disk Formsts • 8" Single Density 
Vector Graphics • Micropolis Model 2 

Customized Versions • TRS80 Mod II. 
TRS80 Mod III. APPLE, OSBORNE, 
INTERTEC, VECTOR .ZENITH 

Apple, CF/M. IrKenec. UfCiopolis. and TRS80 are 
trademarks ol Apple Computer, Digilal Research, Inierlec 
Data Systems. Micropolis Corp . aixj Tandy Corp 
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the broad definition ot computer in the bill. 
The bill defines computer as "any device 
that performs logical, arithmetic, and 
storage functions by electronic manipula- 
tion, and includes any property and com- 
munication facility directly related to or 
operating in conjunction with such a de- 
vice..." The definition excludes auto- 
mated typewriters and typesetting equip- 
ment, microcomputers and portable hand- 
held electronic calculators. 

Bill supporters have argued a broad def- 
inition is necessary to cover future 
generations of computers. 

Setts a Need 

In spite of the criticisms, however. Nel- 
son believes the federal bill is needed. He 
says the federal government, alone, owns 
more than 10,000 computers. These are 
used, among other things, to pay billions 
of dollars annually to federal workers, de- 
fense contractors and recipients of Social 
Security benefits. 

Private industry has thousands more 
computers handling all kinds of financial 
and sensitive Information. Nelson notes a 
programmer stole $10.2 million from Se- 
curity Pacific Bank in California and trans- 
ferred it to a Swiss bank account with a 
single telephone call. An employee of Kel- 
ly Air Force Base in San Antonio, TX, stole 
$100,000 through false computer billings 
for aviation fuel. A business in Virginia 
stole information from US Department of 
Energy computers in Maryland by tele- 
phone. The total direct financial loss in 
the United States due to computer crimes 
Is estimated at between one and several 
hundred million dollars annually. 

However, Nelson said, no federal law 
clearly covers the use of computers in 
crime or their damage by terrorist-type at- 
tack. The 40-odd federal laws covering 
various aspects of the issue were all writ- 
ten long before computer crime existed as 
a major problem. 

Nelson admits computer crime is a 
small part of the total problem of white 
collar crime in the United States. How- 
ever, he maintains thousands of Ameri- 
cans today are familiar with the strengths 
and weaknesses of computers and have 
both the knowledge and opportunity to 
commit computer-based crimes. For this 
reason, he has reintroduced the bill in 
spite of its less than spectacular progress 
through Congress in the past. 

No Qreat Following 

Although Ribicoff sponsored the bill in 
the last two Congresses and succeeded In 
getting It reported out of subcommittee, it 
was never acted on by the Senate. With 
the start of the new Congress, it would 



have to go back to the subcommittee if 
someone sponsored it in the Upper 
Branch. So far no one has. In the House, it 
never got out of subcommittee, partly be- 
cause the House Judiciarv Committee's 
Chairman, Peter Rodino, Jr. (D-NJ) does 
not favor the bill. Nelson's administrative 
assistant, Jim Southerland, said that situ- 
ation has not changed and admitted the 
bill has not attracted a great amount of in- 
terest in Congress. 

This time around Nelson hopes to open 
communications with concerned persons 
to learn their views on computer crime 
and inform them on the need for the bill 
and its purposes. His office is preparing a 



mailing to government officials, business 
leaders and other involved individuals to 
determine the level of interest and need 
for the bill. Southerland said Nelson 
would welcome comments from interest- 
ed parties. 

Persons interested in the bill can con- 
tact Southerland at Room 307, Cannon 
House Office Building, Washington, DC 
20515. Those interested in contacting the 
Subcommittee on Civil and Common Law 
may write to its chairman, Rep. Don Ed- 
wards (D-CA), and those interested in 
communicating with the full committee 
may address their remarks to Chm. 
Rodino. ■ 



Dartmouth fetes John G. 
Kemeny, father of Basic 



The father of the popular computer lan- 
guage Basic was honored recently by 
the university he has served for more than 
25 years. Dartmouth's John G. Kemeny, 
who last fall stepped down after 11 years 
as the college president, has had an aca- 
demic chair established in his name in the 
mathematics department. 

The John G. Kemeny Parents Professor- 
ship in Mathematics is a $1 million distin> 
guished professorship. The endowment Is 
a gift from three non-alumni parents, who 
have chosen to remain anonymous, and 
given in appreciation of Kemeny's service 
to the university and to the country. 

Pioneering Author 

Kemeny was a pioneer of computer 
time-sharing techniques and one of the 
first educators to recognize the impor- 
tance of computers in higher education. 
His lime-sharing system at Dartmouth be- 
came the model for other systems in aca- 
demic and business environments. In ad- 
dition, Kemeny's Dartmouth Basic found 
great popularity among his students and 
proved so easy to learn it was adopted by 
the computing public as the most compre- 
hensible computer language available. 

Fleeing the German persecution of 
Jews in his native Hungary in 1940, Kem- 
eny came to this country as a 13-year-old 
student. His affinity for mathematics and 
science was soon obvious to his teachers 
at George Washington High School in 
New York City, and by the time of his grad- 
uation, he was accepted at Princeton Uni- 
versity in nearby New Jersey. While at 
Princeton, he was recruited by the govern- 
ment to work on the Manhattan Project at 
Los Alamos, NM. Here, as he assisted in 




the development of the atomic bomb, he 
rubbed shoulders with some of the best 
scientific minds of the time including Jon 
Von Neuman, Edward Teller and Eugene 
Wigner. 

When his work at Los Alamos was com- 
pleted, Kemeny returned to Princeton to 
pursue his doctorate in mathematics. 
While completing his graduate studies, he 
was research assistant to Albert Einstein 
and became an advocate of World Feder- 
alism—a movement for the sensible 
human control of nuclear technology. 

In 1952 Kemeny was recruited by Dart- 
mouth and in two years became chairman 
of its aging math department. As he 
brought new blood into the department, 
he also worked on developing an easy to 
learn computer language. He called it the 
Dartmouth Beginner's All-purpose Sym- 
txillc Instruction Code (Dartmouth Basic). 
During this time Kemeny also set up an 
elaborate time-sharing system for the col- 
lege computer and encouraged under- 
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FED UP WITH PATCHES? 

THEN MOVE UP TO 
PROSOFTS NewScript: 



Easy to -use Full Screen Editing 

Headings, Page Numbering, 

Centering 

Global Search and Change 

Table oi Contents, Indexing 

All 12 MX-80 fonts + underhning 

Itahcs on GRAFTRAX MX-80 

Supports Diablo, Microline, Anadex 



Typehead — never loses 
keystrokes 

Form Letters, Big Documents 
Double Width, Undeihning 
Sub-scripts, Super-scnptst 
Proportional font right-margin 
justification on 737, 739, L.P IV, 
and now R/S Daisywheel II 



' 160 pages oi excellent documentation includes "EZEDIT", "EZSCRIPT", 

self -study tutorial, and hundreds of examples 
' see review in Computronics, July 1981 

* runs under TRSDOS, NEWDOS, NEWDOS/80, LDOS, DOSPLUS 
' Requires 48K TRS-80 with one disk drive Specify Model I or Model III 
TSome features work only if your printer has the mechanical capability. 



No¥fScript 

Nailing Labeb Option 

Special: New Script + Labek 



$ 99.95 
$ 29.95 
$115.00 



RPM measures the rotational speed and variation of your disk drives, and reveals a common 
cause of unexplained errors. Simple one-key operation, runs under any DOS, interchangeable 
between Models I and III. Shows current and average speeds, plus fluctuation history. Recovers 
from severe errors. Documentation explains how to adjust drives. Use RPM monthly for best 
results. 

32-48K Model I or III disk: $24.95 



J 



ft FASTER 





Monitors your BASIC programs while they run, then displays a simple change 
(usually one line) that can reduce run-times by as much as 50%. No hardware 
changes, and handles programs that cannot be compiled! Complex programs 
benefit the most. See review in Personal Computing, May, 1981. 



16-48K Model I or III, tape and disk: 



$29.95 



Order from your Software dealer, or from: 



PRom 




CALL TOLL-FREE FOR ORDERS ONLY: 

(800) 824-7S88. Operator 422 
CALIF: (800) 852-7777, Oper.422 
ALASKA/HAWAII: (800) 824-7919 
FOR TECHNICAL INFORMATION CALL: 

(213) 764-3131, or write to us. 



QUICK COMPRESS 

Small (276 bytes), fast (processes 800 lines in under 3 seconds) 

utility removes blanks and remarks from your BASIC programs. 

Produces smaller, faster programs, and doesn't alter the 

original logic. 

16-48K Model I or III, tape and disk: $19.95 

SPECIAL FASTER -t- QUICK Compress: $39.95 

Dept.C Box 839 
North Hollywood, CA 91603 



OHDERING INFORMATION: We accept checks. Mastercard, Visa, Money Orders. C.O.D. (C.O.D. under 
$50.00, add $2.00), and even cash. Please, no purchase orders. California residents add 6% sales tax. 
Add 15% outside North America. 
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graduates to get familiar with computers 
through game playing. As a result, over90 
percent of Dartmouth's undergraduate 
students had exposure to computers 
before leaving school. 

Storms on Campus 

In 1969 Kemeny was appointed the col- 
lege's 13th president. That year and 
through the early 1970s, his cool style of 
leadership, encouraging dialog rather 
than rhetoric, stood him in good stead 
with students. Though the bombing of 
Camttodia and the killings at Kent State 
University in Ohio rocked Dartmouth as 
they did most other American campuses, 
Kemeny managed to weather the storm by 
suspending classes tor a week, establish- 
ing a series of teach-ins and seminars and 
providing transportation to Washington, 
DC, for outraged demonstrators who 
sought President Richard M. Nixon's ear. 

In 1972 Kemeny wrote the book Man 
and the Computer. In it he argued for a 
new symbiosis between man and ma- 
chine. In Kemeny's view the computer was 
man's key to managing the increasing 
complexity of his future. In the book 
Kemeny also sought to allay the fears ot 
the layman concerning technology. He 
maintained that, if introduced properly, 
man and computer could become fast 
friends and partners in the future. 

The Commission 

Kemeny's best known contribution in 
the arena of popular science is the "Re- 
port ot the Kemeny Commission on the 
Accident at Three Mile Island." Tapped by 
President Jimmy Carter in 1980 to head 
the commission investigating the near 
melt-down of a nuclear reactor outside 
Harrisburg, PA, Kemeny later said, "As we 
looked at the NRG (Nuclear Regulatory 
Commission) overall, our most important 
judgement was that it is an agency hypno- 
tized by equipment. It had a firm l>elier 
that equipment could be made fail-safe, 
and as a result it totally ignored the 
human element in nuclear power." 

For many years Kemeny has sounded a 
similar theme in his work and today he 
contends man, by himself, is unable to 
cope with the extremely complex systems 
he has created. For Kemeny, the compu- 
ter must play a role in helping man cope 
with his increasingly complex world. Kem- 
ney's contributions toward popularizing 
that machine have made coping easier 
and computer literacy attainable for many 
a microcomputerist.B 



by Chris Brown 
80 Microcomputing staff 



News in bits and bytes 
tests waters for future 
of electronic newspapers 



Two years ago if you wanted to read a 
newspaper, you either subscribed to It 
or bought it at the corner store. If you 
wanted to read your home town paper 
from 1,000 miles away, you had It mailed 
to you and read It three days later. Not so 
today— at least for microcomputer 
owners. 

More and more newspapers and news 
services are becoming available to micro 
owners. At least three major databanks- 
CompuServe, The Source and Dow Jones 
Electronic News Service— offer electronic 
newspaper services, and a small Midwes- 
tern newspaper has a public database. 

CompuServe of Columbus, OH, offers 
electronic editions of 10 newspapers: The 
New York Times, WesMngton Post, Los 
Angeles Times, San Francisco Chronicle 
and Examiner, Columbus {Oh\o) Dispatch, 
Minneapolis Star and Tribune, NortorH 
(Virginia) Pilot and Ledger, St. Louis Post- 
Dispatch, Atlanta Constitution and Journal 
and Middlesex News In Framlngham, MA. 

The Source In Maclean, VA, does not 
carry individual newspapers, but does 
carry several electronic newsletters and a 
wire service. United Press International. 
Stories from UPI go into The Source sec- 
onds after being transmitted on the wire. 

The Princeton, NJ-basad Dow Jones 
Electronic News Service Includes access 
to the International Dow Jones business 
and financial wire. This service Is de- 
signed for financial and investment pro- 
fessionals and has been available to them 
for several years. 

Recently, Dow has made the service 
available to the general public and format- 
ted some of the databases for TRS-80, Ap- 
ple and Commodore microcomputers. 

According to Jerry LIpskI, head of com- 
puter services for the Atlanta Constitution 



and Journal, electronic service Is less ex- 
pensive artd more convenient for the 
newspaper but more expensive and less 
convenient to the reader. You can't fold up 
a microcomputer and read It on the train 
home or under a hair dryer, and you can't 
Una a tMrd cage with It. Then there's the ex- 
pense of buying a microcomputer or dumb 
terminal and subscribing to the database. 

For a newspaper, electronic editions 
cut out some of the major costs of the 
business: typesetting, printing and distri- 
bution. They also allow for more flexable 
deadlines, since the database can be up- 
dated instantly. However, an Industry 
source familiar with one of the existing 
electronic news providers said there are 
delays of up to three hours between filing 
a story and Its appearance In the 
database. 

In the CompuServe system, most elec- 
tronic editions are story by story render- 
ings of the day's newspapers. When a 
user asks for an edition, he or she choos- 
es an area of Interest and Is given a menu 
of headlines. After selecting a headline, 
the story appears on the screen. 

Lipski said the Constitution's electron- 
ic edition Is unusual In Its format and 
reason for exlster>ce. It only Includes the 
full stories of the front page and other 
special pages. Most ot the paper's stories 
are summarized In a few paragraphs, as is 
done on radio. The Idea, Upsltl said. Is to 
encourage people to buy the Constitution 
Instead of having the electronic edition 
compete with the paper. 

In addition to news stories, he ex- 
plained, the Constitution database 
includes a guide to Atlwita's hotels, a 
television guide with reviews, a schedule 
of alrllrw service to Atlanta and other 
general Interest ttem8.H 
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Height games 

Simulations eyed during strike 



Reporters looking for a new lead for 
the continuing story of the air con- 
trollers strike hit on microcomputer simu- 
lations of airport traffic controi last Au- 
gust. For awhile, the public read and heard 
about products like O'Hare, a program 
marketed by Instant Software, Peter- 
borough, NH, and Air Traffic Confrollerby 
Creative computing, Morristown, NJ. 

The sudden media Interest In the sub- 
ject apparently started with a newsman 
for the National Public Radio network fa- 
miliar with one of the games. As a result, a 
commentator for "All Things Considered," 
the network's rush-hour news and com- 
ment show, interviewed the author of 
O'Hare. 



Then the Wall Street Journal, in the sec- 
ond section of its August 17 edition, ran a 
two-column story "For Some Would-Be 
Controiiers, Guiding Airplanes Is just a 
Game." After that, things really started 
rolling. 

Marketing Manager Mary Reed said In- 
stant Software and its distributors had 
contact with about 15 major news organi- 
zations including Tirrte magazine and the 
CBS television network. A CBS affiliate in 
Denver, CO, had pictures of the Instant 
Software product, 80 Microcomputing 
and Kilobaud Microcomputing on their 
evening news broadcasts. A major Boston 
radio station ran a four minute telephone 
interview with Reed on the subject.! 



TR8-eO' Mocl»l III 
Ultra Utility for BASIC 
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■ nasi tlm« oiook control 

• Momory oonlrol 

• Spaolal ft a''>P>iloa ahar. 

• Qraphloa •yntltacla 

• BASIC pros'*'" oppond 

• Sound o*norator 

• Holtabl* CSAVI A CLOADT 

• Wmmt data aort 

• I'O routlna 
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IM\/i:OIMIL MAKES IT ACROSS! 




. . JILOH OOn OPBRATIHO BTSmflTOAVOTKKmi 
A VITAL WAY TO PHOTHCT YOUB SOFTWAKB 
IBVRSTMIINT rOS TKt rCTUBBII 

TtLB KM 1MHN. language runs on more (UffBrant Opsr- 
»ung Systoms and more diiBa rent-sized computers ih«ji 
any other Biml! u' language. ForsUrlere, it runs on KCR 
and n rmmcjQrnpmere and, m tiie rmcro Aeld. on iha 

CP/M", UPM=. TRSDO&\ OASIS', U0AfiIS*.ftOd DMIX> 
lOKYX version 1 Operating SyslamB. .to menUon only 
»few 

nntu now. aenous business scAw&re oT trie soope &nd 
flexlbllUjr seen ui Vae mlnlcompuler world tias not tiaen 
available on micros. RMCWIL now allows transfer of 
aucJi software with a m:ninm.-n of ftiss 

We have pttrticip&lod in such a minl-to-jnicro transfer 
of a m%)or set of general busmess software . using RX 
MM m . as the transfer msctMLnlsm, of course. Running on 
literally Lhousantta 01 mimcomptiterG. theee ntflned. 
eiihanoed. and pTOwn software p»ckagB6 cover A/R^A-T. 
G;!. VK, Onler Entry (with Invololng and Inventoiy 
Control ) as well as Sales Ajialysls The packaged define a 
new level of achleveinent for features and flsUblllty in 
micro appllcauona software and offer top quality al a 
reasonable price 

WDr immeaiale information, c&U 714-646- 1983 for your 
complete proiliict descriptions 

. . JLU8 AI.L THB OU), TAMILZAl TAVOBim Uiat 

we oontinuB to ofler. such as: 

Ottoaral Sua Iumm— Client Accounting (C?A Wnie-up) 
FMS^ ( Financial Uodellng SyEtem) 
MAD" ( Name and Aildress ^slsm) 



Baal Snata— REAP i Heal Estate Acquisition iTOgrams ) 

FMS ( Property Uanageraent System ) 

MLS" I lijltlple Ijstlng aystam) 

Health Care— APK- Ai:trj:;a«'i Patient History ; 

Wora ProoB — lag and flyatam Boftwttra— UagK Wand" 

(^RT' 
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fMFSMTTW.THISSOrriWfrE WIU Df FINITELY 

EHHflWTE lOUR CLBRENI OUT* WWCESSW6 
[mfifiM. WKKIN6 PETRIEWftfilLnr. 




and Cytwrnetlcs' torque TRS-60' Mode) H CP/M eCSrlng 
high performance, hard disk support and CP/H com 
patibllity 
Ti«ilamark« aft 

1 - Hi'ar. Uct^rlana Corp £— [ligllat Ftoeu-ch Inc , 3— TKnJy 
CV^rp. 4-Pluae One Systflma. Iric. &— Brll Ttabtphoi^ LabonUor- 
lee. Inc, A— American Buainaas SyBisma. [nc^ y-BauauTtil 
i^Bie:ns Group, Ina, 8— Cybemauitt Inc^O-haohtrwEoftimr*. 
Inc.: 10— CnmpUar ityBWnw. Ino. 
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9041 NEWMAN AVE, SUITE 208 
HUNTINGTON BEACH, CA 92647 



^ S«« L/sr 0/ Advertisers on page 402 
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AMERICAN 



jU^ 



118 SO. MILL ST • PRYOR, OK 74J61 
PHONE (918) 829-4844 



ALL LISTED PRICES ARE CASH DISCOUNTED WE ACCEPT MC, VISA, AND COD (REQUIRES CERTIFIED CHECK, CASHIERS CHECK OR 
CASH] FOR CHARGE ORDERS, PLEASE ADD 3% FOR COD SERVICE, PLEASE ADD !>% 
OKLAHOMA RESIDENTS PLEASE ADD 4% SALES TAX 



52K EXPANSION INTERFACES 
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SPECIAL OFFERING 

Due to a very special purchase. American 
Business Computers is able to offer a limited 
number of Radio Shack' Expansion Inter- 
faces at the lowest price ever 

American Business Computers guarantees 
Expansion Interfaces to be Brand New 
with oriyinai documenlation and in perfect 

working condition 



$555 




HARD 
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DISK DRIVES 

9 MEGABYTES FIXED 

9 MEGABYTES REMOVABLE 

STORAGE FOR TRS-80 MOD II 



Call or write to Amorican Smalf Builnsss 
Computers and let us show you how we can 
give you almost unlimited disk storaga on your 
TRS-80 MOD II. American Business Com- 
puters (ealurei both Cameo and Corvus Otsk 
Subsystems with associated software. Dealar 
Inquiries Invited. 



OTHER STUFF & ODDS - AND - ENDS 



PAPER FOR YOUR PRINTER >'528 
9 1/2 X 11 - Tear-off perforations 
and you have an 8 1/2 x 11 "cut sheet" 

3200 sheets ot 15 pound paper ..$39 95 
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VERBATIM 
DATALIFE DISKETTES 

We feel this is the EESl Diskette 

on the market! 

TRS 80 MOD 1 - 29.95 

TRS-80 MOD H - 49.95 BOy. Of IQ 



SOFTWARE 

TRS-80 COLORCOMPUTER' GAMES 
PACKET MAN 24.95 

METEROIDS 21.95 

COLOR SPACE INVADERS 21. »5 

GAME OF LIFE 14.95 

LUNAR LANDER 14.95 

OTHER SOFTWARE FOR THE TRS-80 

ADVENTURE (DISK VERSION) 

SPECIAL ••■19.85 

OLYMPIC DECATHLON 

(DISK VERSION) 23.00 

NEWDOS80 (VERSION 2.0) 

MOD 1 139.95 

MOD III 139.95 



g/IE^^.:' ssaii^P 



DISGUSTING!! 

That's what we thmk 
about the price of 
most good "Letter 
Quaiily" Printers Our 
Slarwriier iii Bidirec 
Iionai and out "specs" 
the others - hands 
down 
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918-829-4844 



•'^^ HETAILSTOHE— SOUTH WOOD SHOPPING CTR—PRYOR, OK 



ATTENTION: 

GORVUS OWNERS 

American Business Computers NOW 
offers a fully compatible TRSDOS' 
operating system Our Systenn, called 
CORDOS. runs all 10 MB. Revision B 
Corvus drives The Program in this 
package contains a Master Program 
which will convert a user's operating 
system disk (Version 2.0) to an en- 
hanced system capable of the fol- 
lowing : 

— Completely transparent use of 
the Corvus Hand Disk Drive 

— Complete compatibility with 
existing programs 

-All utilities (except Format and 
Backup, which should not be 
used) will operate normally 

Price S300 00 with manual 

-DEALER INQUIRIES INVITED- 

CORDOS Author Andy Frederickson 

'TM of Tandy Corporation 

'TM of Corvus Systems 



COMPUTERS 
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SUPERPRINTER 

THE EPSON 
IV1X-80 




This IS Ihe new Epson MX-80 dot matftx printer. It does just about everything you cogld 
ask a printer to do-quickly. quietly, reliably In fad, for OEM inslallalions, the MX-60 may 
be the single best, all-around printer you can buy But that' s not the best reason to Duy it. 

The MX-80 prmis bidirectionally at 80 CPS in a user-defined choice of 40, 80. 66 or 132 
columns. And if that's not last enough, its logical seeking function minimizes print head 
travel time The MX-80 prints 96 ASCII, 64 graphic and eight Internal ional characters with a 
tack-sharp gig malnx For a long time. Epson printers are known tor reliability and ttie 
MX-80 IS no exception Bullhai'snotthe best reason to buy it. either. 

The print head has a hie expectancy of up to 100 x 10 characters , and when il wears out, 
just tfirow It away A new one costs less than S30 and Ihe only tool you need to change it is 
attached to the end ol your arm The MX-80 is compact, weighs only 12 lbs., and Ihe whole 
unit, including Ihe two stepper motors conlrolling carnage and paper feeding functions, is 
precisely controlled by an internal microprocessor. But even ihal isn't why you should 
specify the MX-80 

The best reason is this because Epson 
makes more printers Ihan anyone else in IF YOU BUY AN MX-BO AND DON'T 
Ihe world, we can atlord to sell each one CHECK OUR PRICE — YOU PAID TOO 
lor a little less MUCH! 



AW...WHAT THE HECK. 

RAM Memory Chips for the TRS-80 Apple and others 



II IS the policy of American 
Business Computers to otter 
merchandise at the lowest 
price possible Several 

monlhs back, we began sell- 
ing RAM Memory Chips for 
Ihe TRS-60 tor $45.00 
per set Someone else sold 
chips lor S44.0D We sold 
Ihem for $38.00 They sold 
them for $37 g5 So we say 
■AW.. WHAT THE HECKi" 
Let's see the other guys 
beat Ihis price. 



$19 



95 



PER 16K SET 



These ch.ps are brand new 
'4116 s" These 200 nano- 
second chips are 'ully 
compatible wilh an TRS-80 
pfoducis Inslruclrons tor 
insertion are included, how- 
ever, Ihe dip shunts required 
lor converting a 4K Model I 
lo a 16K Model I are not 
included at this low price 



OKIDATA MICROLINE 80 



PRINTER - $799 



00 
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The Microime is built on a rugged casi alumi- 
num base to withsiar>d the rigors ol continuous 
business use. II is driven by two motors and 
will run all day with no duly cycle limitations 
MicfDiine printers use a dense 9 « 7 dot pattern 
lo produce cfisp, clean copies, tirst copy to last 
The seven pins in ihe head are 'lired" using 
energy stored m tension members This tech- 
nology permits the use of shorl, low mass pins 
made with an extremely hard alloy The head 
produces less heat, thereby extending its lile 

.«3 THE REST OF THE t 

FAMILY ^ 

OKIDATA MICROLINE B2A - The same as the 
M icroline 80 but pnnis at 120 CPS and has low- 
er case descenders. SSM 

OKIDATA MICROLINE I3A— The wide car 
riage big brother to the microime 80 and 82A 
Features both RS-232 and parallel inlerlaces, 
120 CPS bidirectional printiog. 9 wire print head 
and adjustable lorms length An excellent 
printer lor only $899! 



The EPSON MX-70-S Call 
The EPSON MX-80 FT-S Call 

iTheMX-IOO-SCall 

IALL OTHER EPSON OPTIONS 



IF YOU BUY ANY EPSON | 
PRODUCT AND DON'T 
CHECK OUR PRICE — 
YOU PAIDT O OMUCH! 



Call gi8-82S-4M4 lorpricei. 



-«4* RETROFIT YOUR^ 
MX-80 TO AN MX-80FT 

ADD A PLATEN TO YOUR MX-80 
TO ALLOW USE OF LETTER- 
HEADSOR ROLLPAPER. $69,95 



DIRT CHEAP ...$267 



'TRS-80 MODEL I VERSION 
Comptat* with) PMtar Supply 



But Highly Reliable Yes. our Mini Disk Drives have an estimated 
8000 Power-On-Hours Mean Time Between Failure (That's 8 
Hours A Don. 5 Doifs A Week, for 3.85 YEARS). Our drives also 
feature a lead screw head positioner - not a cheap band-type 
positioner. If you purchase a Mini Disk Drive with a band-type 
positioner, you are buying an INFERIOR PRODUCT! If you have 
any doubts about our drives, our ONE YEAR Warranty should 
convince you that we know this unit is the best drive at the best 
price on the American market This is one example where vou can 
pai/ less and get more. 'tm Tandy corp. 



TEAC DRIVES 



SION J^ 

ACafalnel ^ 
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by Dennis Kitsz 



"When you order Extended 

Color Basic be sure to ask 

for the kit." 



Say, folks, I've got a Radio Shack 
Color Computer, but one that's just a 
little different ... it has Extended Color 
Basic with 32K memory, provides a clean. 



composite video output, and displays up- 
percase and normal lowercase letters. No, 
you can't buy one exactly like it at Radio 
Shack (yet?), but you can have one for less 




Photo 1. Main CPU activity is shielded by a metal cap. and by plate on the underside of 
the board, to prevent radio frequency interference (RFI) with televisions and radios. 



than the cost of an off-the-shelf 16K Ex- 
tended Basic machine. Want one? 

This month's column is a potpourri of 
simple Color Computer expansions I have 
collected over the past few^ months. As 
sold, the machine is a fine investment for 
$400, but for a few dollars more you can In- 
stall Extended Color Basic ($99 from 
Radio Shack), two banks of 16K RAM ($18 
each from non-Shack suppliers), compos- 
ite video ($2, build it yourself), and a plug- 
in character board (about $50, using the 
printed circuit pattern in this column). 

Some folks have suggested that I make 
modifications just for fun. Fun isn't 
enough. When I purchasedtheColorCom- 
puter I was ready to be convinced that it 
needednochangesatall.lt looked like the 
perfect second-generation personal com- 
puter. I anticipated with excitement in- 
stalling my Extended Color Basic and see- 
ing those rumored amazing high-resolu- 
tion graphics come alive. Then i learned 
that Radio Shack didn't want me to install 
Extended Basic {but they would do so tor 
an additional fee); and that the extended 
version required 16K RAM (which they also 
would install at a high price and for an ad- 
ditional fee). 

Atx)ut the same time, i borrowed a color 
monitor from a friend, only to find that this 
beautiful display had no RF input . . . and 
my Color Computer had no composite vid- 




Pholo 2 CPU area uncovered. Circles show 4K/16K jumpers, arrows point to 33-ohm 
resistor connecting SAM pin 35 to the second bank of memory. 



Photo 3. Video buffer amplifier affixed to 
the modulator unit. Dual phono jacks pro- 
vide composite video output. Y-connec- 
tors can be used to drive ten or more 
monitors. 
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eo output. It was back to black-and-white. 
Finally, I tossed togettier a short text edit- 
ing program in Basic, i felt it would be 
more appropriate to write about the Color 
Computer while actually using It. A few 
minutes in front of a screen full of normal 
and reversed uppercase characters con- 
vinced me that real lowercase was the on- 
ly way to go. 



"A few minutes. . . 

convinced me that 

real lowercase was 

ttie only way to go." 



Extended Color Basic 

Reluctantly I filledout my waiver of war- 
ranty (see August Applications), paid $99, 
and waited for my Extended Basic kit. The 
"kit" turned out to be an off-the-shelf Ex- 
tended Color Basic manual and a single 
integrated circuit. When you order Extend- 
ed Color Basic, be sure to ask for the kit; 
don't specify an "Extended Color Basic 
ROM," because that's all you'll get. At 




Photo 4. Arrow shows output jacks sol- 
dered to case of modulator unit (not the 
top). Two solder connections have beer} 
made for strength. 



I BOUGHT IT 

"My biggest loss 
of programming 
time using 
Snappware's 
AUTOAAAP and 
AUTOFILE is 
spent inserting 
my disKette. " 

SC07TAD/1V1.S PRE5 OF ADVtMURt l\n 



When wurKiiiii with dirert files or creaLing d formatted screen. 
Autohle and Automap are indispensible aids. 

Autofile 15 desinned to niitnnnate for the BASIC programmer the 
tasKof moving data elements to and from a direct File. Pre 
viouslg. this was a time consuming chore because the FIELDed 
variables may not be directly referenced by user logic. Tbe FIELD 
statement was eliminated, thereby relieving you of the guessing 
game as to where the FlELDed variable Is. In addition, the CHR$ 
and the ASC function references are performed automatically. The 
software, when installed, becomes part of your BASIC interpreter 
providing the enhancements without additional memory or dish 
space. 

Automap IS designed to automate for the BASIC programmer the 
tasK of presenting information on the video display and accepting 
information from the keyboard operator. The software consists 
of two mam components: the OFF LINE COMPONENT used to 
describe to the system the screen formats and the ON LINE COM 
PONENT from within your BASIC program to initialize a screen, 
send data to the video display and receive data from the Keyboard 
operator. This facility when installed, becomes part of your BASIC 
interpreter providing the enhancements without requmng any 
additional memory or dish space. 

Both products compliment one another and if used in conjunction 
can save up to 7S% of your programming bme. 

If you consider your programming time to be worth money, call 
us and let us show you how to get more of it. 

Automap Model II SI 00.00 

Model m S 75.00 

Autofile Model II S 75.00 

Model III s 60.00 
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Time saving power 
at your NngerNps. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS 

CALL COLLECT: 1513) 891-4496 

3719Mantell 

Cinti. Ohio 45236 



'Sn List ol Advertisers on page 402 



SO Microcomputing, November 1961 " 79 



S^APPtlCATIONS 



least with the Kit they throw In a booit. 

When you receive the Extended Coior 
Basic (ECB) ROM it will be packed in a 
plastic tube or on a piece of foam. Leave it 



there until you install it. The device is 
static sensitive — not as frightenlngly 
delicate as earlier integrated circuits, but 
still be cautious. 
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CASSETTE SERIAL I/O 
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Photo 5. Video output jacks tit between television output and channel select switch. 
Carpentry should duplicate roughly the computer's style. 




Photo 6. Complete lowercase board fits into VDG socket and around support port, and 
rest on banks of RA Ms. When ICs are soldered to the board directly (they are socketed in 
this prototype), the RFI shield cover can be fit back in place. 



Before attempting to install ECB, you 
need a computer with 16K memory. It 
yours is 4K. then order a set of 16K 
memory chips. These should be type 41 16, 
UPD416, or equivalent (generally adver- 
tised as TRS-80 compatible memory ex- 
pansion). Expect to pay about $18 a set of 
eight, but certainly no more than $25. Pur- 
chase 200 to 250 nanosecond (nS) memo- 
ries. These will permit you to operate your 
computer successfully at twice normal 
speed. High speed is a software action, by 
the way, put in effect by entering POKE 
65495,0. A 4K machine will probably hang 
up. A 16K machine might lock up too. 
More later on how to do it. 

The Installation 

When you have your ECB chip and eight 
16K RAMs at hand in their original pack- 
ages—together with a Phillips screwdriv- 
er, a nailfjie, and a 4-Inch piece of alumi- 
num foil — you can begin. First, open your 
computer and flip it over. There are nine 
visible screw holes, but (on the units I 
have seen) only seven are used. There is 
an additional hole under a label which 
warns, "Opening case will void warranty. 
See owner's manual for warranty informa- 
tion." Yes, you will void the warranty if you 
open the machine, so don't proceed un- 
less you are witling to take the risk and 
save over $100. When you open it you will 
find little to damage. Unlike the Model I, 
this machine is not delicate; it is physical- 
ly sturdy and all sections are made to 
unplug, snap apart, or unscrew. 

Unplug the machine, slowly flip the ma- 
chine upright, slide your fingernails under 
the lip of the front cover, and pull the unit 
apart gently. Since it snaps and locks to- 
gether, expect it to resist at first, then pop 
up; lift the cover up and back, and set it 
aside. 

You will see: the keyboard, resting on 
posts and attached underneath with a re- 
movable cable; a circuit in a metal case at 
the very back; the cartridge connector at 
the right rear; and a large area covered by 
a metal shield (Photo 1). It is inside this 
shielded area that the ECB chip and RAM 
will be Installed. 

Lift the keyboard up off its posts, pull it 
forward atx>ut an inch, and look for some 
white plastic straps holding the metal 
shield in place; these may not be present. 
If they are, clip them off. Slowly work the 
metal cover up and off, examining how the 
shield Is fitted in place so you can replace 
it later. Inside you will find several signifi- 
cant parts in large, 40-pin packages. Read- 
ing clockwise from the back right, these 
are: the 6809E central processing unit; 
below it a memory manager (Synchronous 
Address Multiplexer), type 6883; next, a 
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row of eight RAM chips; up from there, two 
6821 port chips which handle keyboard, 
cassette, audio, and other input/output 
work; and a 6847 Video Display Generator. 
Note whether the 6847 Is in a socket or 
soldered to the board; we will return to It 
later. Finally, there Is an empty 28-pln 
socket, and to Its right a socket contain- 
ing Color Basic. 

Referring to Photo 2, find the two small 
blue or black Jumpers (one is to the right of 
the S.A.M. and the other is tratween the 
6821s). Associated with each jumper are 
three pins In a row, and the jumpers that 
currently connect the middle pin to one 
marked 4K on the board. The other pin is 
unconnected. To begin the conversion to 
16K, lift each jumper off and move it so it 
connects the middle pin to the 16K pin, 
leaving the 4K pin free. Now slip the nail 
file under each 4K RAM, rock it slowly 
from each end alternately, and lift It out of 
the socket. Place it, pins down, on the 
piece of aluminum foil. 

Remove a 16K RAM from its package, 
holding It by the ends of the integrated cir- 
cuit (not by the pins). Notice that one end 
has a notch, dot, or both. Orient it In the 
same direction as the other 4K RAMs (the 
notch pointed away from the keyboard) 
and carefully insert It In the socket. Be 
Sure that no pins slip outside the socket or 
bend underneath the IC. Do this for each 
memory chip in turn. Double-check your 
work, make sure all your tools are out of 
the way, plug it in, and power up; you need 
not replace the cover for this test, but 
keep your hands out of the works. 

The screen will clear, but the Color 
Basic sign-on message will take a tittle 
longer than normal to appear. Enter 
PRINT MEM, and you should discover bet- 
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Fig. 1(a). Video buffer amplifier printed cir- 
cuit layout, viewed from above through 
the board, and (b) parts mounting dia- 
gram, viewed from above. 
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Fig. 2. Video buffer amplifier schematic. 
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1 BOUGHT IT 

"AAy biggest loss 
of programming 
time using 
Snappware's 

EXTENDED BASIC 

is spent 
inserting 
my disKette." 

SCOTT ADAMS PRES. OF ADVENTURE INTL. 



ReiJu(_e ijuui proijrdmniiiic] lime up tu 75^0 ubincj Snappwares' 
EXTENDED BASIC. The prnqram is wntten eniiiejy in machine Ian 
guage For Super Fast execution and is fully integrated into the 
Model II BASIC interpreter, requiring no user memory and no user 
disK space. Here are just some oi ttie ways EXTENDED BASIC can 
maKe ynur programming tash easier; 

• fluich way to recover BASIC program following a New. System 
nr Accidental re boot. 

• Sirigle character abbreviations For the most Frequently used 
commands. 

• Six single Key stroKe commands rn list the First, last, pre 
vious. next or current program line. Even edit current line. 

• A powerful cross reference Facility with output to display 
and or printer. 

• Ability to trace a variable through the code. 

• Determine easily iF a variable is in use. 

• Permits programmer tn display and or print the value oF any 
or all program variables. ^ 

• Identifies the variable type For all vanables. 

• Lists each element of any array separately. 

• Program line renumbering facilities allowing for specification 
oF an upper limir of the blocKof lines to be renumt)ered, relo 
cation of renumbered bIncKs of code and duplication of 
blocKsoFcndp. 

• Cross reFerence facility for Key words and character stnngs 
including global replacement of Key words. 

• Compresses your BASIC program to an absolute minimum by 
removing extraneous information 

• Merge lines 

• Deletes statements that could nol be executed. 

If you consider your programming time to be worth money, call 
us and let us show you how to get more of it. 
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MODEL II 
MODEL III 
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5200.00 

5125.00 



Time saving power 
at your Fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS 

CALL COLLECT: (5131 891-4496 

37l9Mantell —' 

CintI .Ohio45236 



^Sn Ui! o' A{fv0flll»fs on pag» 402 
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ter than 14K available memory (the screen 
uses your regular memory, so this takes 
away from memory available for Basic 
use). Problems will show as a locked-up 
machine, only 4K of memory still reported, 
far under 14K memory reported, or ran- 
dom crashing. A locked-up machine Indi- 



cates RAM Inserted backwards, pins 
crushed underneath or outside sockets, 
or (least likely) a bad memory chip. 
Recheck your work. If 4K memory is still 
reported after PRINT MEM, make sure the 
two Jumpers are property placed In the 
16K position. Too little memory reported 



might point to a bad memory chip; power 
up several times and see if this vaiue 
changes, suspect a chip which is too siow 
(be sure to get 200 nS RAMs). Finally, if the 
system randomly crashes, you probably 
have a RAM which is not fully inserted in 
the socket; check again. 
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Fig. 4. Schematic of the lowercase modification for the Color Computer. 
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If all Is wall, rtmove tha line cord. This Is 
Important, because the power supply 
transformer Inside the case Is always 
"hot." Insert the ECB ROM chip In the 
empty socket next to the Color Basic 
ROM. Position It carefully, with the notch 
In the same direction as that of the Color 
Basic ROM. Press It Into the socket, being 
sure not to bend any pins underneath or 
letting any slip outside the socket. You 
have just performed Radio Shack's $20 
Installation. 

Plug In and power up the computer. 
Your screen will now display an Extended 
Color Basic copyright notice. PRINT MEM 
will report 8487. 8487 on a 16K machine? 
Yes, because Initially ECB sets askle 6K 
of memory for high resolution use. 
PMODE0:PCLEAR1 <ENTER> will give 
you about 14K of usable RAM. 

Now power down, unplug the machine, 
and look over your work. Replace the 
metal cover. This Is Important because It 
prevents your television or radio from 
picking up Interference from the comput- 
er. Place the keyboard back on Its pegs, 
replace the cover and re-insert the screws. 
Your 16K ECB computer Is complete. 
Wrap up the package of 4K RAMs in the 
aluminum foil; you may be able to trade or 
sell them someday. 

About High Speed 

As I mentioned, the Color Computer 
has a built-in high-speed mode, access- 
ible by POKEIng 65495 with any value. 
POKE 66494,0 will return to normal speed. 
With 200 to 250 nS memories, your corrv 
puter should be able to run at high speed, 
which will be evident if the cursor flashing 
rate Increases. The hangup Is the pair of 
6621 port chips which handle keyboard 
scan, cassette I/O, certain aspects of 
video, etc. These are rated for 1 MHz oper- 
ation (the Color Computer normally oper- 
ates at 0.9 MH^, and occasionally won't 
do the job at 1 .8 MHz. Try It and see; If you 
are sure you'll need the higher speed In 
the future, then opt tor replacing the 68218 
with type 68A21, a faster device. 

32K RAM f or the Advwituroue 

Little effort Is required to add another 
16K of memory. Sonw solder, and Iron, 
needlenose pliers, wire snips, one 33-(^m 
resistor, a few inches of light solid wire, 
nine pieces of wire Insulation, three feet of 
aluminum foil, and another 16K RAM set 
are all that Is necessary. You also must 
have time, patience, dexterity and per- 
haps a magnifying lens, but the process Is 
not formidable. 

In short, you will fit each memory IC 
atop those already In the computer, and 
sokter it there. One pin will be connect- 
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1 BOUGHT IT 

"AAy biggest loss 
of programming 
time using 
Snappware's 
EXTENDED BUILT IIM 
FUNCTIONS is 

spent inserting 
my dishette," 

SCOTT AOA.WS PRL5 Oh AUVLMURt l\TL. 



Sn.ippWdieb EXI ENDLD BUILT IN FUNCTIONS 15 a collection Of much 
ncciJed additions lu the AAodel II BASIC interpreter which greatly 
(.'xicnds Its convenience and utility. The Following features 
become d part oF your BASIC lanquaqe and provide the enhance 
miMUs without rpquinnq any additional memory or disK space. 
Tht^' liHcirt of our EXTENDED BUILT IN FUNCTIONS is an m-memory 
son routine, qunranteed to be the Fastest general inmemorysort 
on the marhpt. or your money bach. Along with this, you also 
recpivp these EXTENDED BUILT IN FUNCTIONS: 
PEEK- Extract one Byte from a specified memory location. 
PEEKW- Extract TWO Bytes From a specified memory location 
POKE- Replace contents of a specified memory legation with 

a supplied value 
POhEW- Replace contents of a specified memory WORD with 

thp supplied value 
XDAT- Extract current date in format 
XTIM- Return time of day to format 
ETIM- The flifference between two times 
FILES- Return the number of tile blocKs currently allocated 
SRT- Sort one or more arrays into a specified sequence 
OPEN- Open a sequential file in extended mode 
ROW- Protect a portion of the video display From scrolling 
CLEAR- Specify the numbpr oF file blocKs to be allocated when 

you specify hiqh memory and string space 
ERASE- Erase all arrays 

CURSOR- Specify size and display format of cursor 
MAX- Return largest valup from user supplied list 
/WIN- Return smallest vaiue from user supplied list 
FMT- Arrange data into a string variable as with PRINT USING 

If you consider your programming time to be worth money, call 
us and let us show you how to get more of it. 
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MODEL II 
MODEL HI 



5100.00 

S 75.00 
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Time saving power 
at your ringertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS 

CALL COLLECT; (513) 891-4496 

37l9Mantell 

Cintl.. Ohio 45236 
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ed not to the RAMs below, but together 
with the other RAMs in the new set. A re- 
sistor will run from the SAM chip to this 
connection in order to select the second 
16K block of memory. 

For safety, line your worktable or desk- 
top with aluminum foil, and set your tools, 
parts, and computer on it. Ideally, use a 
non-static felt workstation {#WS-9010, 
sold for about $15 plus shipping by Wes 
corp, 1155 Terra Bella Avenue, Mountain 
View, CA 94043), which includes a ground- 
ing wrist strap. Open the computer case 
according to directions above, and put the 
top and metai shield aside. For reference, 
locate the eight memory chips {socketed, 
nearest the keyboard), and the Synchro- 
nous Address Multiplexer (SAM, the 
40-pin chip UlOjust above and to the right 



of the memories). 

Examine your new set of 16K RAMs. If 
they have gold pins, they should fit in 
place as Is. Otherwise, you will see that 
the pins fan out slightly from the body. 
Keeping your arm grounded against the 
aluminum foil, hold the sides of the IC be- 
tween thumb and forefinger, and squeeze 
until the pins are perpendicular to the 
body or canted very slightly inward. Keep 
the pins in line with each other. Orienting 
the notch in the proper direction, tempo- 
rarily fit one of these RAMs atop one of 
those in the computer. Make sure the pins 
line up precisely with those already In 
place, that they fit snugly, and that no 
pins slip In between others. Form each 
memory chip this way. 

Identify pin 4 of the new memory chips. 
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'^SIDE OF METAL CAGE ^ 



Fig. 3. Four wires connect the video buffer amplifier to main PC board at R16 (output to 
amp}. R45 (12-voll power supply), metal cage wall (ground), and phono jack center pin 
(video output). 



The ^or4 processor st^Ie up^er^ 
ioi^er case te<t is lientical to 
tnat on the f^oiel I- Graphics 

a.^e 'j«3^fectei c^ this project. 
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Pfioto 7. Latest characfer generator used tor the Model t THS-80 produces 5-by-7 dot 
matrix characters with descenders. 



Looking at the top of the chip with the 
notch facing away from you, this is the 
fourth pin down from the upper left. With 
the needlenose pliers, bend this pin gently 
(not sharply) out and upward so it rises 
above the top of the IC. Do this for each of 
the eight chips. 

There are three ways to continue with 
this project, depending on your soldering 
technique. 

• First method: Fit all eight memory 
chips into place. ChecK that in bending 
pin 4 you have not altered any other pins. 
With a small, hot soldering iron, flow a 
minimal amount of solder on pins 1,8and 
9. It should join the new chip with the one 
below it; be careful not to melt the socket 
of create globs of solder. 

• Second method: Fit all eight memory 
chips in place. With a small, hot soldering 
iron, flow a minimal amount of solder on all 
pins (except pin 4, which is pointing up- 
ward). Solder alternate pins as you work 
your way around the chip; allow time for it 
to cool it it feels uncomfortable to the 
touch. Be very careful not to melt the 
socket or create solder shorts or globs. 

• Third method: Remove the eight 
memory chips from the sockets, piggy- 
back the new chips on these, and solder 
them pin-for-pin (except pin 4) on the work- 
bench. Since they are out of their sockets, 
you will have to be doubly careful not to 
overheat them. Then re-insert the piggy- 
back pairs in the sockets, orienting them 
correctly, 

A wire must be connected to all the pin 
4's. The easiest way is to snip off a piece 
of bare wire long enough to connect all 
the pins together in a line. Solder this wire 
to the first memory chip to the left, then 
slip a piece of insulation on the wire. This 
piece should be long enough to cover the 
wire only as far as the next chip. Solder 
the wire to the next pin 4, slip on another 
piece of insulation, then move on to the 
next. One exception: between the fifth and 
sixth memory chips (U23 and U20), leave a 
little extra wire and put two shorter pieces 
of insulation in place. 

You will now use the 33-ohm resistor. 
Slip a piece of insulation over each end so 
about 1/B inch of bare wire is visible. 
Solder one end to the point in the middle 
of the two pieces of insulation between 
the fifth and sixth memory chips. Locate 
the SAM chip (U10); Identify pin 40 (the top 
right-hand pin), and count backward until 
you get to pin 35. The other end of the re- 
sistor will comfortably reach this pin. Us- 
ing a very small amount of solder, attach 
the other end of the resistor here. 

Refer to Photo 2 for details on this mod- 
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Call or Write 
Your Nearest 
Snappware 
Distributor 



MICRO 80 

?84 Goodwood Road 
Clarence ParK 
Adpltiirip South Australia 
Ph (08)2117224 



Old TEK SYSTEMS 
65 Thornndge Circle 
Kitchener Ontario NZM 4V9 
Ph-(5I9) 743 1699 



OUAUTY SOFTWARE 

DISTRIBUTORS 

I IS Stemmons Expressway 

Suite 104 

Dallas. Texas 7S229 

Ph-(2I4)484 2976 



COMPUTER MAGIC 
Its Wiltshire Avenue 
Louisville. KY 40207 
Ph-(S02) 893 9334 



EC DATA 

Tornevangsvej BB 
PO.B. 116 
Oh 3460 

BiiKered. Denmark 
Pl>-M5(0)2 818191 



System Soft 
49.Dunveqan Drive 
Rise Parh 

Nottingham. England 
NGSSDx 
Ph-(0602)275S59 



Programs tJnIimited - 

20 Jericho Tphe. 

Jericho. Long Island. New Yorh 

Ph -(516) 333 2266 



AEROCOMP 
Redbird Airport 
Hantier B 

Dallas. Texas 75232 
Ph (214) 339 5104 



nappware 
Goes On Trial! 

You Be 
The Judge! 

Snappware Knows your programming Lime is valuable. 

That's why we are orrering a trial package that will cut ijoiir 
programming time up to 75%. This unprecedented oFfei 
allows you Lo judge Tor yourself the value of our software us 
ing yotvr hardware at your convenience. Our four best selling 
products: EXTENDED BASIC. EXTENDED BUILT IN FUNCTIONS. 
AUTOMAP and AUTOFILE. are available to you on a trial basis for 
only S50.00 for the model II and 535.00 for the Model III. We re 
convinced that after you see how well our software helps you 
perform programming tasKs. you will purchase them lihe 
thousands of others have. Our trial package consists of a mas 
ter diskette which may be used to create one working copy. 
Your purchase price for the trial package will be credited to 
ward the purchase nf any software Snappware sells. 

If for any reason you are not satisfied, just return the trial 
diskette and we will refund your money, no gueshons asked. 
With an unconditional guarantee like this, you cant lose. 

Call our toll free number 800 543-4268 to put us on trial. 
We're sure your verdict will be: Snappware saves you time and 
money. 

Model II Trial Package 550.00 
Model III Trial Package 535.00 



Time saving power 
at your Fingertips. 

CALL TOLL FREE: 

1-800-B43-4628 

OHIO RESIDENTS 

CALL COLLECT: (513) B9I 4496 

37t9mantell 

Cinti..0hio4S236 






^See List of Advenisers on page 402 
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ificalion. The arrows show connection 
points for the 33-ohm resistor. Cavaiierly i 
have left off the insulation on my connec- 
tion wire; don't do that, because the RF 
shieid cover can short against the wire. 
The addit jonai bank of 16K memory is now 
ready to use. Piug in and power up the 
computer. The sign-on message should 
take a while to appear; when it does, enter 
PRINT MEM. Over 24K of memory should 
be revealed, the rest (as I mentioned 
above) being reserved for high-resolution 
graphics. 

Problems and Causes 

Problems? They may include: a locked- 
up machine with no sign-on message; ran- 
dom crashing and lockup after the sign-on 
message; no evidence of the second 16K 
bank of memory; an improper amount of 
memory display upon PRINT MEM. 

Probable causes: A locked-up machine 
points to memory inserted backwards, 
shorts twtween pins, memory lifted out of 
its socket, or memory damaged by heat 
(the last is unlikely but possible). Solder 
globs or hairs on the SAM chip will also 



cause this. Random crashing after sign- 
on probably results from pins not seated 
properly on the memory chips twiow, not 
fully bent, corroded, or otherwise not mak- 
ing proper contact. No evidence of the se- 
cond 16K memory bank is caused by one 
pin not making any contact at all with the 
one below, or a bad solder connection on 
the 33-ohm resistor. An Improper arrrount 
of memory may be caused by a bad or 
slow memory chip, or, if the displayed 
amount of memory changes, by an Im- 
properly seated or soldered chip. Replace 
the RF shield and computer cover. The 
32K memory modification Is now 
complete. 

By the way, here's the theory of what 
you have done. All the memory lines (ad- 
dress, data Input, data output, refresh/ 
select, and power) are Identical but one. 
Therefore, the second set can be paral- 
leled (piggybacked here) on the first set. 
Pin 4 is the only exception, and It is the 
memory address tine MA7. Pin 35 of the 
SAM chip provides this signal whenever a 
memory address from 4000 to 7FFF 
(decimal 16384 to 32767) Is requested. 



Sinking SAM 

Look again at Photo 2. Something Is at- 
tached to the top of the SAM chip, with a 
white substance smeared on it. After your 
computer has been operating for a while, 
place your finger on the SAM chip; If it Is 
uncomfortably hot, you may want to ex- 
tend its life with a heat sink. Only two ma- 
chines i have seen (felt?) have this heat 
buildup in the SAM, so you may not need 
this mod. 

Obtain a finned, black, TO-220 heat sink 
and flatten the fins somewhat. With white 
silicone heat-sink grease, cover the top of 
the SAM and the twttom of the heat sink. 
Press it In place, fins up; the grease will 
hold It there. Replace the metal RF shield. 
It should just touch the heat sink If you 
have bent the fins properly. 

SwMtenIng th* Vktoo 

The television (RF) output of the Color 
Computer is excellent, and if you have no 
access to a color monitor. It gives a fine 
video image. But there Is a purity in cou- 
pling video directly to a monitor without 



(C) idSJ D' B'KlXaS 
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Fig. 5. Complete printed circuit board layout tor the Color Computer lowercase modificatlor). Post hole must be cut before mounting 
parts on the board. Note that this is the bottom of the PC board, viewed from above and through the board. 
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converting to RF and back again at the 
television. Further, the signal sent out by 
the Coior Computer Is too weaK to power a 
number of sets for dispiay purposes or 
group use, but the video bufter/ampiifrer 
shown here can run a dozen sets or more. 
High-resolution graphics are more finely 
detailed, particularly on black-and- 
white sets. 

A printed circuit tioard layout for a 
V4 -inch-square board that affixes to the 
video modulator case with double-face 
tape is shown in Fig. 1. The schematic for 
a simple transistor buffer/amplifier which 
attaches ahead of the RF modulator and 
provides a clean, fast, composite video 
output is shown in Fig. 2. The unit can be 
assembled on perfboard as well; be sure 
to keep leads short. Radio Shack sells 
2N3904 transistors (276-2016, or in packs 
of 15, 276-1603), and the resistors. A com- 
mon electrolytic capacitor may be used 
(Shack number 272-1024), though I use a 
bead tantalum type for cleaner signal (no 
longer available from Radio Shack). 

For video output, I Installed a pair of or- 
dinary phono jacks similar to those used 



for the computer's TV output. Solder can 
be flowed directly to the modulator's case 
to ground these jacks, but don't solder the 
cover In place (in case video alignment is 
needed at some future date). All that re- 
mains is the carpentry. The plastic case is 
soft, so it can be cut easily with a fine cop- 
ing saw blade and filed smooth. Photos 3, 4 
and 5 show the results of mounting the 
video buffer/amplifier, fastening the 
jacks, and cutting the case. The locations 
where the four leads from the video buffer/ 
amplifier must be soldered (input, output, 
12-volt supply, and ground), are identified 
In Fig. 3. 

If you have a parts "junk box", this is a 
free project; otherwise, the investment is 
atMut $2. If you have no time at all, a com- 
plete kit of parts is available from MSB 
Electronics (see the end of this article for 
details). 

Real Lowercase 

If the Color Computer has any truly ser- 
ious deficiency, it is the lack of reason- 
able lowercase letters. For programming 
and prompting, that lack is not too bad; 



BUSINESS USERS! 

SAVE TIIVIE & IVIONEY BY 

CONTROLLING YOUR LONG 

DISTANCE TELEPHONE COSTS 



LONG DISTANCE ANALYZER will 

• Sort your billed calls 

• Identify each party called (from your known 
list) or print locations of unrecognized 
numbers 

• Total the cost of calls to each number, to all 
numbers, and to all unrecognized numbers 

• Analyze calls arxJ tolls by area code, state, 
and WATS zone 

• Print an alphabetical directory o1 recognized 
numbers 

• Save venfcation time 

• Create cost-consciousness 

• Facilitate cost accounting and client billing 

• Isolate personal calls and billing errors 

• Reveal imffKient use patterns 

• Help you perform WATS feasibility studies 

Requires Model I. II. or III TRS-flO', Level il, 16K. 
and 1 disk Printer IS optional No connection to 
phone system 



MocM 


CMttttfl 


TRSDOS* disk 


1 


$95 


$135 


II 


N/A 


$155 


III 


S95 


$135 



Brochure on. request. 

Send model number and check or money order to 

Golden BraM Software 
RO. Box 2934 ^2B1 
Sarasota, Florida 33576 



■TRS-80 B'xl TRSDOS 

are Iiademarhs 

ot TanOy Cwporalion 



SAVE UP TO $600.00 NOW 
on TRS-80" Computers &* Accessories 

With This Coupon* 

Now you can own a great little computer at a great big discount off the manufacturer's 
list price. For home or office use, the Radio Shack' line of computers is first in quality, 
performance and price. 

• FREE SHIPPING in the 48 continental contigious stales. Model 11 

• NO SALES TAX collected on out-of-state orders. 

• CONVENIENT ORDERING - Call us TOLL FREE - 1—800/531-7466 
■ FREE COMPLETE PRICE LIST available upon request. 




Description 



Catalog 
Number 
Radio Shack® TRS-BO Model 11 

26 4002 64K 1 Disk Model II 

Radio Shack^ TRS-80 Model III 

26-1062 Model III 16K 

26-1066 Model III 48K 

Radio Stiack'^ TRS-80 Color Computer 

26-3001 4K Color Computer 

26-3002 16K Color Computer 

Atari^ CX-2600 Video Computer System 

Magnavox^ Odyssey^ Home Video System. . . 
Magnavox^ Magnavlsion* Videodisc Player. 



List Price 

3,899.00 

999.00 
2,495.00 

399.00 
599.00 
180.00 
199.95 
725.00 



Cashier's 

Check Or 

Money Order 

"3.299.00 

865,00 
•2,149.00 

359.10 
539.10 
164.95 
164.95 
599.00 



Cash Price 
You Save 

600.00 

134.00 
346.00 

39.90 
59 90 
15.05 
35.00 
126.00 



Pan American Electronics 



►-64 



CALL TOLL FREE 800/531-7466 • (Operator 32) • Texas & Principal Number 512/581-2766 • Telex 767339 

Dept. 32 • 1117 Conway Avenue • Mission, Texas 78572 

NEW BRANCH 

2912 N. Main, Fort Worth, Texas 76106 • Phone Number 817/625-6333 • Teiex 794836 



rR5«] il a Tr«d*mafk ol Tindy Corp 'With Th(» Coupon Only! — 0»«r tipiras 1 1/30ni Prtcai sub)ac( to ch«nga wtttvout noltca — Stlghlty titghar lof Cradfl Card Ordan. 



r-S«« List ol AUvertiSSfs on page 402 
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but for text editing of any kind, a screen 
full of black letters and green letters in 
black blocks is not merely inconvenient, it 
is ridiculous. You can provide legitimate 
lowercase with the Color Computer, 
though by no means as easily as on the 
Model I. 

On the Model I, the lack of lowercase 
characters was merely a result of the aiy 
sence of one bit of video storage. By ad- 
ding that bit, lowercase characters al- 
ready present In the Model I's character 
generator became available to the user. 
The Color Computer uses a vitally differ- 
ent method of accessing characters: the 
6847 Video Display Generator (VDG). 

Within this integrated circuit the char- 
acters are created, and both coarse and 
high-resolution graphics modes are pro- 
duced. Together with the SAM chip, flick- 
er-free displays of alphanumerics and 
graphics are possible. The VCXB contains 
an internal 64-character generator, and no 
lowercase letters. To simulate them on 
the Color Computer display, Inverted char- 
acters are selected when bit 6 goes low. 
Software converts the internal character 



set (00 to 1F) to correct ASCII equivalents 
with green letters on black for lowercase 
(60 to 7F), and the inverted character set 
(20 to 3F) to correct ASCII equivalents with 
black letters on green for uppercase (40 to 
5F). The numtwrs and symbols from the 
black-on-white set are not printed. If this 
sounds a little confusing. It is. Enter this 
short program: 

to CLS:PRlNT:PR:!NT:PniNT:PRtNT 

20 PHINT;PR1NT: PRINT: PRINT 

30 FORX=1024TO1151 

40 POKE X,¥ :Y = V + 1 : NEXT 

50 FORX-0TO127 

60 PRINT CHRS(X);: NEXT 

70 GOTO 70 

The top four lines in the first group show 
the character set actually received by the 
processor; the second group of lines pre- 
sents the character set converted to nor- 
mal ASCII by the Basic screen display 
routines. 

When bit 7 is set high (hex 80 to FH. the 
semjgraphics mode is selected, allowing 
eight groups of graphics characters to be 
displayed. These graphics blocks are 



identical In both displays above since 
standard ASCII values are not assigned to 
these codes. 

Table 1 describes the 6847 display gen- 
erator and the functions of each of the 
pins, and how the VDG fits Into the Color 
Computer system. Each input or output 
used for the modification will be des- 
crit>ed later. 

The key to displaying an independent 
set of characters is the INT*/EXT connec- 
tion (pin 31). According to the Motorola 
data sheet, this mode "uses an external 
character generator as well as a row 
counter. Thus, custom character fonts 
and graphic symbol sets with up to 256 
different 8x12 dot 'characters' may he 
displayed." To display lowercase on the 
Color Computer, then, the VDG must be 
fed Information by some external device 
(such as the Model I character generator); 
a row counter must be added to select the 
lines of dots to be displayed on the 
screen; and all other modes of graphics 
must be maintained unchanged for com- 
patibility with normal Color Computer 
operations, ideally, the whole thing 



• •••• 




# • . • j= 



Fig. 6. Jumper arrangement for lowercase board, viewed from above. Jumpers should be soldered in place before the integrated cir- 
cuits are mounted. Note that this figure will produce a doublesided PC board. 
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should be switch-selectable. 

The complete schematic tor a lower- 
case addition is shown In Fig. 4. The VDG 
is Intercepted and connected to several 
outboard integrated circuits. The heart of 
the external selection process is the pair 
of 74LS157 multiplexers in the center of 
the dlagranfi. A multiplexer is like a traffic 
light— only one pattern of vehicles may 
proceed at a time. In this case, eight lines 
of data are switched from the internal 
mode (the multiplexer A Inputs) to the ex- 
ternal character generator (the B inputs). In 
charge of this selection process is data bit 
7 {DD7, pin 40) together with the alphanu- 
meric/graphic select line (A*/G, pin 35). 
When alphanumeric mode Is selected, the 
signal from DD7 (Inverted by the 74LS04) 
passes through the 74LS125 tHJffer. If DD7 
is high, semigraphjcs are selected (coarse 
graphics with hex codes 80 to FF), which 



causes the nnultlplexers to connect their A 
Inputs to the Y outputs. By following data 
tines DDO through DD6 from the socket, 
you can see that these seven signals will 
pass through the multiplexer directly to 
the VDG. The eight A Input is tied high, 
and passes through an inverter. This eight 
signal opens up the other 74LS1 25 buffers 
to the INV signal (pin 32) and the INT*/ 
EXT signal (pin 31). In other words, when 
semigraphics are selected, all signals pro- 
ceed normally to the VDG, as it there were 
no other circuitry In place. When high- 
resolution graphics are selected (A*/G is 
high), the result Is the same — completely 
normal operation of the computer. 

When line D07 goes low (meaning 
alphanumerics are being printed on the 
screen), the B inputs of the multiplexers 
are connected through the Y outputs to 
the VDG. Five dots are output from char- 



Slgnal 
Nmriw 

Vcc 
Vsa 

cue 



Pin D«icf1ptlon 

Numbvr of Function 



17 

1 

33 



DA0'DA12 22-26, 

13-16, 

ia-2i 

DD0-DO6 3-8 
DD6 2 



007 



phase A 


11 


phase B 


10 


Y 


26 


CHB 


9 


HP- 


36 



Power supply voltage, +5v. 
Power supply ground. 

Color burst clock Inpul, 3.58 MHz, provided by the 
SAM chip. 

Address lines lo display video memory, set to high 
impedance during MS*. These address lines are 
not used in the Color Computer since the SAM chip 
provides the characters as needed. 
Data (fom display memory, provided by the SAM chip. 
Data from display memory iri flraphic mode, color data 
in semigraphlc mode. Tied to the INV lir>e m the Color 
Computer. Information is provtded by the SAM chip. 
Data Irom display memory in graphic mode, cotor data 
in semlgraphic mode. Provided by SAM. 
Chrominance and luminance analog 
outputs to video modulator chip 
MC1372, arKJ chroma bias reference 
to phase A and phase B levels. 
Row preset timing output for an external character 
generator. Not used in the Cotw Computer. 
Horizontal sync timing output tor an external 
character generator, and used by tt>e SAM chip for 
memory timing. 

Inverts video In alphanumeric mode. Normally In Invert 
position tor uppercase letters In the Color Computw, 
and tied to DD6. 

Switches to external character generator in alpha 
mode and between semigraphics modes A and 6. 
Handled by SAM. 

Switcties t)etween alphanumeric and semigraphics 
modes. Handled by SAM. 

Memory select line in(HJt disables address buffers. Not 
used In the Color Computer. 
Switches between alpha/semigraphic modes and 
medlumytiigh-resolullon display modes. 
Field synchronization output goes low at txjttom of 
display area, and returns high at lop o( video display. 
Not used in the Color Computer. 
Color set select chooses colors for alpha display in 
semigraphics 6 and full graphics mode. 
Select for one of olgfil graphics modes. Color Com- 
puter sofhwara does not access Ihem all. alttwugh the 
fiardware makes them available. 



Table 1. 6847 Video Display Generator pin assignment in ttje 
Radio SfiacK Color Computer. 
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INV 
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32 
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31 
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34 


MS- 


12 


A'/G 


35 


FS* 


37 


CSS 


39 


QM0-QM2 


30.2fl.27 



acter generator lines DO to D4, as selected 
by the address inputs AG to A6. The com- 
puter's video display is made up of 12 
rows of dots per screen line. Because the 
character generator must know which set 
of dots to output for each line, a counter is 
needed which counts from 1 to 12 In bi- 
nary to select these dot rows. Since the 
Model I character generator is only a 5 x 7 
matrix of dots, however, this chip must be 
deselected (turned off) during the final 
counting stage- 
Count Sheep Instead 

All of this counting is done by the com- 
bination of a 7493 binary counter and a 
7473 flip-flop. The 7493 counter is config- 
ured to count from one to 16. Display scan 
lir>es are selected by sending a clock 
signal provided by the horizontal synchra 
nization (HS*) pulse, and the count is 
reset to zero (cleared) by the row preset 
(RP*) pulse, where it begins counting 
again. This produces a complete row of 
characters. Counting stops completely 
when the video beam is out of the frame 
by the field sync (FS') signal, and count- 
ing begins again when the first character 
is fetched from memory (DAO). In fact, this 
counter only counts to 12 before It is 
cleared for the next screen line. Since this 
character generator produces a 5 x 7 ma- 
trix, the chip must be turned off to avoid 
redisplaying the first five lines of any let- 
ter immediately below it. The generator is 
turned off by bringing the chip select line 
(CS*) high; a count from 8 to 12 brings the 
QD output of the 7493 high— perfect for 
deselecting the character generator at that 
point- The five resistors hold the character 
generator's data outputs low during the 
deselection phase, and assure that the 
characters will be presented on a clean 
screen, and not one filled by characters 
underscored with black rectangles. 

The final difficulty is the conversion 
process accomplished by the software. 
As noted earlier, since the internal charac- 
ter generator uses only six bits of data, 
these characters fall outside the normal 
ASCII positions. They are input to the CPU 
which then performs a software change to 
make them compatible with usual ASCII 
codes. The Model I character generator, 
however, provides proper ASCII codes. To 
make the character generator look like the 
VDG, then, the lowercase must be 
swapped with control characters, 
numbers must be swapped with lower- 
case, and uppercase remains the same. 
The 74LS86 XOR gate configured as an 
exclusive-NOR gate correctly swaps 
signals that enter address line 5; DD5 is in- 
verted and presented to address line 6. 
This conversion (see Table 2) provides the 
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BASICS ll/CMD Mod I or III $69.95 

BASIC/S II IS a BASIC compiler lot a powflrtul subset ot TRS-eO Disk BASIC 
(Mod l/lll) which is itsett written >r\ BASIC, but now is a slantJ alone/ CMD file 
compiled by BASCOM|c). and is FASP Ipreviously sold as BASIC/S 3 1 ) it runs 
under almost ANY DOS, Mod I or III (as do the /CMD files it generates). 

BASIC/S II will compile BASIC programs up lo about 10K in size (but since 
one compiled program can run another with no loss of variables, this is not a 
serious limilalion). Variables allowed are integers and strings (A-Z and AS-ZS) 
and also arrays of ir^leger and siring (1 or 2 dimensions). Array names can be 
any length, with all characters significant. Integer arithmetic is limited lo 
addition, subtraction, multipltcation. and division with at most two operands on 
Ihe righl hand side (eg A=B*C or Z=D/F) Array elements may be used here as 
usual, as may constants (as in A=ARRAY (7) *5. tor example) 

Most Level U string funclions are supported . INSTR.STRS. VAL.CHHS.ASC, 
LEFTS, RIGHTS, MtDS,INKEYS.(k>molex string formulae are not allowed (thus 
you cani say A$=LEFTS (XS+Y$,2), you would need to say something like 
BS=X$+YS A$=LEFT$(B$,2l. instead. 

Disk I/O IS supported. Doth sequential and random (wtth LRL < 256 as well) 
You can have up to 1 files open at one lime, and two o' them may be random 
files Disk statements that are supported include OPEN. CLOSE, LINE INPUT 
■ PRINT « FIELD. LSET. GET. PUT. LOF, EOF. CVI. and MKIS 

LZAP/CMD Mod I or HI {LDOS only) $39.95 

LZAP/CMO IS the mosipowedul.easy to use ZAP routine eve' wntt en. and It is 
tor LOOS Mod I or III' LZAP uses the resident dnvers ot LDOS. (hereby taking 
FULL ADVANTAGE OF THIS POWERFUL OPERATING SYSTEM LZAP wilt 
auto-configure itself to drive capacity II will support any « ot drives from 0-7. 
any cylinder count up to 255, and any sector » lo 255 Will page between 
double sided drives. 8" drives. LX-80, and hard dnve. 5" floppies of all sues al 
same time without getting lost' 
Contains these features. 

(R) ead (E| xit (D) ebugl (R) emove Password 

(A) sen Modify (Cl compare IG) o Directory (I) Go Extent 

(M) odify Hex (W) rite (B) Locate Byte (Z) ero buffer 

(F) ind lile (H) ash code(L) ocal search (P) rint screen 

(S) earch Global (X) Escape (T) oggle 0-7 page drive 

(space bar) brings up a command menu for learners and OUICK reference at 
any time' Also contains an ERROR DICTIONARY that can be turned oti to over- 
ride those crashed or protected files For examination. 




SUPER UTILITY! 

This Fantashc 24K. stand alone machirv language program allows lapid and 
easy access to conirolling data Super Utility, written by Kim Walt of Breeie 
Computing, inc , comes with 30 pages ol easy to understand, itep-by-siep 
instructions assuring maiimum use olyour valuable tirne 

Seven main menus combining 43 major prfxiramming or disk repair options 
niakes this single program increoibly versatile F^oi fast and easy reference *e'we 
capsuled some of the best options below 



QSD Utility Disk #1 for LDOS (c) (Mod I only) $69,95 

Increase Ihe speed and power of LDOS" Contains 

LZAP/CMD- RESIDELD/CMD- CLONE/CMD 

CHANGE/CMD DCAL/CMD' VDISK/CMD* 

STAT/CMD- BINHEX/CMD- 

And also contained on Ihe disk, by Kim Wat) (author of Super Utililyj 

LCOPY/CMD RECOVER/CMD DVORAK/CMD LPURGE/CMD" 

'means works in Double Density 



ZAP 

Duplay Sector IDiik. Fii<l 

Diiplay MeiDorv 

Compare Diik Sectori 

Copy Oitk Sccion 

Vinly Disk Sectori 

Z«TO D^tk Sectors 

Stiing Search 

Sector Search 

PURGE 

Kill Selected Files 

Gel Diik Directory 

Zero Ur^Lited Direclory ErMnvv 

Zero Unuied Granules 

Remove System Filei 

Kill By Calegory 

Chanqe N«m»_Daie. Paji 



DISK PORMAT 

Standi! d Formal 
Format Without Lraw 
Special Formal 
Read Addicti Marks 

DISK COPY 

Standard Copy With Format 
Standard Copy Without 

Format 
Special Copy |To back up motl 

prolfcled diiki ' lof ongional 

purchaoen use only4 



DISK REPAIR 

Repair Gat TaWe 
RepajT Bool 

Read ftoleci Diteclorv Track 
Recover Killed Files 
Check Directory 

MEMORY 

Move Memory 
Exchange Merrwry 
Compare Memory 
Zero Memory 
Test Memory 
Input Byte F^om Pon 



Output Byte lo 1 
Memory To Diik 
Disk To Memory 



To Pon 



LDOS 



MOD I OR III $149.95 

LOOS It ttw iMMt 9*fMratloii of Mphteti- 
cMsd operating •yttama for ttto TR8-M> 
computors. LOOS It eomptatoty docu- 
montod In a 2S2-pag« roforonco nwnual. 
Toiat support It provldod from wnw of 
tha moat knowlodgaabia poopla In tha 
Induatry. You owa h to yoursaH to invaa- 
tlgata this syatam . CaH or wrfta for datalla. 
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TAPE COPY 

BKk up m«t TTIS-SO tap< 
no nuMtei rKMi it u lecor 
ed (lor on3ir\al purcna^ 
nge Name Uaie. Kajs use only) 

ord AutoCommanti 
Change File Paiamelers 

Residing from 4. OOOH to 9FFFH, Super Utility has its own I/O dnvers and does not use 
any ROM or DOS calls S09010 the heano( your protefleddiskiand read and/ or modify 
data using simple L-key commands Now lime is on your side' 

ToOrdcf . , , "Send check or moneyotder foronly M99Soius J2S0»hipp'n9*iKlh»ndl;i^ 

SUPER UTILITY 2.0 (SINGLE/DOUBLE DENSITY) 

S74.9S 



EDflS 



EDAS is a sophisticatsd Editor 
and Assembler for the '80 Model 
I or Model III. All commands 
and SOURCE text can be enter- 
ed in upper or lower case. Direct 
assembly for memorv or mul- 
tiple disk files by means of 'GET 
assembler directives provides 
the capability of assembUng 
huge source files with X.OOO 
bytas of symbol table. Direct 
assembly to disk or menwry for 
faster debugging operatiorts. 
DOS functions DIR, KILL, and 
LIST are available from within 
EDAS. The Editor provkias 
bkKk move & gk}bal change 
vnthBASICsyntaxedHing. EDAS 
provkias power with ease of 
use. $79 + >S£rH, 



The Ultimata Communicationt Package: 

Price $150.00 

The package includes the STSO-MI" smart terminal program 
and nine other communication utilities: Fully documented 
with easy to follow instructions, STBO-III " is by far the best 
terminal product on the market today. 

TWO Printers on ONE Computer 

♦ FOR MOD 1,11, AND III... 
^ PARALLEL ONLY 
^ SCHOTKEY CIRCUITRY 

♦ FULLY BUFFERED... 

^ SWITCH SELECTABLE... 
$139.95 IN STOCKI 



— DEALER INQUIRIES INVITED — 

QUALITY SOFTWARE DISTRIBUTORS 

11500 STEMMOHS EXPRESSWAY, SUITE 104 

DALLAS. TEXAS 75229 

PHONE (214) 484-2976 

inniSc>vi4»t MICRONET 70130,203 ^27 rraiDmiwkicMt 

MENTION THIS AD AND DEDUCT 5% 




ADD $2.50 
SHIPPING (USA) 



-Sa« Lisi ol AiJverUsers on page 402 
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proper non-ASCII codes needed by the 
Color Computer software. 

Some considerations remain. Ironical- 
ly, the very attractive type font of the 
Model I character generator (actually a 
Motorola 6670 series shifted generator, 
type MC6673) contains a few non-stan- 
dard characters In the high upper and low- 
ercase positions (see Fig. 9), and two dif- 
ferences between generation of the Model 
I character chip. Especially unfortunate is 
the replacement of the carat or up-arrow 
with a down-arrow (!) and the replacement 
of the square brackets with an up-arrow 
and left-arrow. Programming in Basic 
looks mighty strange when exponentia- 
tion Is represented by a arrow pointing 
down, and when program tracing frames 
line numbers with up and left-arrows. For 
these reasons, Fig. 4 shows an optional 
restore switch. A IK resistor pulls the mul- 
tiplexer select line high when the external 
generator Is unwanted; the entire display 
system then looks unmodified. The switch 
mounts comfortably and without Interfer- 
ence between the cassette and printer 
output jacks. 
Another minor bother is the fact that 



the Model I character generator with des- 
cenders shifts the entire character set up 
one line on the screen in order to accom- 
modate the descending characters when 
they come along. This means, when al- 
phanumerlcs and graphics are mixed, the 
tops of the letters bump into the bottom of 
any graphic above them. They don't over- 
lap, but they do touch, just as they do in 
the Model I. There are two solutions to 
this, one ugly, and one very attractive. 

The first solution is to use the old Radio 
Shack character generator (if you can get 
one), without lowercase descending tails. 
A more elegant solution is to use a 7x9 
matrix character generator. Motorola type 
66740, which matches all the characters 
in the Color Computer set correctly, but 
provides lowercase with descenders and 
a much prettier 7x9 matrix of characters. 
Since there are more rows of dots to 
display, the 66740 device has data outputs 
D5 and D6. These are connected to the B2 
and B3 inputs of the second multiplexer 
Instead of connecting these inputs to 
ground. The chip is always selected 
(because it outputs blank lines where no 
character is present), so the four chip 



select lines (CS1 through CS4) are con- 
nected to ground. The extra dot data is 
chosen by feeding the 7493's QD output to 
row select 4 (RS4). Those are the only 
changes necessary to use the 7 x 9 gener- 
ator, but note: the 66740 character genera- 
tor has 24 pins and will not tit on the PC 
board layout in Fig. 5. 

Building the Board 

This is the first time I have presented a 
printed circuit (PC) board layout in this 
column (Fig. 5). Because all of us are only 
skilled amateurs at tiest, I have made this 
board single-sided using jumpers instead 
of double-sided, demanding plated- 
through holes. The jumper arrangement In 
Fig. 6 can be used to create a double- 
sided board. A complete board and kit of 
parts is available for this project (see end 
of article for details). 

Making a printed circuit board Is time 
consuming, but quite simple. Full direc- 
tions are available from PC suppliers, but 
here is a summary; take note that all the 
chemicals used in this process are either 
flammable or toxic, so work with care. To 
make a PC txiard, take the layout in Fig. 5 
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fig. 7. Paris tayout tor lowercase modification, viewed trom above. Three resistors are mounted vertically, but enough resistor lead 
should be left to bend the parts over after soldering. 
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A MAJOR 

BREAKTHRU FOR 

Electronic Engineers 

Electronic Hobbyists 

Electronic Students 

Ham Operators 

A General DC-AC (steady state] Analysis 

of Any Circuit 

Will Analyze and Compute: 

• Node, Branch. Elemenl. Voltages 

• Node. Branch. Element, Currents 

• Branch Power Dissipation 

• Magnitude and phase values and complete 
frequency response with graphic (lisplay 

• Modify any clement in circuit for desired 
results 



A complete operational 

manual supplied 
comparable to I.B.M.'s 

E.C.A.P ' Program 
•A C. Analysis Program 

$149.95 

•D.C. Analysis Program 

S89.95 



Td Order Wri(r 

G ft L Software Enterp. 
2304 N. 1 at. Street 
Upland, CA 91786 




tJii Not Send Cjsh in ihc Mail 



TRSWC isalradrm^irH.jllhr riiiiilyrurp E.<',A-P isdliadciiijrhi.Mriirri.it. 



^Sea List of AdvvrtiSBfS on pagt 402 




PUBLICATIONS for the TRS-80' Model in 

Mystery o( the ROM Mystery of the DISKETTE 

Mystery of the DOS J19.95 each 

Must additions lo the computet library of the serious 
pfogrammer as well as the casually interested. Written 
in a lechnicai, yet easy-to-read and understandable style. 
Each book includes: 

• detailed tables o1 contents and indexes, alphabetical 
and numerical tables with numerous cross references. 

• register setup going into routines. 

• register results conning out ol routines. 

• detailed explanations on all roulines. structures, 
codes, etc., and not just a few ambiguous comments 

• Numerous summaries lor ease of book use. 

Special . . . all three $49.95 

SORT/CMD 

• muHi-key (to 14 fields); Multi-tag (to 14 more fields) 

• sort any combination of variable type 

• integrates easily into any existing program 

$19.95 each Disk or non-Cisk. Model I or III: 32K or 4aK 

PATCHES 

to allow operation of many Model I programs on the Model III: 

• LM OFFSET/CMD, SuperzapCMD' 

• RSM 2D/CMD 10K, 32K, 48K' 

• Big Five Software Games (all games)' 

$5.95 each Many more . . send lor brochure' 

DISK DIRECTORY INDEX PROGRAM (Model iii only) 

• Maintain a master directory listing and file all diskettes 

• Index size limited only by diskette space available 
and number of diskettes on which the index will be 

maintained, 

• Summary by file name, diskette, or extension. 

Direct/BAS $14.95 

Direct/CMD $24.95 (enhanced, more powerful, faster) 

Send check or money order [Kansas residents 
add 3% sales lax) to Twenty-First Century Software 
1607 North Cochran Hutchinson, Kansas 67501 
Call 316 663-t047 for additional information. 




RegiSlerea Iradema-Ks or products 0( 'Tandy Coro , 'Aopatal Inc 
'Small Systems So'tware. 'Big Five Software Company 
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to your local newspaper or printing office 
and obtain an exact-size (100%) film nega- 
tive. Clamp the negative firmly against a 
piece of negative photosensitive PC board 
(from Kepro or Vector) in a photo proof- 
sheet frame, under a vacuum table, or just 
under glass weighted all around so there 
is no space between the negative and the 
PC board. The words "Coco Lowercase" 
should read correctly. 

You may make your own board with 
negative PC photosensltlzer. Work only 
under darkroom lighting or on the other 
side of the room from a shaded, dim, yel- 
low bug light. Expose the tward with a 
3200 degree tungsten photoflood bulb 
(available at any photo store) at a distance 
of two feet for seven to ten minutes. Devel- 
op the board for one to two minutes in PC 
board devsioper (Kepro or Vector), and 
harden the emulsion in an oven at 2(X) de- 
grees for about one half hour or by drying 
overnight. Drop the board into a glass or 
enamel tray of ferric chloride, face up, and 
gently agitate about a half hour until all 
the copper has been removed except 
where the traces are present. Wash the 
board thoroughly, dry it, and drill all the 
holes with a #66 hobby drill; this Is most 
easily done in a small drill press. Cut the 
post hole to the outside edge of the cop- 
per band. Remove the remaining emulsion 
with steel wool, butting until the copper is 
very shiny. Wipe the board clean with a dry 
cloth, and begin mounting the parts. 

Mount the jumpers first; there are 42 of 
them. Put the resistors and capacitors in 



place next. Then mount the integrated cir- 
cuits. If you use sockets, the RF shield will 
need extra help to remain In place. 

The final few steps are a bit tricky. In- 
sert a 40-pin wire-wrap socket three- 
quarters of the way into the board; refer to 
the parts layout (Fig. 7) to be sure you put 
it into the correct set of 40 parallel holes. 
Solder all 40 pfns Into place so that about 
Vi inch of wire wrap pin protrudes from 
the bottom of the board. Now clip the 
socket off, snipping close to the top of the 
t}oard. Pull all the pins out of the socket, 
and slip the socket over the pins which are 
soldered to the board. It becomes a 40- 
hole grommet, helping the pins stay 
straight and guiding them for Insertion in 
the VDG socket. 

A 40-pin, solder-tail socket is inserted in 
the remaining ho^es on the board. It 
should fit easily In place; if Its pins do not 
protrude through the board, double check 
that you have clipped the tops of the wire 
wrap pins closely. 

Open the computer and remove the 
metal RF shield. Find the VDG, a6a47 chip 
mounted at the back left of the metal 
cage. Now remove the VDG from its sock- 
et. Lift it very gently with a nail file, rocking 
the file from side to side. II the chip moves 
a little and then sticks, push it back down 
and start again. Gradually It will work free. 
Insert It In the 40-pin socket on the new PC 
board. The wire wrap socket pins are posi- 
tioned over the VDG socket and the post 
goes through the hole in the board. Shine 
a bright light through the hole, and look 




This tex-f is not *s ^ttr^c 
Q^c^asB it uses the old No<t«l 
character 3efief a tor. If there 
3^^eratars ^vaxia^igF theS «#ill 
a3<5 excellent teaPorar^ <»is9|a^ 
^vices- The charactei" set- 
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Photo 8. Older Model I character generator produces text more acceptable Ihari the col- 
or machine's inverted system, but does not have descenders. Text shown in this photo 
has peculiar grammar. 



through. Fit the wire-wrap pins into the 
VDG socket, and press gently but firmly 
until it secures in place. The modification 
is now complete. 

If you read this last paragraph with con- 
sternation, it probably means that your 
VDG is soldered in place. The first three of 
four thousand Color Computers were pro- 
duced this way, mine among them. Un- 
soldering the VDG and inserting a socket 
is an unmitigated pain, demanding pa- 
tience and over an hour. You will 
need— and don't do this without— solder 
wick or other flux-impregnated solder-re- 
moving braid, and fine solder. Do not at- 
tempt to remove this circuit unless you 
have the proper materials ready and are 
willing to take the time to do it correctly; 
the process cannot be rushed. 

Make sure the line cord is unplugged, 
then pull off the power supply connectors 
from the main board and from the power 
cord. Mark down their positions as you do 
this. Remove the screws holding the pow- 
er supply in place (two are recessed into 
the board against the fXfwer transformer). 
Lift out and set aside the power supply. 

Unplug the keyboard from either the 
computer or keyboard end, and set it 
aside. Remove the screws from the PC 
board (there are a dozen), and lift the en- 
tire board out of the case. Easy so far. The 
bottom of the PC board is completely cov- 
ered with a metal plate, but this removes 
easily. It Is held In place by nifty little ex- 
pansion rivets. Push on each one. very 
gently but firmly, with the eraser end of a 
pencil until it works out of the board. Even- 
tually the metal shield will fall free. 

Lay the solder wick on the VDG pins on 
the underside of the board, and heat It and 
the pins with a soldering iron until the 
solder flows off the VDG pins into the 
solder braid. Check the temperature of the 
VDG as you work, and stop to let the iC 
cool off completely if it gets uncomfort- 
able to the touch. Its pins are rated 325 de- 
grees for 10 seconds, so don't exceed 
that. Eventually there will be very little 
solder remaining, most of it having been 
sucked out of the PC board holes into the 
braid. Test each VDG pin from the bottom 
with your fingernail to see if it Is free from 
the hole; a slight push should snap it away 
from the hole wall. Otherwise, desolder a 
bit more. 

When the chip is finally free, lift it out 
and set It aside on some aluminum foil or 
black protective foam. Clean the solder 
flux off the board with 3M belt cleaner 
#78-9020^)006-2. Insert a 40-pin socket 
and solder hairs, balls, or shorts. Push the 
plate back on the PC board, pressing each 
rivet back in place. Replace the board in 
the case, screw it down, reinstall the key- 
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board and power supply, and power up. All 
should be well. Breathe deeply. 

Lowercase at Last 

Now the test. Double check for correct 
insertion of all integrated circuits, Jump- 
ers, resistors, and the VDG Itself. Also re- 
check the wire-wrap extender pins, mak- 
ing sure they fit Into the socket exactly. 
The finished installation should look like 
Photo 7. Now restore power to the Color 
Computer, if you have set the switch in the 
new generator's position, or if you chose 
not to install the switch option, your sign- 
on message should appear. It will look 
mostly the same, except that the O's are 
no longer square and the zeros are 
slashed. The top row of letters will also 
touch the top border of the screen. Enter 
this program: 



10 CLS 

20 FOflX = OT0 2M 

» PRINT CHRJ(X)i 

40 NEXT 



The screen will clear and all your print- 
able characters will appear, including real 
lowercase letters with descenders, as in 
Photo 8. if you have the old Model I 
character generator, the character set will 
look Instead like Photo 9. 

If you have installed the switched op- 
tion, flip back to the original mode. The re- 
versed uppercase characters reappear in 
the place of the lowercase ones. To de- 
monstrate the difference dramatically, 
leave the old system switched in, and 
enter this program: 



10 CLS 

20 A$ = INKEYS 

30 PniNTASCHRS{g6>CHR$(B); 

40 GOTO 20 



r— s 



NO CHANGE 



I 



This is a simpleminded text display. Begin 
typing, using shift -0 to produce lowercase 
(reversed) letters. Punctuation and upper- 
case are normal. Fill the screen with text 
until It is a blotchy mess. Now flip the 
switch to engage the new lowercase gen- 
erator. What a good feeling. 

Problems? if you have a black, jittery 
screen with unidentifiable characters, 
check to see that the VDG is seated prop- 
erly In Its socket, and that the external 
generator board is pressed firmly into the 
PC board socket. Also check for cold (im- 
proper solder joints on the board, or bro- 
ken, cracked or scratched PC traces. If the 
screen displays the wrong characters 
(mixing lowercase with uppercase, num- 
bers or control characters), check the 
soldering on the 74LS86 or the 74LS04. if 
there Is no display, see that the external 
generator board is pressed Into the Color 
Computer socket correctly, and that the 
pins are not offset by one position to the 
right, if alphanumerlcs and graphics are 
mixed oddly, make sure that the 74LS04 
and 74LS125 are Inserted in the correct di- 
rection, if the screen Is a garbled mess, 
look closely at pin 33 of the VDG, checking 
for solder hairs or shorts. For any other 
problems, recheck all of your work. 

Whtre to Get Parts 

A complete kit of parts for the video buf- 
fer/amplifier is available for $7.50 post- 
paid from MSB Electronics, Drawer 766, 
Barre, VT 05641. The lowercase modifica- 
tion board is available complete and ready 
to install for $89.95 (7x9 matrix). 

Printed circuit traard supplies are sold 
by Vector Electronic Company, 12460 
Gladstone Avenue, Syimar, CA 91342 or 
Kepro Circuit Systems, 630 Axminister 
Drive, Senton, MO 63026 

Integrated circuits and transistors for 
these projects are commonly available; 
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see the classifieds in computer and elec- 
tronics publications. The 5x7 Model I 
character generator is part number 
AXX3027 (type SCM37530P/8046673), 
from Radio Shack, also known as the 
word processor generator; the price var- 
ies. The 7x9 character generator is sold 
by Jade Computer Products, 4901 West 
Rosecrans Ave., Hawthorne, CA 90250, 
part number ICP-MCM66740P, $13.25. 

For removing soldering flux, 3M Belt 
Cleaner (part number 78-9020-0006-2) is 
sold by 3M, Visual Products Division, St. 
Paul, MN 55144. Eight-ounce samples 
(enough to last years) can be obtained at 
no charge from service representatives. 

Updates 

• I continue to get mail asking about 
the Memory Sidecar (February Applica- 
tions), it Is available complete or as a PC 
board from the Peripheral People, P.O. 
Box 524, Mercer Island, WA 98040. Write 
for Information. 

• Thanks to the readers who sent in 
new and innovative solutions to the Game 
of Life, using Hooper's algorithm. I will be 
presenting some of those intriguing solu- 
tions from time to time in the future. 

• My sincere apologies to any readers 
who waited to receive a copy of my book. 
The Custom TfiS-80. Due to a 3,000-mile 
hassle over editorial control, the book was 
Inexcusably delayed. 

• Corrections to high-resolution 
graphics tward (The Detailer, July Ap- 
plications): 

1. In Fig. 1, Z8b is shown as a three- 
input NAND gate. It is a three-input 
ANDgate,type74LS11. 

2. Pin numtwrs were omitted from Z32. 
Z32A, Inputs 1-2, output 3. Z32B, inputs 
4-5, output 6. Z32C, inputs 9-10, output 
8. Z32D, Inputs 12-13, output 11. 

3. Pin numbers were omitted fromZ33. 
Z33A, Inputs 2-3, output 1 . Z33B, inputs 
5-6, output 4. 

4. The TRS-80 SYNC connection was 
omitted. It Is found at Z32 pin 1 1 in the 
TRS-80. 

5. The 10 mF 16V capacitor connected 



Fig. 8. Schematic changes for using ihe MCM66740 (or other members of the MCM66700 
family) character generator, providing a 7-by-9 dot matrix. 
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Fig. 9. Comparison of internal VDG char- 
acter set with Model I character genera- 
tors. The earliest generator also differs in 
that the lowercase letter "a " is above the 
baseline. 
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MICROCOMPUTERS 

We have consistently offered the TRS-80 line 
at savings up to 20%. You can save up to 
$1500 by buying from Computer Discount of 
America. 

M«#el II 

26-4002 64K, 1 disc (3385.80 

Miriel III 

26-1051 4K, Level I % BtO.M 

26-1062 16K. Level III $ 845.10 

28-1066 48K. Level II 2-drive/RS-232 $2115.K 

CilOT Cimpyter 

26-3001 4K 

26-3002 16K ff/Ext. Basic 



i 325.00 
$ 489.00 

\ 375.01 
% 4I5.N 

% 585.00 




EPSON 

MX70 Printer 

MX80 Printer 

MX80FT Printer 

ATARI 

MICROCOMPUTERS 

We have the full line of ATARI personal 
computers and systems. 

Our savings are as big on expansion inter- 
faces, printers, diskettes, Apple Computers, 
OKIDATA Microline, CITOH Starv^riter. 
Lexicon Modems — everything for your 
computer. 

We fiave the largest inventonr in ttie Nortli- 
east, and most models are in stock, for 
immediate delivery. Our full price catalog or 
a price quote is as near as your phone. 



CALLTOLLFREE: 
800-526-5313 



Computer 



of America 



COMPUTER DISCOUNT OF AMERICA. INC. 
15 Marshall Hill Road.WesI Milford Mall 
West Millord. New Jersey 07480-2198 
In New Jersey Call 201-728-8080 
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to Z33A stiould be labeled C8. 

6. In Fig. 2, pin numtwrs were omitted 
from Z31. Z31A, inputs 1-2, output 3. 
Z31 B, Inputs 4-5, output 6. Z31C, Inputs 
9-10, output 8. 

7. In Fig. 4 and the parts list, ttie values 
ot C6 and C7 are omitted. Ttiey are 750 
pF and .022 mF, respectively. 

8. Ttie values for VCR1 and VCR2 w^ere 
omitted. They are tratti 100K otims. 

9. IC Z30 includes the transistor im- 
mediately to its right on the schematic, 
to. In Fig. 5, the 19.8 VDC line is shown 
connected to the case of the DIN plug. 
It should be connected to pin 2 of the 
plug. 

11. The resistor In the power supply is 
unmarked. It should be listed as R28, 
100 ohms, V2 watt. 

12. The bridge rectifier value is miss- 
ing, tt Is 2 amps, 100 volts. 

13. In Figs. 1 and 2, the lines labeled 
MRA5 and MCA5 should read MRAS 
and MCAS. 

14. The lines labeled M, MA, C, CA, MD, 
and CD were not clear. "M" means a 
connection to the matching line on the 
high-resolution board; "C" indicates a 
connection to the computer's edge 
connector. For example, CD1 means 
computer data line 1 , and MA13 means 
high-resolution board address line 13. 

15. In the text in the first paragraph on 
page 60, a V-Sync and H-Sync control 
is mentioned. These references are to 



an earlier working version of the tx)ard; 

none are needed in the version shown. 
There has been some reader interest in 
a PC board for The Detailer. If you are firm- 
ly interested in a board priced at the $50 
level (less parts), please drop me a post 
card— not a letter. PC t>oards are frightful- 
ly expensive to produce. I found that out 
when the 70 folks demanded a PC board 
for the Micro Front Panel project and it up 
and up and disappeared into the postal 
twilight zone. 

• Speaking of the Micro Front Panel 
(ahem), it is now available as a complete 
kit of parts for $45, or PC board alone for 
$15, from MSB Electronics (see above). 

• Finnally, some humor. I've spoken 
occasionally of bruised machines which 
nestle temporarily on my workbench. 
When 1 opened the computer Dan sent, I 
was reminded of illustrator B Kllban's 
"How To" cartoons. So, with apologies to 
Kiiban and sympathies to Dan, I present 
Photos 9 and 10 — before and after shots 
of a poor Model I.I 

Upcoming 

Buffers, bubbles, and blips. 




Photo 9. Wrorjg. 



Photo 10. Right. 
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GRAPHICS . .THE LNW80 COMPUTER 



COMPARE THE FEATURES AND PERFORMANCE 
F£ATim£S LHW80 PHC-BO' 



TRS-80* 
MODEL I [I 




Jhen you've coipared the features of ar LKW80 Ccmputer, you'll quickly 
understand nhy the LHW80 H the gitlwte THSBO software conpatlble syste". 
LNW RESEARCH offers the most complete mkrocoevuWr systen at an outstand- 
ing low price. 

Ue back up our product xith ar unconventional 6 month warranty and a ID 
days full refund policy, less shipping charges. 

LNweO Computer SI ,450-00 

LNW80 Computer w/BiW Hanitor i one 5" Drive SI. 914. 00 

All orders rnust be prepaid, CA residents please Include 6% sales tai. 
contact us for shipjiinq charges 

' IRSaO Product of Tandy Corporation, 

'■ PMC Product of Personal Microcomputer, Inc. 
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LESS HOMITOIl AMD DISK DRIVE 


$1,450.01) 


Jl, 375.00 


— 



LNW80 

- BARE PRINTED CIRCUIT BOARD a HANUAL 



169.95 



The LNW80 - A higfi-speed color comwiter totally conpatlble with 
the TRS-eo*. The LNW80 gives you the edge in satisfying your 
computation needs In business, scientific and personal confuta- 
tion. With perfor™f>ce of 4 HH?, 280A CPU, you'll achieve per- 
formance of over twice the processing speed of a TRS-80'. This 
means you'll get the performance that Is ccnparable to the BOst 
expensive nicrocomputer with the ccmpatibility to the world's 
most popular cM^uter (TRS-80') resulting in the widest soft- 
ware base. 

FEATURES: 

. TRS-EO Hadel I Level II Software Compatible 
High Resolution Graphics 

RGB Output - 384 X 192 In 8 Colors 
. NTSC Video or R7 MOO - U8 i 19E in 8 Colors 
. Black end White - 480 < 192 
4 Hi! CPU 

500/1000 Baud Cassette 
Upper and Lower Case 
16K Bytes RAH, I2i; Bytes ROM 

Solder Hasted and Silkscreened 



INW SYSTEM EXPANSION 

BARE PRINTED CIRCUIT BOARD 

AND MANUAL t69.95 

KITH GOLD CONNECTORS $84.95 



The System Eipansion will al10w you to expand your LHW80, TftS-80 
or PMC-BO" to a conpiete corputer system that is still totally 
soflnare compatible with the TRS-BO- Hodel 1 Level II. 

FEATURES: 

32K Bytes Memory 

5" Floppy Controller 

Serial RS232 20ma I/O 

Parallel Printer 

Real Time ClocJi 

Screen Printer Bus 

On Board Power Supply 

Solder Masked and Silkscreened 



LNW RESEARCH 

C OR PORA T ION 
2620 WALNUT 
TUSTIN CA. 92680 ^sn 



LNDoubler&DOS PLUS 3.3D 

- Assembled and Tested h/DOS plus 3. 3d S175.00 

Double' density dnk storage for the LNH Re!earch's ' System Expan- 
sion" or the Tandy's 'Expansion Interface". The LNDoublerTM u 
totally software coivatlble with aiiy double density software 
generated for the Percom's Ooubler"*. The LNDoublerTH provides 
the following outstanding features. 

Store up to 350K bytes on a single 5* disk 

Single and double density data separation 

Precision write precoopensation circuit 

Software switch between single and double density 

Easy plug in installation requiring no etch cuts, ju^rs 

or soldering 
35. 40, 77. 80 track 5" disk operation 
120 day parts and labor Warranty 

*" Doubler Is a product of Percom Data Cumpariy, Inc. 

DOS PLUS 3.30 

Hicro Systems software's double density disk operating system. 
This operating systera contains all the outstanding features of 
a well developed DOS, with ease In useability. 

KEYBOARD 

UN80 KEYBOARD KIT J84.95 

The Keyboard Mt contains a 63 key plus a iO key, P.C. board, and 
regaining components. 



CASE 



UIW80 CASE $84,95 

The stresnline design of this netal case will house the LNU80, 
LHN Syiten Eipansfon, LNW80 Keyboard, power supply and fan. 
LNOoubler'I'l, or LNU Data Separator. This kit includes all the 
harAiart to nount all of the above. Add $12.00 for shippinq 

PARTS AVAILWLE FROM LNU RESERARCH 
. 4116 - »IDns RAH 

e chip set S26.O0 

8 Chip set SJ3.S0 

16 chip set tM.OO 

24 chip set J94.00 

32 chip set $124.00 

. LNWBO "Start up parts set" LNW80-1 $82.00 

. LHH80 "Video parts set" LNW80-2 $31.00 

. LNUBO Transformer LNH80-3 $18.00 

. LNH80 Keyboard cable LNH80-4 $16.00 

40 Pin computer to expansion cable $IS.00 

Systeo Enpanslon Transforoer $19.00 

. Floppy Controller (f0177l) and UAHI [TR160Z) . . . MO.OO 



ORDERS & I N FO. NO. 714 - 544 - 5744 
SERVICE NO 714-641-8850 



VISA MASTER CHARGE 
ACCEPTED 



UNLESS NOTED 

AOO $3 FOR SHIPPING 



NEW PRODUCTS 



edited by Janet Fiderio 



Business Feature — The CR-180 
Cash Register/POS Expansion System 




The CR180 cash register/POS expansion system 



Cash Register 
Expansion System 

The CR-180, a cash register/POS ex- 
pansion system for the TRS-80 Model 
III has been announced by FutureSoft 
and ICR. The system includes an elec- 
tronic cash drawer and receipt printer 
which plug directly into the TRS-SO 
Model III. (The software will support 
Radio Shack or other printers.) Audio 
has been added for keystroke confir- 
mation. 

The CR-180 software provides the 
operator with continuous instructions 
at the point of sale and allows manage- 
ment to rapidly change promotional 
messages printed on customer re- 



ceipts and displayed for the operator. 

CR-180 stores transactions for up to 
100 employees, saves eight methods 
of payments and provides inventory 
control and complete reporting. The 
system produces reports including 
daily sales and cash reports by em- 
ployee and by transaction type, inven- 
tory usage and gross profit computa- 
tion. Price and shelf labels are also 
printed. 

Software for the Cash Register Ex- 
pansion System was developed by Fu- 
tureSoft and is available In foreign lan- 
guage versions. Prices range from 
$900 to $1900. Contact ICR/FutureSoft 
Southern Region, P.O. Box 1446, Or- 
ange Park, FL 32073, for information. 

Reader Service • 161 



Word Processor 

For the Color Computer 

C. C. Writer is a line-oriented word pro- 
cessor designed for the TRS-80 Color 
Computer with Extended Color Basic and 
16K. The program may be initialized in a 
32K format to take advantage of the ex- 



pansion products available. C. C. Writer Is 
written In Extended Basic. 

The menu allows full control of mar- 
gins, line spacing, justification, para- 
graph indentation and page pause for sin- 
gle sheet feeding. Commands embedded 
In the text control Include line skipping 
and forcing, new paragraphs, page forc- 
ing, centered texts, tabs and indentation 



of both margins. ASCII control codes may 
be Inserted In the text to control "smart" 
printers or create print graphics. 

Editing abilities allow insertion, dele- 
tion, or modification and blocks of text to 
be moved on command. 

The package Is priced at $30 from 
Transformation Technologies, 194 Lock- 
wood Lane, Bloomingdale, IL 60108. 

Reader Service ^ 325 

Software Is for Business 

Occupational Software Is offering two 
new programs of interest to the business 
community. 

The business Accounting Control Sys- 
tem for Models i and III features accounts 
receivable, billing, Inventory control, ac- 
counts payable, payroll, job costing and 
general ledger programs. TMs comprehen- 
sive software system is priced at $4500. 

The Restaurant Accounting Control 
System features accounts payable, pay- 
roll, sales analysis, labor planning. Inven- 
tory control and general ledger programs. 
It runs on the Model M. The system, sold by 
module. Is priced from $1000-$7500. 

Both systems are available from Occu- 
pational Software Co. Inc., 22311 Ventura 
Blvd., Suite 123, Woodland Hills, CA 91364. 

Reader Service ^ 336 

Add CP/M to Mod III 

The Freedom 3 Is a modification that 
adds CP/M capability and more to the 
Model ill. it Includes added memory, mem- 
ory restructuring and a battery-backed 
date calendar clock. 

The memory addition replaces the ROM 
in 2K segments up to the entire 14K ROM 
size. The alternate memory can be either 
EPROM/ROM or RAM. This system Is com- 
patible with TRSDOS and other operating 
systems, will operate on Intermixed drives 
and may be ordered on either 40 or 
80-track disks. 

Freedom 3A provides address restruc- 
turing and the operating system for CP/M 
for $199. Freedom 3B is a 40K user space 
system also, but may be user upgraded by 
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adding ICs to a full RAM system, with bat- 
tery back-up of either or both the clock 
and memory for $340. Freedom 3C pro- 
vides the full RAM, battery backed-up 
clock and a CP/M-type operating system 
that provides 54K of user space for $490, 

For more information contact Field En- 
gineering Consuttants, Ltd., Box 2368, 
Woburn, MA 01888, (617) 944-5329. 

Reader Service ^ 326 

Ecology Simulations I 

Use of a new computer simulation 
game, Sterl, has computerists trying to 
eradicate the Mediterranean fruit fly. This 
simulation permits the use of two meth- 
ods of pest control— pesticides and the 
use of sterile males, either atone or 
in combination. 

Sterl is one of four simulations In the 
package Ecology Simulations I. Other pro- 
grams in the package include: Buffalo, 
which simulates the Buffalo population of 
1850; Tag, a simulation of the tagging and 
recovery method of measuring animal 
populations; and Pop, a simulation of ani- 
mal population management. 

Available for Model I, Level tl, It costs 
$24.95 from Creative Computing, 39 E. 
fHanover Ave., Morris Plains, NJ 07950, 
(201) 5400445. 

Reader Service ^^ 168 

"HOT LIPS"— 
A Soldering Tool 

Mot Lips is a hand held electrical 
resistance tool for intricate soldering 
operations. Its unique plier-like design 
enables the user to produce perfect sol- 
dered connections in tight places. 

This Triton Manufacturing tool Is six 
volts safe and Is furnished with a remote 
transformer power supply. It's instant- 
heat on, instant-cool off means minimum 
power use. Hot Lips is sold for $50.20 from 





The TRS-80 Pocket Computer Printer arid Interface. 



Triton's "Hot Lips" soldering looi 



Triton Manufacturing Company, P.O. Box 
263, East Haddem, CT 06423. 
Reader Service y 178 



Printer/Cassette Interface 
For The Pocket Computer 

Radio Shack now offers a printer and 
cassette interface for its Pocket Comput- 
er. This product connes with batteries, an 
ac adapter/charger, cassette recorder 
connecting cable, replaceable printer rit> 
bon cartridge, additional rolls of paper 
and an owner's manual. 

The cassette interface allows programs 
and data to be loaded, saved and recalled. 
A remote switch allows manual control of 
the tape recorder. Connections twtween 
the printer/cassette interface and the com- 
puter are made directly, without cables. 

This printer/cassette Interface is priced 
at $149.95 from Radio Shack, 1800 One 
Tandy Center, Fort Worth, TX 76102. 

Reader Service ^ 337 

Educational Games 

Jabbertatky is a programmable word 
game for one or more players. It includes 
two game features, a utility program and 
eight levels of skill. 

The first, Alphagrammar, an anagram 
game, challenges players to unscramble 
an entire grammatically correct sentence. 
The second game. Cryptogram mar, is a 
code-breaking game in which players are 
given a computer-generated sentence 
where each letter of the alphabet is sub- 
stituted for another letter. You must try to 
determine the correct arrangement before 
your time runs out. The special utility pro- 
gram, Jabbergrammar, stores lists of 
words for each part of speech. 

Jabbertalky is available on cassette for 
the Model i with 16K. or on disk for 32K. 



Contact Automated Simulations, Inc., Box 
4247, Mountain View, CA 94040, for more 
Information. The retail price is $29.95. 
Reader Service ^^ 345 



Maglkube, the 
Computerist's Version of 
Rublk's Cube 

Magikube Is a game available on cas- 
sette for the Radio Shack Color Computer. 

Based on the Rubik's cube, you have 
the option of scrambling the cube yourself 
or letting the computer do it. The objective 
is to restore the cube back to its original 
state. Magikutie also has a tape save fea- 
ture allowing you to save your cube and 
continue at a later time. 

Magikube costs $19.95 and is available 
from Computerware, Box 668, 1 472 Encini- 
tas Blvd., Encinitas, CA 92024, (714) 436- 
3512. 

Reader Service ^ 162 

Program 

Evaluates Solar Systems 

Sunheati is used to put together and 
evaluate a variety of solar hot water sys- 
tems, it will determine the effectiveness of 
various types of solar collectors, heat ex- 
changers, preheat tank sizes and hot wa- 
ter tank sizes for your needs. 

Once the system has been configured, 
the program calculates the amount of 
useful solar energy that can be collected 
each month and the percentage of hot wa- 
ter needs that can be supplied by solar 
means on a monthly and yearly basis. 

Sunheati is written in Basic and re- 
quires a Model 1 Level II with 16K; the cost 
Is $16. For more information contact So- 
lartek. Box 298, Guilderland, NY 12084. 

Reader Service t^ 344 
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NEW PRODUCTS 




Superscript 



Superscript 
For the Model 



Acorn Software has developed a Model 
III version of Superscript for the TRS^ 
with 32K of RAM, expansion interface, 
disk drives and lowercase modification. 

The product features: directory and kill- 
files from within Superscript; ability to 
pause while printing and insert text; serial 
drivers which use the ETX/ACK protocol 
for 1200 baud communications; special 
drivers for various printers; ability to su- 
perscript, subscript, underline, boldface, 
select 10/12 pilch, or use brackets, braces, 
carets, and more. 

Superscript costs $50 and Is available 
from Acorn Software Products, Inc., 634 
North Carolina Ave., S.E., Washington, 
D.C. 20003. (202) 544-4259. 

Reader Service i^ 350 

The Newest Versamodem 

BIzcomp Corporation's newest Versa- 
modern, the Model 1080, provides users 
needing only a minimum feature modem 
with a direct -connect alternative to older 
acoustic couplers. 

The modem can be used with personal 
computers at rates of 300 baud and below 
using Bell standard 103 protocol. The Ver- 
samodem Is FCC registered and supplied 
with a modular plug for direct connection 
to the telephone network. 

The price of the modem Is $119 and Is 
available from the Bizcomp Corporation, 
Box 7498, Menio Park, CA 94025, (415) 966- 
1545. 

Reader Service t^ 335 



Precision Template 

ABS Suppliers Is offering a new product 
that will increase your disk storage capaci- 
ty 1 00 percent. The ABS-Doubier is a preci- 
sion template that permits the conversion 
of single-slded disks to double-sided disks. 

The Doubler Is sold by ABS Suppliers, 
Box 8297, Ann Arbor, Ml 48107, (313) 971- 
1404, tor $3.50. 

Reader Service ^ 171 



Disk Speed Measurement 
For the TRS-80 

RPM measures the rotational speed 
and variation of disk drives on the TRS-80 
Models I and III. RPM makes It very easy 
for the user to see the speed, percent er- 
ror, and history of speed variation on any 
mini-floppy connected to the TRS-80. 

Readouts are given in real-time, and are 
shown In numbers, percents, words and 
graphs. With one Keystroke any drive may 
be selected. RPM automatically shows all 
speed ranges and can recover from severe 
errors without requiring a system reset. 

The product is available on disk for 
$24.95 from Prosoft, Box 839, North Holly- 
wood, CA 91603, (213) 764^131. 

Reader Service t^ 327 



Graphics 

Editor and Programmer 

The Graphics Editor and Programmer is 
a hybrid program that is part text editor, 
screen drawing utility, and Basic program 



creator. This product requires no knowl- 
edge of basic programming skills. 

GEAR contains a full command library 
which allows you to create screen images 
and formats. The software will save your 
drawing by constructing a Basic program. 
The program will stand alone, does not re- 
quire any special drivers or operating 
systems and will recreate the screen Im- 
age you have drawn. 

The Graphics Editor and Programmer is 
available for the Model I priced at $16.99 
from J F Consulting, 74355 Buttonwood, 
Palm Desert, CA 92260. 

Reader Service y 331 

Eliminate 

Tedious Commands 

Autoflle allows the Basic programmer 
to automate the task of moving data ele- 
ments to and from a direct file. 

Autoflle has eliminated the Field state- 
ment thereby eliminating guessing as to 
where the Fielded variable is. In addition 
the ASC and CMR$ function references 
will be performed automatically. 

The price of this product is $75. For 
more information contact Snappware, 
3719 Mantell, Cincinnati, OH 45236, 
1-800-54*4628. 

Reader Service »^ 341 

District Courseware 
Authoring System 

CASE, the District Courseware Author- 
ing System, consists of 14 programs on 
two disks and two cassettes, it is of inter- 
est to school districts. 

CASE provides for the centralized de- 
velopment of customized courseware for 
controlled distribution throughout an 
entire school system. This system does 
not require a knowledge of programming; 
includes automatic lesson to lesson 
branching, performance records on disk 
by date, time, student ID, lesson and ques- 
tion, and more. 

For Information contact the Micro- 
Gnome Division of Fireside Computing, 
Inc., 5843 Montgomery Road, Elkridge, 
MD 21228, (301) 7964165. The cost of this 
courseware Is $395. 

Reader Service .^ 160 

Software 
Development System 

The SDS80C Is a complete 6809 editor, 
assembler and monitor package contained 
in one Color Computer program pack. 
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APPARAT OFFERS 

More bytes per buckl 



Tcs or storage^ 1 1 \ a Mn^f> 
Mcwdos/eo version 2.0 <- 
capability of double density drtvefi, 
so you'll have greater applications 
for your TRS-80'' model I and III. 

Drives plug directly into an ex- 
pansion interface (requires Instal- 
lation of a double density control- 
ler) or the model Ml disk bus with 
our single volume cable so you 
can now have over 2 megabytes of 
storage on-line with standard 
mini-floppy dIsKettes. Cach drive 
has up to 575 free grans, for a 
total of 1.719, on a maximum of 
three 80 track drives, which can be 
added to a TRS-80 model I. Model 
Ill's can have up to 4 dual 80*5 
online (almost 3 megabytes). 

These drives can "read' standard 
35 or 40 track diskettes using 
riewdo&'80 version 2.0 which will 
allow skipping every other track. 



Drives come 
complete with 
case, power sup- 
ply and docu- 
mentation. The 
drives are priced 
at only $515 (Cat. 



m 



no. 1-705, specify 1 or 111). Flow, at 1424 
bytes per buck, it just might be the answer 
to ynur storage problems. Special — IWo 
dual 80 track drives only $999. 



"^ Apparat.lnc. 

440ISaamancF^rK«w^. Denvn. CO 80237 (3031741-1776 



.'2b4 



'-on QOiriG SUPPORT FOR MICROCOMPUTERS' 



NEW PRODUCTS 



The screen-oriented editor features 
finds, changes, moves, copies and more. 
Aii keys have auto repeat, and no iine 
numbers are required so the full width of 
the screen can be used to generate com- 
mented code. 

The assembier features a complete 
6809 instruction set, a complete 6800 set 
supported for cross-assembly, condition- 
al assembly, local labels, assembly to 
cassette tape or memory, listing to screen 
or printer and mnemonic error codes In- 
stead of numbers. 

The ABug monitor Is a compact version 
of CBug. It features examine or change of 
memory or registers, cassette load and 
save, break-points and more. 

SDS60C Is priced at $89.95 from The Mi- 
cro Works, Box 1110, Del Mar, CA 92014, 
(714) 942-2400. 

Reader Service ^ 332 

Software for Physicians 

Medical Office Management is a soft- 
ware applications package which provides 
medical offices with a system which main- 
tains general patient information files, of- 
fice appointment schedules, maintains 
and prints the dally transactions log, 
prints procedure-by-procedure manage- 
ment reports, prepares and prints private 
patient bills, and prepares patient insur- 
ance claim forms. 

The system includes an online Help 
function In addition to extensive docu- 
mentation. This software requires either 
two or three disk drives, a 130-column 
printer, and a 48K Model I Level II or Model 
III (Basic III) with TRSDOS. The price is 
$499.95. For more information contact 
Charles Mann and Associates, Micro Soft- 
ware Division, 55722 Santa Fe Trail, Yucca 
Valley, CA 92284, (714) 365-9718. 

Reader Service >^ 347 

Sales Tax Calculator 

For small businesses reporting state 
sales taxes quarterly, Manhattan Soft- 
ware has released the TR5-80 Sales Tax 
Calculator. 

The program automatically separates 
entries coded taxable, calculates and dis- 
plays the tax on screen, and adds sales 
categories and tax due. The user may op- 
tionally enter tax actually charged on 
each sale. The program will hold up to 500 
entries in 16K, and 1500 in 32K. 

The cassette is priced at $14.95 for 
Models I and III. For more Information 
contact Manhattan Software, Box 1063, 
Woodland Hills, CA 91365, (213) 704^95. 

Reader Service ^ 330 



Create Formatted Screen 
With a Single Command 

Automap simplifies the programmer's 
task of communicating and displaying in- 
formation with the user-operator. Simple 
send and receive statement commands 
will communicate and display the infor- 
mation you want. 

Automap is available for Models II and 
111 for $100. For more information contact 
Snappware, 3719 Mantell. Cincinnati, OH 
45236, 1-800-543-4628. 

Reader Service »^ 342 

For your Typewriter 

Dynatyper/Dynastar is a new typewriter 
system designed to generate printouts di- 
rectly from computer output through any 
electric typewriter. 

The interface fits directly over the key- 
board and requires no modification to 
your typewriter. It is RS-232 serial, Cen- 
tronics parallel, IEEE 488(GPIB) and 15-pin 
current loop compatible. Features include 
a 3.5K RAM buffer, 37.5 to 9600 switch- 
selectable baud, top-of-form option, 80 or 
132 option, and downloading capability to 
four special character sets. 

It Is available for Models I and III for 
$699 from Rochester Data, 3000 Winton 
Road, South, Rochester, NY 14623, (716) 
244-7804. 

Reader Service *' 164 

Model II Gets SoftCare 

SoftCare, a medical billing system, pre- 
viously used only on minicomputers and 



larger Z80 systems, is now available for 
the Model II. 

It prepares patient bills and insurance 
claims, maintains accounts receivable and 
transaction details and is user-friendly. 

It is available for$l995 from Profession- 
al Business Software, 119 Fremont St., 
San Francisco, CA 94105. 

Reader Service .^ 340 



Energy Saving Analysis 

The Home Energy Cost Saving Analysis 
program for the Models 1 and ill is de- 
signed to evaluate the cost/benefit of heat 
saving home improvements. 

To accomplish this the program models 
the current surface area of your home us- 
ing the "R" factor of each material used to 
construct your home. The computations 
for 29 building materials and seven types 
of heating fuels are used to compute 
the cost of heating and the fuel saving 
payback period for the improvement be- 
ing considered. 

This program is available for $9.95, from 
Demi-Software, 6 Lee Road, Medfield, MA 
02052.(617)359-4502. 

Reader Service ^ 167 



Timing Program for 
Steele and Commodity 
Traders 



Stock Timer is a program that calcu- 
lates and plots up to three uniform or ex- 
ponential moving averages of the user's 
choice on a common set of price or vol- 
ume data. The interaction of these moving 




fjhe Dynatyper 
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on Software for TRS'80 



NEWDOS/80 Version 2.0 

The most sophisticated DOS ever pro- 
duced for the TRS-SO* Models 1 and Ml. II 
provides the user with "MAINFRAME" 
power on a "MICRO". 

Some Features available are: 

• Jobslream Control Language 

• Mod I/Mod Ml Diskette interchangabiiily 

• Double Oansity Support on Model 1 

• Pagenarion at BASIC Mstings or^ the screen 

• Basic program single stepping 

• Dynamic variable manipulation 

• Muttipte array sorts 

• Complete technical support provided 

All this plus much more for only 
$149.00 


MICRO ACCOUNTING SYSTEM 

Accounting by the book for the non-accountant 
Menu drrven for ease o' operation Single or 
Double entry bookeeping. complete system 
allows INTERACTION between Ger^eral Ledger, 
Accounts Receivabte, and Accounts Payable or 
each sut>-system can be ran stand alone. Main- 
tenance programs and detailed reports support 
numerous applications. User friendly support 
provided by the authors. Write for a complete 
description and sample printouts today! 


CHEXTEXT* 

Let your TRS-80* do the proofreading 
on your SCRIPSIT' text files!' 

Features of this program include: 

• Complete dictionary maintenace in- 
cluding the addition and deletion of 
words. 

• Menu driven for ease of operation 

• FREE expanded dictionaries avail- 
able, depending on your drive 
storage capabilities. 

NEW LOWER PRICE $59 95 

Assorted Items of interest 

Lazy Wnter (Mod 1 disk.) . . $125.00 
Lazy Wnter (Mod III disk) $175.00 
Meal Master (Mod 1 & III disk) $ 24.95 
Scarfman (disk) S 19 95 

(tape) S 15.95 

Flextext 1 (rrtod l & Ml disk) $ 29.95 
Flextext II (mod II disk) $ 29 00 
Big five games (mod 1 S III) 

disk $ 19.95 
tape S 15.95 


General Ledger SI 59.00 

Accounts Receivable Si 59.00 

Accounts Payable Si 59.00 

Check Register S 79.00 


THE MICRO CLINIC 

by Dave Stambaugh 
"An ounce o( prevention Is . . ." 
Routine system checkout will help 
prevent that dreaded loss of data, a 
thorough system checkout includes 
both Memory and Disk diagnostics. The 
Micro Clin'C otters the most exhaustive 
set of routines known of for the Model 1 
or III. Don't take chances with your data, 
a routine system checkout is your best 
friend. 

". . . worth a pound of cure." 
Model 1 version $24.95 
Model III version $29.95 


1 MUSIC TO YOUR EARS! 

1 For your Model I disk or tape 

1 Orchestra 80 S 79 95 

1 Orchestra 85 $1 29-95 

1 Orchestra 90 Available Soon! 


MTC CALCS IV (mod 1 disk) $ 39.95 
ATTENTION Our marketing department is 
constantly searching for high quality 
protessionally written software 
ATTENTION DEALERS Write tor our dealer 
packet today 



$29 



PROFESSIONAL FOOTBALL PREDICTIONS 

• flakes predictions for all 14 NFL games each week. 

• Game predictions are incredibly accurate. 

• Program's data base is updated weekly from your local newspaper's game statistics. 

• Keeps complete record of all final scores and standings. 

• Re-useable year after year. 

• Very sophisticated program, yet easy to operate. 
FOR YOUR TRS-80* Model I or III 

*NOTE: Start saving your game results at the time of your order, APPARAT will provide the data base for the previous 
weeks games on the disk. 



MISCELLANEOUS SUPPLIES 

DISKETTES 

Double densiiy sol sectored replacement guaranteed-Hard Hole 
protected (5''." only) 

Verbatim Oalalife 5V.' 40 track S34 95 

Apparat's No Name 5".' 40 track S2195 

Verbatim Oatalife 8" model II S39.95 

PAPER 
9v,xH' blank while, tractor feed paper, full t>ox S2495 

9Vxif blank white, tractor feed paper, halt box .S14.95 

l4Vi"x1 I" green bar. tractor feed paper, lull box $3495 

3'Vxl5/l6" tractor feed mailing labeks S1995 

OTHER 

5'.' plastic library case S 3 95 

6' plastc library case- $ 5.95 

5"." Flip-son S29 95 

8" Fhp-sort $39 95 

1 6K memory kits $ 1 9 95 



95 



UNPRECEDENTED 


90% DISCOUNT SALE 


On MODEL II Commercial Grade Business Software 


(LIMITED Q 


jantities Availab 


e) 


TITLE 


LIST PRICE 


SALE PRICE 


General Ledger 


S300,00 


$3000 


Accounts Receivable 


$300.00 


$30 00 


Accounts Payable 


$300,00 


$3000 


Inventory 


$300,00 


$30 00 


Order Entry Processing 


$300 00 


$30.00 


Sales Analysis 


$300 00 


$30 00 


Word Processing 


$400,00 


$40 00 



"All systems include extensive situation oriented documenialion, but is 
supplied on diskette only 

•Above software sold as is and require a minimum of 64K and two 
drives 

iSorry. but at these rediculously low prices our usual software 
support will not apply) 

ADD $300 for postage and handling for these items 



Apparatlnc. 



CSV 



"Ongoing Support for Microcomputers* 



4401 S. Tamarac Pkwy. • Denver CO 80237 • (303) 741-1778 • (800) 525-7674 

Sciipsit & THS 80 .ifc .t fegistered Irademaik of Tandy Coiporation 
Freiyht FOB Denver call for shipping cliarges Foreign Orders sfiipped Air Treight 



NEW PRODUCTS 



averages produces the customary buy 
and sell signals. 

Stock Timer also includes a data base 
management system for the necessary 
price and volume information. 

It is available for Models I, II, and III tn 
tape or disk versions with 16K or more of 
memory. For additional information con- 
tact Bayesian Investment Services, 757 
Santa Rosita, Solana Beach, CA 92075. 
The tape version is priced at $26.95, the 
disk at $31.95. 

Reader Service • 343 




For the Bird-watcher 

Life List is a program for the bird-watch- 
er. It is a one-disk record of bird sightings 
which holds bird name, sighting date, lo- 
cation and notes for 450 sightings. 

Data in the program's search files can be 
edited to reflect species name changes or 
later sightings. The program will display 
individual records on-screen or an index of 
all sightings. A special search feature al- 
lows the user to find all birds seen on any 
date, in any month or in any year and dis- 
play Ihem together on the screen. Similar 
searches will find all sightings at a partic- 
ular location or all birds of one name group. 

Life List is available on disk for the 
Model I for $24.95 from Manhattan Soft- 
ware, Box 1063, Woodland Hills, CA 91365, 
(213) 704-8495. 

Reader Service t^ 334 



Mailing List System 

Mai1-M3 is an advanced mailing list sys- 
tem for the Model III and TRSDOS. This pra 
gram features multiple labels (up to four) 
across a page, form input, a report writer, 
fast multi-sort keys, duplicate label check- 
ing, random access, search and more. 

Mail-M3 is not "on-memory " so the en- 
tire database does not have to be sorted 



each time you add records. One disk can 
store about 500 records of 127 bytes each, 
or more if you have additional drives. 

Mail-M3 comes in two versions. The en- 
hanced 48K version is priced at $79, while 
the 32K version is $59. Both are available 
from the Micro Architect, Inc., 96 Dothan 
St., Arlington, MA (617) 64:M713. 

Reader Service ^' 173 



For {Manufacturing 
Cost Estimating 

Two software packages designed for 
manufacturing, engineering, consulting 
and analytical applications are available 
from Centec Process Systems, Inc. 

The MCE package allows the user to es- 
timate detailed manufacturing costs based 
on individual specifications. Information 
is organized under both fixed and variable 
costs including categories such as labor, 
utilities and raw materials. 

The DCF package Is designed for cor- 
porate managers, financial advisors, certi- 
fied public accountants, tax consultants, 
and real estate and building analyists. Ap- 
plications include detailed cash flow, rate 
of return and payback, escalation of in- 
come and individual costs, and more. 
Separate interest rates can be' used for 
borrowed and working capital. 

The MCE system is priced at $75, the 
DCF at $125. Both systems are priced at 
$149 from Centec Process Systems, Inc., 
11260 Roger Bacon Drive, Reston, VA 
22090,(703)471-5999. 

Reader Service '^ 165 





Software from Centec Process Systems 



The Control Key Hardware 

Controi Keys 
For the TRS-80 

The Control Key system Is a hardware 
and software combination that allows 
control of the Model 1 32K, or 4aK disk sys- 
tem with single keystrokes. 

The hardware converts the numeric pad 
on the TRS-80 Into a set of 12 program- 
mable special function keys that can be 
accessed by either machine language or 
Basic programs. When used In conjunc- 
tion with the four currently available Con- 
trol Key programs, each of the numeric 
keys perform specific functions such as 
execution of the most frequently used 
DOS functions, rapid Input and debugging 
of Basic programs, and more. 

The cost of the system assembled is 
$150. Kits are also available. Contact 
Clockwork Software, Box 704, Colorado 
Springs, CO 80901, for additional in- 
formation. 

Reader Service »^ 346 



New Software Cataiogue 

Charles Mann & Assoc, has released a 
new software catalogue of office manage- 
ment software for several microcomput- 
ers including the TRS-80 Models I and III. 

The catalogue covers the field of small 
business office management applica- 
tions from simple desk management and 
appointment systems to detailed Job cost 
accounting applications. 

It Is available from Charles Mann & 
Assoc, Micro Software Division, 55722 
Santa Fe Trail, Yucca Valley, CA 92284. 

Reader Service ^ 339 
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Master Disk Index 

The Master Disk Index (MDI), creates 
and maintains a master file of disk direc- 
tories updated by automatically reading 
each disk's directory. 

MDI records may be selectively dis- 
played, printed, or deleted by either string 
matching or record number. The entire file 
may be sorted by a fast machine code sort. 

It Is available on cassette with minimum 
machine requirements of 32K, 1-dlsk, TRS- 
DOS, NEWDOS, or NEWDOS80 for$16. For 
more information contact Custom Soft- 
ware, Box 3241, Poughkeepsie, NY 12603. 

Reader Service ^ 170 



T-ROM II Utility 



CBug Monitor 



The CBug monitor, offered by the Micro 
Works, has 19 commands and Is relocat- 
able and reentrant. 

The monitor allows you to: examine or 
change memory using a formatted hex 
display, save areas of memory to cassette 
In binary, download/upload data or pro- 
grams to a host system, move the video 
display page through RAM and send or re- 
ceive RS-232 at up to 9600 baud. 

It will also Investigate and activate fea- 
tures of your computer, such as high-reso- 
lution graphics and machine- language 
music, or use the computer as an Intelli- 
gent peripheral for another computer. 

Available on cassette, the monitor cas- 
sette price Is $29.95. For additional infor- 
mation contact The Micro Works, Box 
1110, Del Mar, CA 92014, (714)942-2400. 

Reader Service ^ 333 



Microbyte Research and Development 
Corporation currently is marketing the 
T-ROM II. 

The T-ROM II features include: blinking 
block cursor, keyboard debounce, auto re- 
peat on any key, audible key-beep, auto- 
line feed, lowercase driver, video to printer 
echo, shiftlock, screenprint and the dual- 
case typewriter function. Graphics func- 
tions are retained In the lowercase mode, 
and normal Level 11 Basic commands are 
unaffected. 

The cassette version sells for S15.95, 
while the disk version is $19.95. Contact 
Microbyte Research and Development, 
105 Rackley Drive, Greenville, NC 27834. 

Reader Service f 349 



New Dlsl( Subsystem 

Matchless Systems now Introduces the 
MS-600C disk subsystem compatible with 
the TRS-80 Model II and other microcom- 
puters. 

The subsystem includes case, power 
supply, fan, cables and a choice of four 
different cV'lve configurations: one single- 
sided drive for $1050, two single-sided 
drives for S1595, one double-sided drive 
for $1395, and two double-sided drives for 
$2095. Single and double-density control- 
lers and software are available at an addi- 
tional cost. 

For more Information contact Match- 
less Systems, 18444 South Broadway, 
Gardena, CA 90246, (213) 327-1010. 

Reader Service *^ 328 




Matchless Systems MS-600C 



For the Software Author 

Programmer Is a new monthly newslet- 
ter for those interested In the software 
market. Scheduled fordebut this month, it 
will cover what kind of software is selling 
and who is selling It, with market updates 
of opportunities in the software field. 

Programmer's monthly columns will 
bring together protessional writers and 
published programmers who will be talk- 
ing about the principles of good program- 
ming and the techniques that make a pro- 
gram saleable. The editors of Programmer 
will be examining contracts from software 
producers, surveying royalties and offer- 
ing the programmer advice on good busi- 
ness practice. 

A six month subscription is $13. For ad- 
ditional information contact Programmer 
Box 3210, Manchester, NH 03105. 

Reader Service .^ 179 



Lunar Lander- 
Based on Physics 

Lunar Lander is a game based solidly on 
physics. The computer displays the lunar 
landscape, your landing craft and naviga- 
tional information— all of which are chang- 
ing constantly. Lunar Lander teaches the 
concepts of acceleration and velocity. 

Minimum requirements are 16K Level II 
Basic. A cassette is available for$10 from 
Custom Software, Box 3241, Raymond 
Ave.. Poughkeepsie, NY 12603 

Reader Service ^ 169 



Scrlplus Modifies Scripsit 

Scrlplus is a modification to Scripsit 
which enables you to take advantage of the 
special functions, features and print for- 
mats of your printer while your document 
Is tMing printed, all in accordance with the 
limitations and capabilities of the printer. 

Scrlplus will not crash programs held in 
high memory and provides the following 
features: It will alphabetically list a disk 
directory from within Scrlplus; optionally 
select line feed after carriage return; sup- 
port custom printer drivers; and is com- 
patible with VTOS, LDOS, TRSDOS, DBL- 
DOS and NEWDOS. 

For more detailed information on Scrl- 
plus features contact Quality Software 
Distributors, 11500 Stemmens Exp., Suite 
104, Dallas, TX 75229. Scrlplus is priced 
at $24.95. 

Reader Service ^ 329 
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NEW PRODUCTS 




The DIP-81A 



New Data Impact Printer 

DIP, Inc., is now marketing a new low- 
cost data-impact printer, the DIP-81A. 

This dot-matrix printer features a full 
96-character ASCII set and is capable of 
printing at both 40 and 80 characters per 
line on SVi-inch paper. Operator control 
includes power, select/deselect, line feed, 
top of form, and self test. It has the ability 
to accept data as it is printing and is suit- 
ed lor such applications as CRT dump for 
printouts and more. 



For additional information contact DIP, 
Inc., 745 Atlantic Ave., Boston, MA 02111, 
(617) 482-4214. The price of the DIP-81 A is 
$499. 

Reader Service ^ 163 



For All Gamesmen 

The Voyage of the Valkyrie, a game for 
the Models I and III, has 10 levels of skill. 

As you move through the Island of Fug- 
loy songs of success or failure ring in your 




The Radio Shack Communications Multiplexer 



ears as each battle with the bird-like crea- 
tures rages to an end. 

Voyage of the Valkyrie is available on 
cassette for $34.95, or disk for $39.95, 
from Advanced Operating Systems, 450 
St. John Road, Michigan City, IN 46360, 
(219)879-4693. 

Reader Service t^ 348 

BASF-DPS Cassette Tape 

BASF-DPS tape is now available from 
York 10 Computerware in C-10, C-20, C-45, 
and C-90 lengths. 

BASF has an extra smooth, durable me- 
dia surface which increases head life as 
well as permitting higher density record- 
ings. A five-screw shell fits all Phillips type 
cassette recorders. 

One dozen cassettes, bulk pack, cost $8 
for the C-10 length, $10 for C-20s, $13 for 
C-45S, and $21 for C-90s. Contact York 10 
Computerware, 24573 Kittridge St., 
Canoga Park, CA 91307, (213) 710-1430, for 
additional information. 

Reader Service *^ 166 

MicroPlan 

The MicroPlan Financial Modeling pro- 
gram, for the Model II, was developed to 
reduce time-consuming forecast and bud- 
geting functions into a 15-minute task. 

MicroPlan combines user-definable for- 
mats similar to VisiCalc with Desktop 
Plan-like consolidation capabilities allow- 
ing users to change any aspect of their 
budgets and compute new totals instantly. 

The plan runs under CP/M and is provid- 
ed with complete documentation. For 
more information contact Data Technolo- 
gy Industries, 700 Whitney St., San Leadro, 
CA 94577, (415)638-1206. 

Reader Service ^ 172 

A Communications 
Multiplexer 

A Communications Multiplexer, which 
allows your Model II to respond to infor- 
mation requests from as many as 16 tele- 
phone lines at once, is now available. 

This multiplexer makes the Model II 
suitable for use as a host computer in 
private Videotex information retrieval net- 
works. 

This product is available in two ver- 
sions: eight-line capability for $6000; or 
16-line capability for $8000 from Radio 
Shack Special Marketing, 1600 One Tandy 
Center, Fort Worth, TX 76102. 

Reader Service v* 167 
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A Combined General Ledger. Accounts Payable, Accounts Receivable, and Payroll, All on One Diskette • Complete 
Easy-to-follow Manual and instructions • Demonstration Disk Available • Available now for the TRS-80 MOD tt* 

Simplify Your Boolckeeping With 
A Completely Interactive System. 
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PAYABLES 

AND 

RECEIVABLES 
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GENERAL 
LEDGER 




Eipand the syslem anytime 
you wish witn fully 
compaliWe modular programs. 

Invenlory 

Order Entry 

If vrrorl Osneralor 

Oirier special Pro^iam^ 



SERVICE 

Software service and 
ooerationaf assislaiice is 
available under two 
Ortlerenl service 
agreements 



THE 

BOOKKEEPER 

SYSTEM™ 

For Microcomputers 

The system is a combined General Ledger, 
Accounts Payable, Accounts Receivable, Payroll 
and Budget Forecasting program that follows 
double entry accounting principles with only a 
single entry. 

Written in COBOL with on-screen instruc- 
tions, your bookkeeper uses simple, one key 
responses to the computer's questions. With 
three 8" floppy data diskettes, The Bookkeeper 
can handle up to 3,500 customers, vendors 
and employees on account with 10,000 trans- 
actions per month. 

Add a hard disk and your microcomputer 
has almost unlimited storage. 

Contact us today to find out how you can 
own this superior product 



We're Writing Programs For People 




UMN^RSN. 

sonwt\R€ 

STUDIOS 



UNIVERSAL SOFTWARE STUDIOS, INC. 

179 WEST SMITH ST D GALLATIN, TN 37066 

TELEPHONE (615} 452-1027 




• TRADE MARK OF THE TANDY CORP 



SeeUsAf 



Las Vegas Convention Center 
November 19-22. 1981 
Booth No 1589 




LOST 
COLONY 

By David Feitelberg 




The scene is "Warren's World," the world's first attempt at colonizing a pianet in deep space. The next sup- 
port ship from Earth isn't due for about 15 years, and . . . weil, iet's just say that things aren't going too 
smoothly. An election was held for an economic manager to straighten things out, and guess who won! 
You are presented with all the human, natural, and industrial resources of the pianet. with instructions 
either to make things better or be voted out of office in shame. A remarkable simulation, LOST COLONY 
arms you with maps and charts as tools for resource management. You assign human and robotic labor 
forces, explore new land, and allocate production quotas. At the same time you must determine equitable 
pay scales and taxes that will both optimize productivity and keep the populace happy {or at least quiet and 
working). 

Communication is handled by your TRS-80' model I or 111, using sentences like, "ASSIGN 1200 SEfi^l- 
LITERATE MEN TO FARfVlING," or commands as short as "1200 FARM." A challenging game, LOST 
COLONY might give you insight into real life management as weil. Available on 16K tape or 32K disk for on- 
ly $19.95 each. 



INVADERS 
FROM 
SPACE 




.VAA'IfJ*-' 



By Carl Miller 

A fast machine language ap- 
proach to this classic (and ad- 
dictive) space game. The aliens 
drop bombs, move around, and 
try to overrun your bases. 

You choose the speed, enemy 
bomb frequency and accuracy, 
and how many shots and bases 
you have. Unlike other games 
of this type, you can move your 
base and simultaneously fire at 
the invaders. Fun for all ages 
and skill levels. It has full 
sound effects for even more 
excitement. 

Available for TRS-80* model I 
or 111. Only $14.95 on 16K tape 
version or $20.95 on 16K disk. 



ASTROBALL 

By John Allen 

More features, thrills, and 
sound than even our famous 
PINBALL With ASTROBALL in 
your TRS-80* model 1 or Ml the 
arrow Keys become flipper but- 
tons, the screen becomes the 
play board, and you become 
the "Pinball Wizard!" 
A flying saucer and moving 
spaceships add to the fun. 
Knocking out five meteors 
earns you an extra ball, while 
black holes swallow the ball In 
play. 

ASTROBALL's five skill levels 
will have all your family and 
friends lining up for the pinball 
action. Available on 16K tape 
or disk for just $19.95 each. 




By Steven Keams 

Huge antimatter rocks appear 
on the Tactical Display Screen 
of your spacecraft. You blast 
away but they just explode into 
smaller chunks for you to 
destroy. 

To add to your woes, alien 
ships and time bombs appear 
periodically. If the ships hit you 
or the timers reach zero— 
BOOM! Maneuver, fire lasers, 
jump to hyper-space — 
anything to avoid the on- 
slaught. For one or two players, 
with nine skill levels. 

A realtime arcade game with 
sound, for TRS-80' model I or 
111. Versions for 16K tape or 32K 
disk are $19.95 each. 




ENTERTAINMENT SOFTWARE SUPPLIED FOR TRS-80* MODELS I & /// 



Acorn 

Software Products, Inc. 



^34 



634 North Carolina Avenue, S E 
Washington. DC. 20003 

(202) 544-4259 
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EVEREST 
EXPLORER 

By William Godwin & Don Knowlton 

Towering above the clouds, the summit of Mount Everest is a forbidding spot. Only a handful of daring 
adventurers have made it to this five-mile-high pinnacle where the air is thin, violent storms erupt with little 
warning, and danger lurks at every footfall. 

EVEREST EXPLORER lets you challenge the world's highest mountain without ever leaving home. This 
logistical simulation goes beyond most adventures, forcing you to make all the life-or-death decisions re- 
quired at every step of the attempt. 

Assigned an expedition budget, you must select the manpower, food, fuel, shelterand oxygen supplies you 
will need to support your quest. Now the adventure begins as you manipulate your resources to outwit the 
elements and terrain, establishing ever higher encampments. Weather, route, season, climbers' condition 
and morale all play key roles in the final question: Will you reach Everest's 29,028 foot summit— and return 
to tell about It? 

Available forTRS-80* model I or III for $19.95. Order on 16K tape, or the 32K disk version which includes a 
"save game" feature and other enhancements. 




BASKET- 
BALL 



By John Allen 

You have to be fast to keep up 
with the action as you try to 
outscore your opponent in five 
minutes of one-on-one basket- 
ball against a friend or your 
TRS-80' model I or III. 
Steal the ball, duck around your 
opponent and slant toward the 
basket for a lay-up! The 
graphics are based on a 
3-dlmenslonal depiction of a 
basketball court, and ball drib- 
bling sounds add to the 
realism. It's all there but the 
cheers In this fast, machine 
language game! 
Available on tape for only 
$14.95, or disk for $20.95. Re- 
quires 16K. 



MONEY 
MANAGER 



By Andrew P. Bartorlllo 



A complete management tool 
for the home budget, it accu- 
rately keeps track of your check- 
book and provides an easy 
method of budget allocation. 
You can store information on 
up to 100 checkbook entries 
per month (250 with 48K), 
specify any automatic 
withdrawals, keep records of 
tax-deductibles, and record ex- 
penses by category. You can 
even break up charge account 
payments into the proper 
categories. 

Requires TRS-80' model I or III 
with a minimum of 32K and one 
disk drive. Order now for only 
$39.95. 




By Richard Wilkes 



Using your SUPERSCRIPT 
(Modified SCRIPSIT* Word Pro- 
cessor and a compatible 
printer, you can now underline, 
boldface, insert text during 
printout, slash zeros, set type 
pitch, subscript and, of 
course, superscript! You can 
even read your directory and 
kill files without ever leaving 
SCRIPSIT*. 

Includes drivers for popular 
printers and easy instructions. 
Just $50.00 for TRS-80" model 
I (requires 32K, 1 drive, SCRIP- 
SIT/LC*) or model III (requires 
32K, 2-drives, model I version 
of SCRIPSIT/LC*). 



ACORN PROGRAMS ARE AVAILABLE AT FINE COMPUTER STORES EVERYWHERE 



'Trademark of Tancty Corp, 



MAIL ORDERS: IfKlude $2.00 shipping & handling 
(DC. residents add 6% sates tax). 

CHARGE CARD CUSTOMERS: Call (202) 544-4259 
lor fastest service 



Prices SuO/ecr (o Cnange 



•'Sm Uil of A<Svtrtiurs on pag» 402 



80 Microcomputing, November 1981 • 109 



Trouble on the horizon for management and labor. 



Computerization 

Of the 
Workpl 




by Chris Brown 
Technical Editor 



Can it be that we, the true believers in the 
Computer Revolution, labor under a 
misapprehension? For years we have .told 
anyone who would listen that the dawn of 
the computing age would herald a renais- 
sance In the American workplace. Changes 
for the better were coming. 

We saw the machine ending the costly 
and time-consuming paper chase In the 
American office. We saw it freeing us from 
repetitive and demeaning operations on the 
production floor. We saw it enhancing our 
lives. Well, for many children of the com- 
puter age, the promise has failed. 

Early In the summer of 1981 one national 
group of workers deeply Involved In com- 
puters walked off their jobs. By most stan- 
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dards, these people were well-paid. They 
were willing to risk fines, firing and im- 
prisonment for Intangibles that had not 
been Issues In the American labor move- 
ment before. Professional stature, recogni- 
tion, and the relief of Job-Induced stress 
lead the air traffic controllers to strike. In 
striking, the controllers were typical of a 
new breed of American worker— a worker 
involved with technology and the computer, 
the victim of problems created by the ma- 
chines in the American workplace. 

"Computer technology creates the false 
illusion that problems with the American 
workplace are over," says Harley Shaiken, 
an MIT researcher of advanced technolo- 
gies. Shaiken went on to tell 80 Microcom- 
puting that In his view a new set of labor 
related problems is spawned by the com- 
puter. He said, "Computer technology has 
always had the potential to create a better 
workplace. The reality of the situation 
however, has tieen the opposite. The com- 
puterized workplace has been deteriorating 
In quality." 



Shaiken understands the hostility dis- 
played by many workers involved with com- 
puters. He sees three key factors at the root 
of dissatisfaction of data processing per- 
sonnel, air traffic controllers, nurses and 
operators of computerized machine tools. 
He feels that computerizing the workplace 
limits worker skills, Increases management 
control and allows constant monitoring of 
worker performance. While not particularly 
evil in themselves, these three factors taken 
together dehumanize the worker. 

A similar theme Is sour>ded by Robert 
Shrank of the Ford Foundation. Shrank, a 
self -described Program Officer at Ford and 
an ex-tool maker, sees time as a key Issue. 
"Control of an employee's time Is the key to 
how the computer Is affecting the American 
workplace. Be it a VDT (visual display ter- 
minal), machine tool, or what have you, 
where computers are Involved an employee 
may be measured as to what, when and how 
much, as never before." 

Shrank told 80 Microcomputing that the 
ability to control time and employee activity 



closely is the ultimate strength of the com- 
puterized workplace. He indicated that 
management welcomes this aspect of the 
new technology but labor unions cannot 
cope with it. Both Shaiken and Shrank 
agree that trouble is on the horizon when 
American labor meets the computer. 

"The self-perception of employees in- 
volved with computers is changing," says 
Shrank. "These people realize they have a 
large amount of power in the society and 
they see themselves as white collar profes- 
sionals, even if their employers don't." 
Power is a real issue in the computerization 
of the American workplace; as in other as- 
pects of our lives, the computer alters tradi- 
tional power and political structures of the 
business world. One hundred people and a 
few computers in Gander, Newfoundland 
halted traffic In the busiest air corridor In 
the world. This scares managers who have 
contemplated computerizing their plants 
and offices. So much power in the hands of 
so few workers means vulnerability for 
American business. 

"Management must decentralize where 
the computer is involved," says Ford Foun- 
dation's Robert Shrank. "By doing so an in- 
ordinate amount of power will not be con- 
centrated in a few hands. Gander, New- 
foundland taught us that." Shrank feels the 
air traffic controllers overestimated their 
clout and were "intoxicated by their percep- 
tion of their own power," but he does not 



minimize the real problems associated with 
who wields the power of the computer, iron- 
ically, the centralized power that allows a 
few employees to disrupt a large process 
also makes them vulnerable. They may be 
replaced by a smaller number of super- 
visors who can keep a plant from shutting 
down completely. 

MIT's Shaiken told 80 Microcomputing 
that American workplace computerization 
will change labor union operation. "Union 
power may not be great enough to deal with 
computerization," he said. "In times of 
crisis labor unions In high-technology areas 
may find themselves with only two alter- 
natives: First, to try and widen the scope of 
their strikes by Involving other groups as 
the controllers unsuccessfully attempted 
to do with the machinists union, or second, 
to look Internationally for support." 

The second alternative carries far- 
reaching implications. Does computeriza- 
tion of the workplace lead to a world labor 
movement? For Shaiken, the answer Is yes. 
"A world labor movement could definitely 
result from the computerization of the 
workplace," he said. "In fact," he added, 
"we have already seen the seeds of this 
movement In the controller's strike when 
Canadian and Canary Islands controllers 
came haltingly to the aid of their American 
counterparts." 

Both Shaiken and Shrank believe there 
are ways to overcome the problems of the 
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computerized workplace short of striking. 
They agree that a decent salary for 
technically trained people is mandatory. 
They also feel other Issues must be ad- 
dressed; stress Is one. 

"Management has made the mistake of 
thinking that all productivity problems can 
be solved by computers," says Robert 
Shrank. "They feel that using 60 minutes 
out of each hour of an employee's time Is 
possible where computers are involved. If 
you believe this, you're nuts." Shrank feels 
that 50 minutes per hour Is a more realistic 
figure If Job stress Is to be kept within 
bounds. 

Harley Shaiken suggests, "We should 
make an effort to see the social implica- 
tions of the introduction of technology in 
the workplace before we use it, not after." 
Says Shaiken, "The design and deployment 
of computers In work environments should 
be keyed to social goals." Organizing the 
computerized workplace becomes increas- 
ingly important. Organization can heighten 
the employee's sense of identity and self- 
respect as he manages a machine that, in 
reality, controls him. 

How workers and management cope with 
the computer is subject to conjecture. 
Changes in traditional views and actions 
are imminent for both management and 
labor. The golden age of the computer may 
have arrived finally. Its promise Is yet to be 
fulfllled.B 
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GENERAL 



Will the postman soon bring bytes? 



Digital Delivery 



by Bert Latamore 
Desktop Computing staff 



Long distance communication has been 
an Issue since civilization began. The 
ancients used drums, mirror retlection and 
smoke signals. When the Egyptians and 
Chinese Invented writing, they also Invent- 
ed the courier and built complex road net- 
works for their runners to travel. These cour- 
ier services developed Into the modern 
postal system. Samuel Morse started the 
electronic communication revolution, but 
not until the 1920s was the telephone wide- 
ly accepted arxJ a real competitor to postal 
systems. 

Today the United States Postal Service 
{USPS) handles more than one billion 
first-class letters a year. Although the tele- 
phone senlce carries 2.S calls for each 
first-class tetter mailed, the post office Is 
stiii a major force. Ironically, this old-fash- 
ioned method of moving information sur- 
vives at the heart of the "information 
revolution." 

The postal revolution may finally be upon 
us. A new form of message delivery, elec- 
tronic mail, is riding on the coattaiis of com- 
puter networking. Futurists believe it may 
replace tfie postal system and take part of 
the load now carried by telephone. Accord- 
ing to pfognostlcatora, the question in elec- 
tronic mail Is not whether it wlli tM an impor- 
tant force in the future but how much im- 
pact it will have and what form it will take. 
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As always when predicting the future, ex- 
perts disagree. Some expect ail first-class 
mail to become electronic, with users send- 
ing and receiving messages directly from 
terminals in their homes and offices. Others 
expect a more moderate use of electronic 
mail using facsimile equipment in post of- 
fices or other central locations. 

Network Systems 

These two versions of the future reflect 
two different forms of electronic mail. The 
first, used today by businesses with local 
networks, is available to the public frcMn 
subscription services such as CompuServe, 
Columbus, OH; The Source, Vienna, VA; 
Tymnet, Cupertino, CA; and Telenet, Vien- 
na, VA. This kind of electronic mail requires 
a central computer connected to terminals 
or microcomputers at remote locations. 

Compose and address your message on 
your terminal, then contact the electronic 
mail computer you use arid send it on its 
way. The computer stores the message un- 
til the Intended receiver checks In. The com- 
puter informs the contacted party of a 
message and sends it to his terminal upon 
request. 

If both parties are on line simultaneously, 
they can communicate in real time by alter- 
nately writing messages. The effect is 
much like a telephone call. 

I_arge t>usjnesses with local networking 
systems use this form of electronic mail for 
interoffice communications. They are slow 
to use it for intercompany and personal cor- 
respondence, partly because various elec- 
tronic mail datatMses do not communicate 
with each other. These databases use 
password security systems. Upon subscrip- 
tion to a datat>ase you are given a set of 
passwords; one Identifies the service you 
want and one identifies you as a legitimate 



subscriber. The database computer recog- 
nizes the password by its length and form. 
Because these forms and lengths are not 
uniform, computers cannot communicate 
between databases, if you subscribe to the 
electronic mail datat>ase at CompuServe 
and i am on Tymnet's OnTym we cannot 
send letters to each other. 

Promoters of this version expect industry 
standards similar to those allowing the 
various common carrier packet networks to 
Interconnect worldwide. A standard would 
enable the services to communicate freely. 

Meanwhile, several sutjscrlber-supported 
electronic mail services are in operation. 
Rich Baker of CompuServe said their mail 
database is put to a wide range of uses, 
from replying to want ads posted on elec- 
tronic bulletin boards to playing electronic 
games. Newspapers use electronic mail to 
transmit stories from remote bureaus to 
their main offices and traveling salesmen 
use it to communicate with their offices. 

Facsimile Systems 

The second picture of the future is tused 
on the presumption that the dominant form 
of electronic mall will send and receive pho- 
tographic copies of documents. To use this 
system you would prepare your letter with a 
pen or typewriter. A business could prepare 
advertising packages as It does now. The 
finished product would t>e placed In a 
machine resembling a photocopier. The ma- 
chine would read the document and send 
an exact description to the machine at the 
location you selected. That machine would 
create an identical copy. 

The big advantage of this system is the 
control the sender has over the Infor- 
mation's form. This might not be important 
in a personal letter or interoffice memo, but 
it Is very Important when the information is 
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a graph or photograph. Unfortunately, the 
machinery Is more expensive than a dumb 
terminal and less versatile than a micro- 
computer. It is unlikely that the average 
home in the year 2001 will have such equip- 
ment. This system would probably be used 
between central locations; individual docu- 
ments would be mailed from the receiving 
stations to their ultimate destinations. 

The USPS was scheduled to inaugurate 
such a facsimile system, called Electronic 
Computer Originated Mail (ECOM), in 
January. All the necessary equipment to 
connect several US cities has been pur- 
chased. The Reagan administration, how- 
ever, is opposed to the USPS entering the 
electronic mall market. The White House 
and Departments of Justice and Commerce 
have jointly filed statements with the Postal 
Rate Commission opposing the ECOM plan 
and any other move into this area by the 
postal service. David Foulger, editor of Elec- 
tronic Mall and Message Systems, a 
biweekly bulletin published by International 
Resource Development, Norwalk, Ct, said 
this opposition from a politically strong 
White House probably means ECOM is dead. 

However, he said several other firms are 
waiting In the wings, ready to start their 
own services; Federal Express, particularly, 
seems to be preparing for an overnight fac- 
simile mail delivery in competition with the 
USPS, and Is renting satellite transmission 
capacity far beyond their internal needs. 

In spite of the problems with ECOM and 
competition with desk-to-desk mail, fac- 
simile apparently has a good future. The 
Report on Electronic Mail for the second 
quarter of 1981 , a publication of The Yankee 
Group, Cambridge, MA covers the market 
potential of several facsimile systems de- 
signed for office use. They conclude this 
form of message moving will retain part of 
the electronic mail market because it 
eliminates typing information already on 
paper into the system. They predict facsi- 
mile transmission equipment integrated in- 
to office work-stations rather than market- 
ed as Independent items. The Integrated 
systems would offer word processing, 
database access, data processing and elec- 
tronic filing as welt as electronic mail. 

AT4T Entry 

The other big communications monopoly 
In the United States, American Telephone 
and Telegraph (AT&T), is also preparing for 
entry into electronic mall. Presently AT&T is 
voluntarily going through the throes of par- 
tial deregulation. 



Foulger expects AT&T will probably meet 
the deadline Congress has set to create a 
separate subsidiary operating in electronic 
information. The subsidiary Is required so 
the telephone giant cannot use revenues 
from business areas in which it has a legal 
monopoly to fund adventures In other 
areas, an unfair advantage over com- 
petitors. AT&T will move quickly into elec- 
tronic mail as well as other electronic data 
service areas as soon as legal requirements 
are met. 

However, he said, "Deregulation may not 
be the gift that AT&T thinks It is." 

AT&T will be entering a highly competi- 
tive market in which several corporations, 
including GTE Telenet and Tymnet, are al- 
ready established. Foulger predicts other 
firms will unveil ambitious systems. 

Home Use 

Futurists disagree whether electronic 
mail will t>e major in the home for the rest of 
the century; they agree on the definition of 
electronic mall. Ray Boggs of the Consum- 
er Division of Venture Development Corp., 
Wellesley, MA, recently finished a study of 
the electronic home of the future. He con- 
cluded electronic mall "doesn't fit In" as a 
communications device and will not re- 
place the telephone. 

On the other hand, he and many others 
expect electronic money transfer arrange- 
ments In Our future, allowing the consumer 
to send orders from home directly to the 
bank's computer. 

"It will be precisely this kind of applica- 
tion that will drive the home computer 
market," Boggs said. Francis O'Reilly, an 
Independent business analyst for Business 
Communications Corp., Stamford, CT 
agrees with this scenario. He points out 
that financial transfers account for 90 per- 
cent of all first-class mall. 

"By the end of the century, electronic 
money transfer is going to eliminate most 
of this volume," he said, "so I think elec- 
tronic mail Is going to creep in In ways other 
than the one we think of." 

The result would be less paperwork for the 
customer and less data entry for the bank. 

Your bills would come directly to your ter- 
minal through the network. Your employer 
could complete the cycle by having his 
computer deposit your pay directly Into 
your bank. 

Elvctronlc Mall and the Tstephone 

O'Reilly also believeselectronic mail may 
partially replace the telephone for personal 



conversations. If we communicated through 
electronic mail I could send him my inter- 
view questions on electronic mail when I 
panted to, and he could send his answers 
and comments back at his convenience. 

"Of course we would lose the interactive 
nature of the conversation," he said. On the 
other hand. It would save days of telephone 
work spent alternately calling people and 
transcribing answers from long lists of 
questions. 

All these applications wait for home com- 
puters to become commonplace. It is not 
practical to offer these services until 
enough of the public can use them. O'Reilly 
and Foulger both predict we will reach this 
point by 1990. 

Mall by Cable 

A recent issue of Electronic Mall and 
Message Systems reported the present 
trend in cable television Is to offer a huge 
selection of channels. One cable company 
now has a license to offer 150 channels in 
Princeton, NJ, and another has proposed a 
200-channel cable In Florida. 

Foulger wonders what they are going to 
put on all those channels. He suggests that 
some of those extra channels could carry 
data services into the home. The Source 
and CompuServe are already experiment- 
ing with cable. 

Another possibility Is electronic data ser- 
vices offered simultaneously with voice 
telephone transmission. Telephone lines 
carry several calls at once through multi- 
plexing. According to Lawrence Roberts of 
GTE, the creator of the first operating 
packet network, there is no reason data 
transmissions could not be multiplexed 
with voice. 

The French government is experimenting 
with this kind of service. At least one 
French firm manufactures a telephone 
modem allowing simultaneous voice and 
digital data transmission, according to 
Foulger. 

Business Mall 

Vision is clearer In the business world, 
where the trend for electronic mall as part 
of the electronic office is gathering 
strength. So far, O'Reilly said, electronic 
mall is "a large corporation phenomenon. 
The smaller organizations have the commu- 
nications network to do It, and I think they 
have the need." 

Electronic mail is used in three situa- 
tions: 

• In office complexes, where it Is Incon- 
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venient for one executive to meet with an- 
other, electronic mall replaces telephones 
and sends graphic data the telephone can- 
not display. 

• Firms with traveling sales staffs equip 
their salesmen with portable terminals 
used to send orders and receive memos 
from the home office. 

• Firms with widely separated offices 
(including overseas branches) use electron- 
ic mall databases on the common carrier 
networks for interoffice communication. 

Costs 

Electronic mail is still more expensive 
than the USPS. According to sources for 
both Tymnet and CompuServe, electronic 
"postage" for the average message Is 
about 50 cents, as opposed to 1B cents for 
first class mail. The stamp, however, is the 
smallest part of a letter's cost. Electronic 
mail could save time, latwr and money com- 



posing the letter with word processing. 

Electronic mall, however, is not being 
seen as a stand-alone service In the market- 
place. H. Paris Burstyn of The Yankee 
Group said the current office trend is 
towards integrated systems which offer 
word processing, database access, data 
processing and electronic filing as well as 
electronic mail. 

A similar situation can be envisioned in 
the bome market. The average homeowner 
may not be Interested in Investing In a mi- 
crocomputer solely to have access to elec- 
tronic mall. However, If he does buy a com- 
puter for other reasons electronic mail 
becomes a useful and easily added utility. 

Interna Donal Mall 

The legal situation Is not entirely clear, 
depending In part on the country. Fouiger 
may t>e correct in his opinion that the Rea- 
gan administration will prevent the USPS 



from entering the electronic mail arena. 
Furthermore, as Burstyn points out, the de- 
partment moved too late to establish a legal 
monopoly on the service. Too many other 
companies are already in electronic mail in 
the United States. 

In other countries the formula is differ- 
ent: The national telephone monopoly, 
often a part of the government, also runs 
the dominant data network. Fouiger says 
Canada sees electronic mall as a direct 
threat to Its postal system; the government 
Is restricting its development. 

How long can they delay the inevitable? 
The lengthy Canadian mail strike divided 
the electronic mall sheep from the goats, 
according to Fouiger. Firms with electronic 
mall systems in place were not greatly hurt 
by the strike, but those without It had much 
more trouble. 

Fouiger said a strike alone will not cause 
businesses to adopt electronic mall, mainly 
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Ever tried to read computer sales literature? 

Ever tried to talk to a computer salesman? 

Ever tried to make a decision about 
which computer to buy? 



Yes. then you know what frustration is. 
Help is on its way Desktop Computing pre- 
miers this fall. The first and only computer 
magazine written in plam En g lish. Preposter- 
ous? Not at all. It is possible to explain com- 
puters without all the "computerese." That is 
what Desktop Computing will do each month. 
Send the card today for a no-risk subscription 
that will give you the kind of understandable, 
useful information on computers you've been 
waiting for. 

Why do you need a plain-En g lish ex p lanation 
of desktop ^ computers? Because they have just 
come of age and are saving thousands of busi- 
nessmen like you an amazing amount of 
money. They not only save money, do things 
faster, provide access to more information, 
allow a smaller staff to do more work, they also 
allow you to get into services for your custom- 
ers which were not practical before. You can 
provide more services at lower cost. To get in on 
the savings and expanded customer services, 
you need information. Desktop Computing will 
bring you that information. Desktop Com- 
puting will cut through all the technical 
hocus-pocus. 

In this time of high Interest rates, a truly low 
cost desktop computer system (usually a micro- 
computer system) is a welcome event. Let Desk- 
top Computing explain what these systems can 
do for you The subscription price is $25 a year 

but as a charter 

subscriber you can 

get the first year 

for only S17.97. 

totally tax 

deductible. 
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•Letter to Hemingway RE: Word 

Processing 
•Professional & Small Business 
Microcomputers: Buying, Using 
and Fixing a System, 
•Adequate Backup: Protecting the 
Data in Your Computer. 
Wayne Green, the publisher of Desktop Com- 
puting (and also of Kilobaud Microcomputing 
and 80 Microcomputing— both successful 
computing publications) has gone through both 
the agony and joys of working with computers. 
He has lost a quarter of a million on a mainframe 
big boy computer only to come out on the other 
side with all the frustration necessary to run a 
iiOO employee publishing firm on several 
TRS 60's. 

Wayne has a reputation for being honest and 
unafraid. He'll make sure you get the truth. In 
the meeting introducing the idea of Desktop 
Computing to his staff Wayne said, 

"Our objective is to be the only com- 
puting magEizine written in plain 
English." 

So that is what you'll be getting— honesty and 
directness Desktop Computing will give you all 
the information you need on computers in plain 
English 

This charter subscription is available for a 
short time only. Send the card today for the 
premier issue— October 1981— and get the infor 
mation you've been needing for only $17.97. 

Desktop Connnithtf 



Relief is here for only $17.97 

r^l YFS ^'^" me up as a Charter Subscriber to Desktop 

Computing. I will get one year of the only comput- 
ing inagazine written in plain English for t L7.97 (a savings of 50% 
off the news-stand) My subscription will begin with the premier 
issue— October 1981 

Your iLTSl issuf! wil] L«i an-iviiig by mid Ocwiber 1981. 

Canadian 1 yr only/US funas 119.97 Foreign 1 yr only/US funds 129 97 



NAME 



ADDRESS 
CITY .___ 



STATE. 



ZIP_ 



SIGNATURE. 



CARDd* 



INTERBANK # 



EXPIRE DATE. 



DeskUV Computing 

80 Pine Scred Peterborough, NH 0MS8 



3mca 



". . . electronic mail is appropriate 
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because of the long lead time necessary to 
install a network (up to six months). If the 
business chooses the common carrier sys- 
tem it can get on Kne as quickly as it can ac- 
quire terminals. The Canadian packet net- 
work Datapac is not as well developed as 
packet network systems and does not 
reach all areas of the country. 

The story Is entirely different in France, 
where the new Socialist government Is 
sponsoring a public experiment in home 
networking in a Paris suburb. At the open- 
ing, the new communications minister told 
reporters France is definitely in the lead in 
this area and intends to export equipment 
to the United States. 

Impact 

Electronic mail's impact on users is hard 
to assess. Certainly It will not change per- 
sonal lifestyles as the telephone did in the 
1920s. Electronic mail is simply another 



kind of electronic communications. 

The USPS and Its equivalents in the other 
industrialized countries are obvious targets 
for a major impact. Most first-class mail 
will disappear if O'Reilly's model of elec- 
tronic fund transfer comes true. Tymnet 
spokesman Dick Jokinen said his firm has a 
prototype service called TymGram allowing 
a single copy of a document at one end to 
produce multiple copies at different loca- 
tions. It Is a small step to electronic mass 
mailing. 

Postal officials have read the writing on 
the wall. According to O'Reilly, the USPS at- 
tempt to enter the facsimile market was a 
bid to preserve the postal system, even at 
the expense of post office jobs lost to auto- 
mation. It it is prevented from entering this 
market or if the facsinnile market does not 
catch on with the public, the post office 
runs the danger of becoming the system of 
last resort. 



The new service will probably have much 
less impact on telephone companies. As 
Baker pointed out, electronic mail Is ap- 
propriate for some uses and the telephone 
for others; they will not really compete. 
Which service you use will be a matter of in- 
dividual taste. 

For the average user, Foulger said, the 
Important fact is that the services are there 
and growing, if you are Interested in learn- 
ing more about them, subscribe to The 
Report on Electronic Mail and Electronic 
Mail and Message Systems. You might also 
be interested in The Yankee Group's report, 
Home Electronics through 1995, Strategies 
for Providing Information and Control. 

Whether you decide to jump in today or 
wait and see what happens, whether you 
are an executive in a multinational corpora- 
tion, a professional with a one-person of- 
fice, or a homebody, electronic mail may be 
somewhere in your future.! 



Do your own taxes like an expert 
with TAX/SAVER. 



tax/saver:** The tax help prosram 
for the lavman and the professional. 

• Privacy. 

• Built-in tax aids. Answers questions like "Is my father my 
dependent?" and "Are my deductions reasonable?" 

• Tax regulations programmed in by our team of accountants. 
Type in your figures and you've done your own tax return. 

• Output to video or lineprinter, (Overlays available.) 

• Tax deductible. 

• Optional text: help for novices - speed for professionals. 

• Manual: Tax information, lists of deductions, tax glossary. 

• TAX/SAVER'" I: completes long and short forms, itemized 
deductions, interest, dividends, income averaging and 
maximum tax, tax calculation (all filing statuses in one run). 

• TAX/SAVER'" II: all features of TAX/SAVER'" I plus 
business income and capital gains. 

• Discount on yearly upKiates. 



Revietvs: ^^^^ 

"Well designed and easy to use" — D. Lubar, Creative Computing Magazine 1/81 

"TAX/SAVER'" may very well live up lo its name" 

M Tannenbaum. CPA, 80 Microcomputing Magazine 2/81 

■RegiSlPipd irddemarii of Radio Sfvuk 'Copvr'gfi' ^981 



ii^ 



^'- 



TAX/FORECASTER" convert.^ TAX/SAVER" 
to a tan planner Lets you see how (inaiicial decisions 
j,ili dfleci your laxi's Lels you revise an already 
completed return. 



Orders will be filled in late Janudiy lu dibw inclusion of neu.' tax laa-s 
TO ORDER: 



Call collect 203-324-3009 or 203-544-8777 or mail ihs 
coupon lo Micromiitic Programming Co. 

P.O. Bon 158, Georgetown, CT 06829 

Please enroll me in member's service and send. 

a TAX/SAVER'- 1 (aJ $79.95 Manual included 

n TAX'SAVER'" II (■>> $1 19 95 Manual included 

U TAX.FORECASTHK" fdi S29.95 

n Manual Only (* $19 95 

a Tax Form Overlays in $39 95 

D Please send me more inlotmalion 

Please check one 

a TRS 80* Model I. 32K wiih 2 disk diives 
a TRS 80' Model III. i2K with 2 disk drives 

Add ii 'lO tor postage and harxlliiKj C T residcnii add 1 _ ' iales lax 



Nar 



Address 

City . 



_Staie 



.Zip__ 



□ Check 

Card No 



D Master Chaige D Visa 



. Enp dale_ 
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Not all Spelling Checkers are the same. 



MICROPROOF 



T.M. 



stands out! 



EASY TO USEi Prepare your text on any Z-80 ba»ad micro- 
computer, using any of a number of popular word 
procesting programi When you are ftnished, enter the 
appropriate command, and MICROPROOF proofreads 
your docunienr. di&f^aymg misspellinss and typos on the 
screen Then correcting MICROPROOF can display t&ch 
«rror separately, requesting you to enter the correct 
spelltns for each. You are also given the option of displaying 
errors in context or adding words to MICROPROOF* 
SO.OOO word vocabulary. Finally. MICROPROOF corrects 
your document. All in less than a minute. 



SCLECT Jkf PROPRIATE RESPONSE 

CORRECT MISSPELLED WORD: 

LEAVE WORD AS IS": 
DISPLAY WORD IN CONTEXT: 
ADO WORD TO OICTIONRRY 
EXIT 



ENTER CORRECT WORD 

MT <ENTER> KEY 
? 



WORD: 
RESPONSE: 



lYtur inirl 



Corrcchng MICROPROOF Screen Oisptoy 

SPEED is the single most importani factor in a dictionary 
program. All dictionary programs will find your potential 
errors but if the program is too slow, you arc not likely to 
use it. MICROPROOFs speed is outsiaitding It can proof 
read a aewral page letter in 20 seconds. 



LOW PRICES: Standard MICROPROOF is avaibble for 
either $89.50 (TRS-BO* Modpjs I or HI ) or 
$149.50 (CP/M«. TRS-Htt* MoAH II and all others) The 
optional correctioi^ feature can be added at any lime for 
an additional 16000. Opiionai patches to integrate 
MICROPROOF into your word processing software can 
also be added at any time for an additional $33.00 
(Inlegralion patch not needed for Wordstar* ] 



?mCROPBOOF'S FULL 50.MM WORD VOCABU- 
LARY saves you Ivnc and aliows you greater con5dencc 
in the Ksts of potential errors that MICROPROOF 
identifies. The mini dictiorary programs, with their 10.000 
and 20.000 word vocabulanea. haue many correctly speBed 
words otnitted from their vocabdariet. ConuquentiaHy, 
they iderrtify as pocential "errors'' many words that are 
actually speBed correctly; five to ten times as many such 
words as does MICRO(^KX>F So. when you use 
MICROPROOF you wiH have far fewer extra words to 
evaluate, a major time savings. There will be less need to 
look up words in order to verify that they are in fact speHed 
correctly- The extra 30,000 words in MlCROPROOF's 
vocabulary assures you con5dence in the error lists that 
MICROPROOF generates 

There are other proofreading programs available to choose 
from. Since MICROPROS became available in December 
of 1980, a number of companies have anncxinced programs 
with small dictionaries. It took us almost two years to 
dcvckip MICROPROOF. Oiring that lime we were able to 
compress our full 50,000 word dictionary into a manageable 
Size (fits on one smgle derttity 5H inch disk). And we were 
able to design a ^ooTtng program whtch operates 
remarkably fast. The chart below illustrates the compara- 
tive advantages at MICROPROOF 

ADVANTAGES OF MICROPROOF 





MICROPROOF 

DICTIONARY 

SOFTWARE 


OTHERS 
(Mini- 
Dictionaries) 


DICTIONARY SIZE 


50.000 Words 


20.000 Words 


DISK SPACE 

REQUIRED 

FOR DICTIONARY 


70.000 BYTES 
(fits easily on 
one 5 V disk] ; 


170.000 BYTES 


DICTIONARY 
ENLARGEMENT 


VIRTUALLY 

UNUMITFJ) 


EXTREMELY 
IJMITED 


SPEED--400 Words 


20 Seconds 


1 to 5 Minutes 


SPEED- 3.000 Words 


1 Mnute 


2 to 10 Minutes 


CORRECTION 
FEATURE 


Optional 


Not Available 




See your heal nucroaimputer dea/er or write to: 



CORNUCOPIA SOFTWARE 

Posl.Ofli«Box5028. Walnut Creek. CaKtornifl 9459b • (4I&) awOKW ^3« 



BUSINESS 



A Model II brings one school system out from under. 



Paper Mountain 



Theron Wierenga 
Box 2007 
Holland. Ml 49423 



The public school district where 1 am 
employed has for years suffered under 
a paper mountain of personnel records and 
files. Whenever it was necessary to form a 
seniority list, mall out letters to teachers, 
list personnel by various account codes or 
total salaries, it took weeks to sort through 
the personnel files for the information. 

In April, the school system I worked for 
was going to furnish the intermediate 
school district with personnel records writ- 
ten on special transmittal forms. A change- 
over to place our general ledger and payroll 
on their large computer was to take place in 
July. It became apparent that having our 
personnel records in a small computer of 
our own would be of great value for printing 
these transmittal forms as well as numer- 
ous other jobs. Someone is always asking 
for a list of special education teachers in 
the junior and senior high schools or some 
other version of the employee list. An in- 
house computer could also keep track of 
salary schedules tor future projections of 
wage costs, along with being of real service 
during contract negotiations. 

After much consideration, we decided 
that Radio Shack's Model II with 64K, a Line 
Printer III and two additional floppy disk 
drivers would do the job. The cabinet for the 
additional drives has an extra slot open for 
a third drive. With three drives future expan- 
sion should not be a problem. About 1,000 
employee records needed to be stored, 
each taking up about 500 characters ot da- 
ta. It was decided that I would author all of 
the software, as the district's needs were 
peculiar to its own record keeping system 
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(as is often the case). The major portion of 
the software was written in about two 
months, with several months of clean-up 
and changes after this. 

Basically, this system is designed 
around a set of personnel records that can 
be manipulated by several utility programs. 
A single employee's data is stored in two 
sectors of a disk. The employee number is 
the same as the record number in which the 
data is stored. Because a record is 256 
bytes long on the TRS-80 Model II system 
(one sector), each employee's data Is divid- 
ed into two files called Pi and P2. For exam- 
ple, the first half of the data for employee 
numt)er seven is stored in record seven of 
file PI and the second half is in record sev- 
en of file P2. This gives a direct relationship 
between employee number and record num- 
ber, allowing much faster access to records 
when editing a file. 

The two sectors contain up to 81 different 
items for each employee. The item descrip- 
tors, the number of spaces allocated for 
each item and the necessary format (if any) 
can be found in Table 1. 

All data that is stored in an employee's 
record is stored as siring (ASCII) data. Nu- 
meric values must tie extracted from the 
string data if it is needed, as with monetary 
amounts. Although the Model II has Basic 
functions for changing numeric values to 
strings and back agai n, these were not used 
In most of the programs. (As it turns out, in 
this application it becomes more bother 
than it's worth.) Special routines are used 
within the programs to do this whenever it is 
necessary. 

There are a total of five programs used to 
create and manipulate the file. They are 
called Builder, Printer, Sorter, TMatrlx and 
Teacher. 

BuHder 

This program builds the employee file 
and allows the user to update and edit it. 
There are five sections: Input, where an en- 
tire employee record of 81 items can be en- 



tered in order; Edit, where individual Items 
in a record can be changed: Update, where 
the same item in each record can be 
changed; List, which gives the user a dis- 
play of the item labels and Delete, where an 
employee's record is erased. 

When entering the Input section, the 
computer prompts the user to enter the 81 
individual Items. The employee numt>er en- 
tered must be the same as the record num- 
ber dislayed just before the employee num- 
ber is asked for. For any item that is to be 
left blank. Enter can be pressed without typ- 
ing any characters, and a single dash (-) will 
be entered for the blank item. After all 81 
items are entered, the computer will store 
the entire record on the disk and then dis- 
play the transmittal form, as entered on the 
screen. The user is then asked if he or she 
wishes to continue with the next employee 
record. If the answer is no the program will 
ask what section to enter next. If Edit is 
then entered, corrections or changes could 
be made in the record just entered. 

When Bulkier displays a label asking the 
user to enter an item, a row of asterisks will 
appear under the label. The length of this 
row shows the amount of space allowed for 
the item. If fewer characters are typed in, 
the computer will fill the rest of the item 
with blanks. If too many characters are en- 
tered, the computer will shorten the Item to 
the maximum length. 

The Edit section asks you for the number 
of the employee whose record you wish to 
change. The second question is the item 
number you wish to change. After this is en- 
tered, the computer displays the entire em- 
ployee record and asks for new information 
for the item specified, white displaying the 
current entry for that item. The program will 
continue to ask for different items to tie ed- 
ited until the user types in a zero to quit. 

If Enter is pressed without typing a new 
entry in, no change will be made in the 
record. 

The update section is similar to Edit ex- 
cept the program allows you to edit the 



same Item In every record. The program will 
display the entire record and the current en- 
try for the Item to be updated. 

After a new Item Is entered, the next em- 
ployee record will be displayed and then It 
can be updated. If you don't want to make 
any changes, press Enter and the Item will 
not be changed from the current entry. 

The List section of the program does not 
operate on the file but can be useful before 
using Edit or Update. When an L Is typed, 
the computer displays all the Item latrals to- 
gether with the Item number and the num- 
ber of spaces allowed for each Item. The 
display can be frozen by pressing the Hold 
key. (Pressing the Hold key a second time 
continues writing the Items on the screen.) 
The entire list of labels will not fit on the 
screen at one time. 

Typing a Q(ult) will return the user to 
Basic. 

When the Delete section Is entered, the 
program prompts the user for the empl<^ee 
number of the person whose record Is to be 
deleted. After the correction employee 
number Is entered, all Items In the record 
will be erased except the following: 



1. Employse Number 

2. Position Title 

6. Narrw 

7. SocM S«curlty Number 

8. Address 

9. CIty-SUts 

10. Zip 

11. PtK>ne 

13. Term. Dete 

14. Reason 

75. Rmidancy 



The appropriate reason for deleting the 
record must be entered In Item 14. Active 
employees will have a dash, I.e., nothing en- 
tered, for Reason. The entry Is Reason Is- 
used by the Printer program to determine 
whether a person Is an active employee 
or a former employee and, consequently, 
whether the record should be printed or not. 
Note: It Is important to always exit Builder 
through the Quit command. If the break key 
Is used Instead, some data may not be writ- 





Number of 






Characters 


Formal, Etc. 


DIst— County artd district numbers. The computer fills this with 61010 






always. 






1. Employee Number— We assign a 4 digit number which Is the record number 


5 


XXXX 


In our computer 






2. Position Title— A narrative description. 


20 




3. Claaa-Typeof employee 


2 




4. BIdg.— Employee's worh center 


2 




5. Oept.— WT>ere employee Is assigned 


2 




6. Name— Employee's name— last, first, Initial with no punctuation 


25 




7. Social Security Number— 9 digits, Include the two dashes 


12 


XXXXXXXXX 


8. Address— Number and street 


20 




9. City-Stale- aty and State abbreviation, state in last two spaces at right 


15 




10. Zip 


5 




11. Phone— Home phone, include the dash 


9 


XXX-XXXX 


Table 1. A sample of the employee transmittal form. The number of characters 


cannot be Increased or the format changed. 







ten to disk and lost. 



Printer 



This program Is used to output the em- 
ployee file, or portions of It, to the line print- 
er. There are three options. 

One option prints a complete set of em- 
ployee transmittal forms. The appropriate 
forms are placed In the printer, and the print 
head Is centered on the top line. Next, enter 
the employee number of the first and last 
employee to be printed. This allows you to 
start In the middle of the file, If necessary; a 
useful feature after the printer has run out 
of paper, for example. 

Option number two prints a listing of the 
file with only a few basic Items. 

The Items printed are: 

1. Employee number 

2. Position Title 

3. Class 

4. BulMIng 
6. Name 

45. Total 

56, 63, 68, 73. The 4 Contracts 

SO, 64, 69, 74. The 4 Accounts 

This option also allows one to specify the 
first and last employee desired. 

The third option prints the employee 
transmittal form as in option one, however, 



only one employee is done at a time. This al- 
lows the user to obtain a single set of forms 
after a record has been edited. After the 
transmittal form has been printed, the pro 
gram asks for another employee number 
Additional forms can be obtained, or by typ 
ing a zero, the program will quit. If the use 
wishes to have the printer discontinue im 
mediately, the Break key can be pressed. 

Before Printer begins to output the em- 
ployee records, the user is asked, "Should 
former employee's records be printed?" If 
the response is yes, then all records in the 
file are printed. If no is the response, then 
only those records that have a "-" for Rea- 
son (item 14) will be printed, item 14 should 
be changed to the appropriate Reason code 
whenever an employee's record is deleted 
in Builder. 

Sorter 

The program Is a general purpose sort 
and print routine. It has several features: an 
unlimited number of keys, partial keys. 
And. . .Or function, four types of printout, 
seven Items that can be summed, and the 
printout can be ordered or alphabetized by a 
given Item. 

At the beginning of the program you are 
taken through a series of questions to de- 
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"We want a minimal printout of 

all teachers who reside in the district. 



termine what type of a sort wilt be done on 
the file and what kind of printout is desired. 
As an example, consider the following sort 
through the file, We want a minimal printout 
of all teachers that are at the high school 
who are residents of the district. This will be 
an And sort because the person must be a 
teacher and a high school employee and a 
resident. We will not sum any items, but we 
want the list alphabetized by name. 
The questions asked are as follows: 

• How many keys? — you must respond 
with the number of different items that will 
be used to perform the search. In our exam- 
ple this would be three: teachers, high 
school employee and resident. 

• Enter Item number for key#— at this point 
you enter the Item number tor the three 
keys. They would be 3, 4 and 75. 

• Do you wish a partial key?— in this case 
no. A partial key is used only when a portion 
of an item Is being searched for. An exam- 
ple of this might be a particular three 
numbers in the middle of one of the account 
numbers. 

• Enter position of first character, number 
of characters and the exact Key— this sec- 



tion prompts the user for the partial key if 
one was chosen. Three values must be 
typed in, separated by commas. The first 
value is the numerical position of the first 
character of the partial key. The second 
value is the number of characters in the par- 
tial key, and the third value is the partial key 
itself. An example would be 4, 2, AB, mean- 
ing the fourth character in the item is the 
first character in the key. The key is two 
characters long and the exact key is AB. 

• Enter exact key for —if a partial 

key is not chosen, this message prompts 
you for the exact key to he compared with 
the entire item. An error message will occur 
if the key typed in is longer than the number 
of characters used for the Item. If the key 
typed in is shorter than the full number of 
characters used for the item, the program 
fills extra spaces with blanks to the right. 

• ts this an And or Or sort?— this input al- 
lows the user to choose two different types 
of sort. An And sort is when ail of the vari- 
ous keys must match the items in an em- 
ployee record before that record will be 
printed. The Or sort will print the record if 
one or more of the various keys match the 



items in the employee record. 

• What type of printout do you 

desire?— there are four possible types of 

printout: 

A minimal listing of employees that In- 
cludes the employee number, position ti- 
tte, class, building, name, total and the 
four contracts amounts and the account 
numbers. This printout takes four lines 
for each employee. 

A printout of the entire record in a style 
very similar to the employee transmittal 
form, but Instead It is printed on regular 
blank paper. 

A mailing label that contains only the 
name and address of the employee. Sin- 
gle width, pre-gummed labels, with a six 
line spacing from label to label, must be 
placed In the printer. 

A printout that consists of a list of 
desired items that the user has speci- 
fied. If this option is chosen the program 
asks, "How many items do you want 
printed for each match?" This can be any 
value up to 80. The program then asks 
you to Enter item #— to be printed. The 
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Now for theTRS-80 Models I & 




DOUBLE Sided & DOUBLE DensKy Su 
'AUTOMATIC Density recognition. ' 
' 35, 40, 77, 80 and any other track counts are supported. 
' All available drive stepping rates are supported. 

■ Hard Drive support, can be HANDLED AS A SINGLE DRIVE. 
' Hard drive partitioning, one drive can act as up to six. 

■ Intermix 5", 8" and Hard drives, up to a total of 8 drives. 

• Compatible with the Model I Radio Shack Expansion Interface. 

• Upward compatible with TRSDOS (2.3 & 1.3 as documented). 
' Fully supports Microsoft language products for TRS-80. 

• Complete media compatibility Model I to Model III and back. 

• Full support for LOBO's LX-80 interface. 

> Full support for AEROCOMP'S double density controller(DDC) 

• Full support for PERCOM's DOUBLER II. 

' Complete documentation (well over 250 pages). 

' Complete technical information. 

' A TOLL-FREE 800 number for customer service. 

> An LDOS users bulletin board on MicroNET. 

• A Quarterly LDOS users magazine (The LDOS QUARTERLY). 
' A literal update policy. 

• An enhanced BASIC <LBASIC) including: 

> Upward compatible with Microsoft Basic. 

> High speed LOAD and SAVE. 

> Run multiple programs with common variables. 

> BLOCKED (variable length) files are supported. 

> DOS commands may be executed from LBASIC. 

> Built in string array. SORT. 

> Single stepper for debugging. 

> Several new statements and file modes. 



bled JOTTCDNTROL LANGUAGE (JCL). 

• CONVert utility to move files from Model III TRSDOS. 

•An Extended Debugging and Monitor program (with diskaccess). 
•CMDFILE for movement of diskand/or tape system (/CMD)files. 

• Device independent operation. 

• Full LINKing, ROUTEing, FlLTERingand SETtingare supported. 

• MinlDOS feature for constant access to certain DOS commands. 

• RS-232 DRIVER for serial support. 

• Sophisticated communications software included. 

• Wildcard characters and partial Filespecs are supported. 
" DATED FILES, show when a file was last written to. 

• Backup: Mirror, by Class, if Modified, by Date, by Extension, etc. 

• Selectable PURGE for fast disk "cleanup" of unwanted files. 
" Print formatter, for control of printer output. 

" Built in printer SPOOLER, to both disk and ram. 

• Joblog to record all system operations with time stamps. 

• UPPER and lower case support, throughout the system. 

• Blinking cursor with selectable cursor character. 

• 128 character TYPE AHEAD buffering for keyboard input. 

• Assign strings to individual keys with Key Stroke Multiply (KSM). 

• SUPER FAST operation with the SYSRES feature. 

• Extensive user control and system feedback. 

• Advanced PATCH utility for easy maintenance. 

■ Complete transportability of software among all Z-80 LDOS 
systems through the use of the LDOS high ram supervisory 
call system. 

• Dealers to serve users Nationwide and in the Common Market. 

• The only DOS with a limited ONE YEAR WARRANTY! 

• Enjoy a professional operating system on YOUR TRS-80! 



* Specific hardware is required to use these features. 



The Ultimate In 
Operating Systems 
For Model I & III 



Only $ 



169 

Version 5.1 



00 



* Model I LDOS provided on 35 track single density media. 

* Model III LDOS provided on 40 track double density media. 

* LDOS can be provided on special media configurations at an 
additional charge. 

* Prices & Specifications are subject to change without notice. 
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For Further Information Contact The Distributor Or Dealer Nearest You: 



(West) 

LOBO DRIVES INT'L 

354 S. Fairview Ave. 

Goleta.CA 93117 

(805) 683 1576 



(Central) 

GALACTIC SOFTWARE LTD. 

11520 N. Port Washington Rd. 

Mequon. Wl 53092 

(414) 241-8030 



(East) 
MISOSYS 

5904 Edgehill Dr. 

Alexandria, VA 22303 

(703) 960-2998 



(The Common Market) 
MOLIMERX LTD. 

1 BucKhurst Rd., Bexhili 
Sussex, England 
(0424)220391 



DEALER INQUIRIES WELCOME. LOOS is a product of LSI. TRS-80 & Radio Shack are trademarks. 



i 



OGICAL 
SYSTEMS 
INC. 

Mequon, Wl 53092 
(414) 241-3066 



"The program prints a complete new 
salary schedule from one to 13 years. 



list of item numbers for the desired print- 
out is then entered. Users should always 
enter several items that wiil easily iden- 
tify the employee when a match is found. 
Examples would be the employee num- 
ber, name, class, building, etc. If a large 
number of items are requested the user 
should keep in mind that they will be 
printed across the line in the order they 
were entered. If the length of the request- 
ed Items exceeds the width as specified 
by the Forms statement the printer will 
continue on the next line. 

• Do you wish to have any items 
summed?— there are a total of seven items 
in the employee's record that may be sum- 
med as the individual employees are found 
in the sort. These items are the Total (item 
45), the four Contract amounts (items 58, 63, 
68, 73), the C— curricular percentage (item 
76) and the Longevity amount {item 81). 

If you wish to have items summed, the 
program will first ask, for "How many 
items?" and then ask the user to Enter the 
item number. If more than seven items are 
asked to be summed, the program will asK, 
"How many items?" again. The program al- 
so checks to see if the items entered are val- 
id ones for summation. If the item is Invalid, 
the program asks for the item number to be 
entered again. 

• Do you want the printout to be alphabet- 
ized or ordered? — if no order is needed the 
program will simply print out the employee 
records as matches to keys found, and the 
order will be by employee number. If 
something like a printout in alphabet order 
by employee name is desired, Y should be 
answered. The program then asks the user 
to Enter the item that the printout will be 
alphabetized or ordered by. A 6 should be 
entered if alphabetizing by employee 
name is desired. Other item numbers will 
produce an ordered printout based on that 
particular item. This allows you to print 
sorted records by building number, class, 
years of service, etc. 

TMatrlx 

This program must be run to calculate 
the number of employees on each step and 
level of the salary schedule. Once run, the 
program Teacher will use the data file that 



TMatrix produces and stores on the disk. 

TMatrlx does a limited sort on the four ac- 
count codes and also aitows the user to 
choose the class code (Item 3). The ques- 
tions the user is prompted with are as fol- 
lows: 

• Enter the file name for the matrix— the 
user should enter a name tor the matrix that 
is six characters or less. This same name 
must be used when running Teacher. 

• Is this an And or Or sort?— an Ar>d sort Is 
when all keys must match the employee's 
record and an Or sort is when only one or 
more keys must match. 

• How many keys for the account 
codes?— enter the number of keys there 
will be in the search. 

• Enter item number, position of first char- 
acter, number of characters and the exact 
key for each account number desired— the 
valid item numbers are 59, 64, 69, and 74. 
The next three values are the position of the 
first character of the partial key, the number 
of characters in the key, and the key itself. 
The four values are all typed on one line, 
separated by commas. This Is similar to a 
prompt In Sorter, but the Item number for 
the account code must also be Included. 

The current record numtier being read Is 
displayed on the screen as the search con- 
tinues. When the search Is finished the ma- 
trix is printed along with a separate matrix 
for the longevity schedule. 

Teacher 

This program con^putes a new teacher 
salary schedule using the amount of the 
current base salary and the percent in- 
crease for the new schedule. Upon entry In- 
to the program the following questions are 
asked. 

• Enter the file name of the matrix you wish 
to use— a file name that was created by the 
use of the TMatrix program should be 
entered. Various matrices can be stored 
and used depending upon the employee 
group desired- 

• Enter current base and percent In- 
crease—the current base salary and the 
percentage increase (in whole numtwr per- 
cents, for example 7.5 for 7.5 percent) 
should be entered. 

• If projections are to t>e on next year's ma- 
trix EnterAI, if on this year's Enter A 0— if a 



1 is entered, each employee will be entered 
into the matrix on the next year's step. This 
allows the user to project the cost of next 
year's salary schedule. The program will 
print a complete new salary schedule from 
one to 13 years by half year steps and from 
14 to 40 years by yearly steps. 

After the new schedule is computed, the 
program uses the data fite produced by 
TMatrlx to find the total amount of teacher 
salartes for each step and level of the salary 
schedule. A printout of this follows In which 
each step is subtotaled and a projected to- 
tal of all teacher salaries Is arrived at. A sep- 
arate schedule fw the (ongevity totals is al- 
so printed In the sanne format. 

Although the programs shown and de- 
scribed here are structured tor the employ- 
ee file at a particular public school system, 
the basic structure can tie used for the em- 
ployee file of any company or public institu- 
tion. Actually, very few changes would have 
to be made in the three main programs 
Builder, Printer and Sorter. The salary 
schedule projection programs TMatrlx and 
Teacher would have to be rewritten exten- 
sively. 

Changes 

The number of Items (NUM), Item labels, 
and the number ol characters In the data 
statement would need to be changed. The 
format of the printout on the video display 
In Builder and printing In Printer and Sorter 
will need complete changing to reflect the 
items each employee record has. The Dim 
statement and the Open and Field state- 
n>ent8 will need to be changed depending 
on the number of items and characters In 
each record. Along with this, a few con- 
stants in the program will have to be 
changed, for example th« value 254 (which 
is a record length) In seversi formulas. The 
specific items deleted In Builder and sum- 
med in Sorter will have to be changed to 
meet Individual needs. 

Very little work was done on these pro- 
grams In terms of optimizing them for 
speed. In spite of this, they run fairly quickly 
for a microcomputer that is reading and 
writing to disks. The total time to run Sorter 
given roughly 1,000 employee records, mul- 
tiple keys and alphabet lzif>g the output is 
under one hour. ■ 



100 HEM - 


BUILDER 


120 REM 




140 REM 




160 REM 




IBB REM 




200 REM 




I1'0 REM 




2't0 REM 





Program Listing 1 



t'-.' uppjat^ an.J t-'li*: i •: . Ther^ are fiv* sections! Inputi 
iiihtr* an en tirs recOifO i^ entertdi Editi where 1 teilil. in 
« recorij can bft chan9*L: and Update, where the same i teifi 
in eacfi recor-fl can t-e 'ifiangtd. Ther* is alio a Lilt option 
wh^re a iisting or th« labeli carj te obtained on the 
;i;reeni and a Dele**- I'ljnc^ion that will erts.* a record. 
Written b . Th&ron Wi^r^r.ya during March 1980. 
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Program Listing 1 continued 

260 CLEAR 2000 

280 DIM L«(9a).Ll(90).F«(90) 

300 REM - READ IN DATA 

320 NUM=81 

340 FOR 1=1 TO NUM 

360 READ LSID.LllI ) 

380 DATA EMPLOYEE #,5. POSITION TITLE. 20. CLASS. 2. BUILDING. 2. DEPARTMENTi 2) NAME, 25i SOCIAL SECURITY #.12.ADDRESS 

400 DATA 2B, CITY-STATE. 15. ZIP. 5, PHONE, 9, EMPLOY DATE. B. TERM. DATE. 8, REASON. 1 r RE-EMPLOY DATE. 8. BIRTH DATE.B 

420 DATA YRS. SERVI CE. 5, CITIZEN, 1 , ETHNIC, 1 , MARITAL STATUS. 1 . SEX . 1 . BANK ACCOUNT «. 10. EXPERIENCE. 5 

440 DATA CERTIFICATE 1 , 6. CERTIFICATE 2. 6. CERTIFICATE 3.6, DEGREE. 1 , HOURS. 3, INSTITUTION, 2, MAJOR I. 2. MAJOR 2.2 

460 DATA MINOR 1.2>M1N0R 2. 2. MINOR 3. 2. ASSIGNMENT. 4. LEVEL. 1 . PROB. EXPR. DATE. 8. LAST TB TEST. 8 

480 DATA LAST INCREASE. B. NEXT INCREASE. 8. DAYS. 4. MRS. /DAY, 5. TYPE, I , EXPR. DATE. 8 

5BB DATA TOTAL. 9. PAYS. 2. FED. EXEMP. . 7, STATE EXEMP. . 7. LOCAL EXEMP. . 7. RET. ID *t.5.FICA EX.. 1. AUTO PAY. 1 

520 DATA STMT. 1. INS. SUBSIDY. 7. STEP/LEVEL 1.3. CODE 1 . 1 f RATE l.B. CONTRACT 1.9. ACCOUNT 1 . 24. STEP/LEVEL 2. 3. CODE 

. 1 

540 DATA RATE 2. 8. COffTRACT 2. 9. ACCOUNT 2. 24. STEP/LEVEL 3. 3. CODE 3.1. RATE 3, 8. CONTRACT 3. 9. ACCOUNT 3.24«BTEP/LE 

EL 4. 3. CODE 4. 1 

560 DATA RATE 4. 8. CONTRACT 4. 9. ACCOUNT 4. 24. RESIDENCY. 1 . CO-CURR. '/..5.LIFE INS. . 1 . DENTAL INS. . 1 .VISION 1NS..1 

580 DATA HEALTH INS. , 4. LONGEVITY, 4 

600 NEXT I 

620 OPEN "D-, I, "PI", 254 
640 FIELD 1.254 AS Al« 
660 OPEN ■D".2."P2".233 

680 FIELD 2.253 AS A2« 

700 GOSUB 2100 

720 IF 5«-"I" THEN 1260 

740 IF G«-'U' THEN 1820 

760 IF G«»"L" THEN 4000 

780 IF G*-"D" THEN 4220 

800 REM»»«»*«**«*«««*««««««««««««»»»«i(<(**»«*«««#»»»»«»«»#»»»»#»*«««««««««««»«« 

820 REM - EDIT A RECORD 

840 PRINT-INPUT EMPLOYEE NUMBER - ENTER (ZERO) TO QUIT" 

860 S=-l 

BBB INPUT S 

700 IF S=0 THEN 700 

920 IF S>0 AND S<-L0F(1) THEN 9B0 

94B PRINT-BAD EMPLOYEE NUMBER" s PRINT 

960 GOTO 840 

980 GET l.S 

1000 GET 2.S 

1020 PRINTtPRINT 

1040 PRINT'WHICH ITEM - ENTER (ZERO) TO SUIT" 

1060 I — 1 

1080 INPUT 1 

1100 IF 1=0 THEN 700 

1120 IF I>0 AND I<=NUM THEN 1180 

1140 PRINT"INVALID ITEM NUMBER - TRY AGAIN" 

1160 GOTO 1020 

lies GOSUB 3300 

1200 GOSUB 2320 

1220 GOTO 1020 

1240 REM»**«»««««««»»»«**»«»*»*»**«««««««««**»»*»»»*»iH«»«*«»««»««»«««)n(«)ni»«« 

1260 REN - INPUT ENTIRE FILES 

1280 H*="-- 

1300 R-LOF( 1) 

1320 R-R+1 

1340 PRINT-NEXT RECORD NUMBER IS-!R 

1360 D»=-- :E«=-" 

1380 FOR 1=1 TO NUM 

1400 GOSUB 2840 

1420 PRINT 

1440 GOSUB 3040 

1460 IF I>42 THEN 1520 

1480 D»-D»+C$ 

1500 GOTO 1540 

1520 E»=E»+C« 

1540 NEXT 1 

1560 LSET Al«-D« 

1580 PUT l.R 

1600 LSET A2i-E« 

1620 PUT 2.R 

1640 GOSUB 3300 

1660 PRINTsPRlNT 

1680 PRINT" CONTINUE (Y OR N) " I 

1700 INPUT G* 

1720 IF G»='Y- THEN 1320 

1740 IF G*="N" THEN 700 

1760 GOTO 1680 

1780 REM*************-**-************* ••»'«»«•••«• K**-****-************************ 

1800 REM - UPDATE A SINGLE ITEM IN ALL FILES 

1820 PRINT" INPUT ITEM NUMBER TO BE UPDATED IN ALL RECORDS" 

1840 1-0 

1860 INPUT I 

1B80 IF I>0 AND I'>NUM THEN 1940 

1900 PRINT" INVALID ITEM NUMBER - TRY AGAIN" 

1920 GOTO 1820 

1940 FOR 5=1 TO LOF ( 1) 

1960 GET l.S 

1980 GET 2,S 

2000 GOSUB 3300 

2020 GOSUB 2320 

2040 NE)(T S 

2060 GOTO 700 

2080 REM**»«»»»»*»»»»»»«««««»««)H«»*«»»»»»*»»»»»»«*»«****»»*»»*«««»»«»inf »**««#« 

2100 PRINTsPRINT'INPUT WHOLE RECORDS. EDIT, UPDATE. DELETE, LIST LABELS OR QUIT" Program Listing 1 cf>ntlnU9S 
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Program Listing 1 continiMiS 

i:120 PRINT-ENTER I. 

21*a 6»-- .+. ■ 

2160 INPUT G« 

21Ba IF G«-".-»." THEN 2100 

2200 IF Gt-'I" OR G*>--E- OR 6*«-U- OR G^^'L" OR G«=-D" THEN 22B0 

2220 IF G»<-"a" THEN 2100 

2240 CLOSE 1.2 

22e>0 STOP 

228B RETURN 

2300 REn«**»***»*»»*««»«««<«**»«*««««<a>«»«<«««««***«*«*«*<«<«»«**>««»«*»«««»« 

2320 REM - INPUT AND UPDATE AN ITEM 

2340 [}S>Al«iE«=A2« 

236B T*e 

23B0 IF I-l THEN 2«.60 

2AB0 FOR J-l TO I-l 

2420 T=T*LH J) 

2440 NEXT J 

2460 GOSUB 2B4B 

24BB PRINT TAB(L1 ( I >♦ 10) ;■ CURRENT ENTRY! "t 

2500 IF I -42 THEN 2580 

2520 H*=MID*(D*.T*1.LHI ) ) 

2540 PRINT HS 

2560 GOTO 2620 

25B0 H«"MID»(E*.T*1-254.L1 (I > > 

2600 PRINT H» 

2620 GOSUB 3040 

2640 IF 1>42 THEN 2700 

2660 MIDtCDfiT+liLK I) )=C» 

26B0 GOTO 2720 

2700 MID«(E«.T+l-254tLl(I) )=C» 

2720 LSET A1»=D» 

274B LSET A2»-E« 

2760 PUT 1,S 

27B0 PUT 2iS 

2B00 RETURN 

2820 REM* «•«•«««»•••*»***<•«***•<«»«••<«»«**••«*«*«««■•**••«••««««*««««• »•«*«« 

2840 REM - PRINT OUT LABEL 

2B60 PRINTiPRINT CHR«(26)! 

28B0 PRINT LSCI ) 

2900 PRINT" ■ i 

2920 FOR 12-1 TO Ltd) 

2940 PRINT-*- i 

2960 NEXT 12 

2980 PRINT CHR»(251 ! 

3000 RETURN 

3020 REM**««*«*««**>***<«««<<>«««*««*«*<«««<t***<«>»*««<«»*«««««4«*»*#*»«***«#« 

3040 REM - FILL IN C» WITH BLANKS 

3060 C«=-. *. ■ 

3080 INPUT C* 

3100 IF C«-;-.-.-." THEN 3140 

3120 C»=H« 

3140 Z=LEN(C«) 

3160 IF Z^-Ll(I) THEN 3220 

31B0 C« = LEFT*(C».L1( I 1 1 

3200 GOTO 3260 

3220 IF Z-Ll!n THEN 3260 

3240 C«=C**SPACEt!Ll[ I)-Z) 

3260 RETURN 

3280 REM«»»*«*«#««**<«»«***«<»«**«««*o«««««»«««*««««»«<**<<i«<<«««««**«<«««« 

3300 REM - PRINT TRANSMITTAL FORM ON VIDEO SCREEN 

3320 PRINTiPRINT 

3340 T=l 

3360 FOR J=l TO 42 

33B0 F«( J}-MID«<AI«, TiLl ( J) ) 

3400 T=T*L1 (J) 

3420 NEXT J 

3440 T-1 

3460 FOR J-43 TO MUM 

34B0 F»(J)-MID«(A2».T,L1(J1 ) 

3500 T»T»mj) 

3520 NEXT J 

3540 PRINT-61B1B ' i F» { 1 ) iSPACE* ( 9 ) ; FH2 ) ; F« ( 3 ) i ' " ; Ft C 4 i i 

3560 PR1NTCHR«(26) i-DlST EMP » POSITION TITLE 

35B0 PRINT F«(7> iF«(B);- ■!F»(9)i- -;F«(10)l- -iFSdli 

3600 PRINTCHR»(26) I'SOCIAL S. » ADDRESS CITV-STATE 

3620 PRINT F«U2)f ' I F« ( 1 3 > ! - ■!F«<14)-.' -;F«(15)?- -jFSdfc'!" 

■ 1F»(21 1 ! - ■ !F«(2 
2) 



!F»(5)!" -;F«(6) 
CL BCi DP NAME 



ZIP 
!FS( 17 ) ; ■ 



PHONE' 
■ :Ft( 18)1' 



■ 1 CMR« ( 23 > 



- ICHR»(25) 
■ 1F»{19) I" 



iF*(2a)r 



3640 PRINTCHR«(26) s-EMP.DATE TER.DAIF RE RE. Vf<~ 
3660 PRINT FS{23)|- -!F*(24);- -!F»';25)''' 



E Bin. DATE YR.B 
" :F»(26) i" 



CZ ET MS SX 
" !F«(27 ) « " 



BANK ACC.tt -|CHR»(25) 
'!F«(2B)i- ■;F»(29)l" "lF«(3an" 



iF«(31 ) ;' - iF«(321 1- 

- IF«(33) t - ■ tF«(34} i ■ ■ ;F«135) ! ■ " : F » i 36 ' 
3660 PR]NTCHR»(26) !-EXPER. CERTIF 1 f A [EB DG HS IN r^J MJ MN MN MN ASMT L-!CHR«(25) 

37BB PRINT F*(37) !- -!Ft(3ai!- •;F«',39>t- -:F»(40i;' ■:F»I41i;- ■\FtHt::):- -!F»<43)!" " ! F« ( 44 ) ! ' " 1 F« ( 45 ) 
372fl PR1NTCHR*(26) 5 -PROB.EX. TB TEST LAST IN. NEXT IN. DAYS H/DY TY EX. DATE TOTAL -!CHR»(25) 



3740 PRINT F»(46) !SPACE»d5) |F»(471 !- -!F«(4S)!' 



!F«(49> ;- 



TF»t5ai 



- iF«(51) !' 



- -.F«(52) I- ■ IF»(53) t ' 



■IF«(54) 
3760 PRINTCHR»<26) i' 
3780 PRINT F«(551 i- 
3600 PR1NTCHR«(261 I 



PAYS 

" )F»(56) ! - 
S/L CODE RATE 



FED.EXM. ST. EXM. LOC.EXM. H.ID« FICA AP STMT IN. SUB. " ( CHR» ( 25 ) 
;F«(57);' -iFttSBl!" "iF«(59)i" ■;F«(77)!" -)F«{75) 

CONTRACT ACCOUNT ■;CHR»(25H- " f CHR« ( 26 ) I " LIFE 



RES. 



■ tCHR«( 25) 
3820 PRINT F«(60)!- -!F»(61ll- 
3B40 PRINTCHR»(26! i-S/L CODE RATE 



!F»lfc2l : ■ " !F«(fc3> ! '■ ■■ ;F»(fr4> t - 
CONTRACT ACCOUNT 



■.F*<7B/ i- ■ SF«(76) 

■:CHRS125i;- - iCHR«( 26) ! -DENTAL CO-CUR 
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SOFTWARE CONCEPTS 

Dallas, Texas 
NOW - MORE THAN SPECIAL DELIVERY 



SOFTWARE CONCEPTS 



OTHER FINE SOFTWARE 



Who is Software Concepts? We are the originators 
of Special Delivery wo rdp recessing software for the 
TRS-80. We are now expanding our product line to 
Include items used in our daily business operations. 
We consider these to be better than any other 
product we tiave tried for its price/pertormance 
ratio. If we sell it - we use it! 



SPECIAL DELIVERY 



"...If you're presently looking for a mailing list 
processor, this represents the current state of the 
art. " 
80 MICROCOMPUTING - 80 REVIEWS - JULY 1980 

SPECIAL DELIVERY is the best mail list processor 
available for the TRS-80, just ask our customers! 
Use Special Delivery to maintain your mailing list 
with fill-in-(he-form ease. You create, edit, sort, 
extract, and otherwise manipulate your mailing list 
with the speed and ease of use possible only in 
100% machine language software. Special Delivery 
will merge data from the mail list into a letter 
created by your own text editor (Scripsit. Electric 
Pencil, etc.) to generate a "personalized form 
letter" to any or all names in the list. Print free 
form mailing labels, envelopes, even legal docu- 
ments! Print any ctiaracter (including escape 
codes) your printer is capable of printing! Boldface 
and underscore is supported for most printers, now 
including the Daisy Wheel II! 

SPECIAL DELIVERY includes: 

MAILFORM: data entry at Its best, just fill in the 

form! Sort, extract, page forward and back, insert/ 

delete, more! 

MAILRITE: print letters, etc. created with your 

editor while inserting text from your MAILFORM list. 

SEVERAL printer drivers (EDAS source code as well 

as /cmd files), and letter and list samples to get 

you started. 

XTRA! SPECIAL DELIVERY mdudes: 
EVERYTHING m regular SPECIAL DELIVERY. 
Enhanced MAILRITE: with the ability to print varia- 
ble text from a "KEY" file (greatly expanding the 
capacity of each record in your list) , 
MAILABEL: 1, 2, 3. or 4 across label printer. 
MAILSORT: will sort by any field, a full 40 track 
double density data diskette (over 1500 names) in 
only48K! 

ZIPSORT: sorts on zip only, but will handle over 
4500 names! 

NOTE TO 
REGISTERED OWNERS 

Registered SPECIAL DELIVEfJY owners can upgrade 
to XTRA! by returning their ORIGINAL disk with 
$74.00 + $2,00 shippingand handling. 

FOR YOUR MODEL I OR III: 

(requires minimum of 32K, single drive) 

SPECIAL DELIVERY $125 

XTRA SPECIAL DELIVERY $199 

FOR YOUR MODEL N: 

(requires TRSDOS version 2.0 & does NOT work 

with Scripsit) 

SPECIAL DELIVERY $199 



ALL NEW ELECTRIC PENCIL!!! 

NOW AVAILABLE FOR THE MOD III! While the original 
PENCIL set a standard that otfier editors have yet 
to achieve, the NEW ELECTRIC PENCIL reacties even 
greater heights with many exciting new features 
that make it the easiest-to-use text editor available 
for the TRS-80 Mod I or III!! 
Electric Pencil version 2 $84.95 

EDAS 

This is the assembler from Misosys which is used 
for all assemblies of Special Delivery. We had real 
headaches until this came along. A must for any 
assy, language programmer, 
EDAS MOD I/MOD III $75,00 

THE DISASSEMBLER 

This is simply the most advanced disassembler we 
have ever seen. Creates EDAS source code, inserts 
predefined labels, disassemble disk or memory, 
generates ORGS & EQUates. By Ed Stitt. 
THE Disassembler $89.00 



LDOS 

Features previously available only on a 
mainframe. Real powerhouse DOS, Good 
support. 

NEWDO$80V2.0 

See above- Fantastic BASIC enhancements. 
The well equipped software developer will 
own both LDOS & NEWDOS but one or the 
other is a must, 

LDOS $159.00 

NEWDOS V2.0 $145.00 



HARDWARE 

DATA SEPARATOR 

The PERCOM lifesaver. If you have a MOD I with disk 
drives and no data separator you have problems. 
Order from us or PERCOM but get a data separator. 
Data Separator $27.95 

DOUBLER 

Another PERCOM breakthrough. Add double density 
to your MOO I. Includes built in data separator. 
Doubler $165.95 

DISKETTES 

20 Name Brand diskettes packaged in bulk. Re- 
inforced hub, double density, double sided, 
Pkgof2D $55.00 

GREEN SCREENS 

Not much difference between green screens but 
everybody should have one. If you don't buy ours, 
buy theirs. 

MOD I/MOD III $17.95 

MOD ll/LEEDFX 100 $22.95 

MODEL II INDEX 

Now find everything you need in your Mod II manual 

with this super index and cross reference. 

Index $17.95 



NEC 8000 Computer 

Z80a compatible, 4MHZ, 64K ram. color supported, 
RS-232, 163. 8K per disk, parallel interface, 5 
function keys, numeric keypad 

NEC 8000 keyboard unit $1200.00 

Green phosphor screen $250.00 

Expansion Interface $800.00 

Disk Drives (2) $1200.00 

Parallel Printer Cable $44.00 

EPSON PRINTERS 

Epson has become the standard by which other low- 
cost printers are measured. Highly recommended! 

MX80 $500.00 

MX80 F/T $650.00 

MX70 $419.00 

MXlOO $785.00 

Printer Cable $35.00 

TRS80 Bus Board/Cable $100.00 

GRAPHTRAX80 $80.00 

Ribbons $14.00 

Print Heads $28.00 

Apple Board/Cable $110.00 

DRIVE TABS 

Dress up your system with professionally engraved 

drive number tabs. Numbers thru 3. Avoid 

confusion. 

Setof4 $3.50 

PRODUCTS WANTED 

If you have a machine language program that is the 
best there Is, contact Software Concepts. We are 
interested in publishing all first rate software. 

DISCOUNTS 

Users groups and computer clubs, write for group 
discount information. 

Al products are warrantied as specified tty the 
manufacturer. Liabity of Software Concepts is 
Smited to the deivery of undamaged merchandise. 

OTHER SOFTWARE AVAILABLE. 
Cal if you don't see what you need. 

Add 3% Shipping & Handling 
Texas Residents add 5% Sales Tax on 

all hardware items. 

Specify whether MOD I, II, or 111 when 

ordering. 

* CALL COLLECT • 

(214) 247-8731 

MasterCard & Visa charge customers 

may leave order on 

Micronet 70130,232 

SOFTWARE CONCEPTS 

13534 Preston Rd. Suite 142 

Dallas, Texas 75240 ^299 

Dealer enquiries invited. 

TRS-80 & Scripsit are Reg, Trademarks of Tandy Corp. 
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• \ CHR« ( 25 ) 
3B&0 PRINT F*(631l' 'lF»(&&);- 
3880 PRINTCHR»<2&) 1'S/L CODE RATE 



■lF«(67)l- -IFtiteji" ■;F»(69M' 
CONTRACT ACCOUNT 



1F»<79) ;■ ■ !F«(B1 ) 

■|CHR*(25)I" ■ !CHR»(26) 1-VISION LONGEV 



TY ■ ICHR«125) 

39BB PRINT F«(7B)i' "IF»(71)!" ■lF«(72)I" -iFllTa)!" ■!F»(7t)r 

392B PRINTCHR«(26) i -S/L CODE RATE CONTRACT ACCOUNT 



IF«(80) 

'!CHR»(25) 



- tCHR«(2feI ('HEALTH 



■ I 

39*0 
3960 
39B0 
4BBe 
«B2a 
4040 
40&0 
4080 
4180 
4128 
4140 
4160 
4188 
4208 
4228 
4248 
4260 
4288 
4388 
4328 
4340 
4360 
43BS 
4400 
4420 
4440 
4460 
4480 
4508 
4528 
4548 
4560 
4588 
4688 
4628 
4648 
4660 
4688 
4788 
4720 
4748 
4768 
4788 
4808 
4B20 
4840 
4B68 



O^R* ( 25 ) 

RETURN 



REM' 



REM - LIST OUT THE LABELS ON THE SCREEN 

J=l 

FOR I-l TO NUM 

PRINT TABU) ;I ;L«( I)!" - "ILKI)!" SPACES" I 

J-J*40 

IF J':5B T^«N 4140 

PRINT 

J-1 

NEXT I 

PRINT 

GOTO 780 



REf 



REM - DELETE A RECORD 

R=-l 

PHINT'ENTER THE rfJMBER OF THE EMPLOYEE THAT YOU WISH TO DELETE' 

INPUT-ENTER A (ZERO) TO GUIT'lR 

IF R*=0 THEN 708 

IF R>0 AND H<-L0F(11 THEN 4388 

PRINT-BAD EMPLOYEE NUMBER - TRY AGAIN* 

GOTO 4240 

D»--" :£•-■■ !H»="-- n=B 

GET l.RiGET 2. R 

FOR 1=1 TO NUM 

IF 1=1 THEN 44B0 

T-T+L1( I-l) 

GOSUB 3120 

IF I"l OR 1=2 OR 1=13 OR 1=14 THEN GOSUB 4780 

IF 1^5 AND 1-12 THEN GOSUB 4788 

IF 1=75 THEN GOSUB 4828 

IF I 142 THEN 4620 

D*=D»»C» 

GOTO 4648 

E*-E«*C* 

NEXT 1 

L5ET Al»-D« 

LSET A2»-E» 

PUT l,RiPUT 2,R 

GOSUB 3320 

PRINT 

GOTO 4240 

C*-MID«(A1«,T+1<L1 (I ) ) 

RETURN 

C»=MID«(A2«.T+l-254.LI (1 ) ) 

RETURN 

REM»»»«««««»»END OF PROGRAh»»»»«»»»*» 



180 
128 
148 
168 
188 
288 
228 
248 
268 
288 
388 
320 
340 
360 
388 
480 

420 
440 
460 
480 
588 
520 
540 
560 
580 
688 
628 
648 
668 
bSQ 
788 
728 
748 
768 



Program Listing 2 

REM - PRINTER - Thi» rrc9r»iti (-rintj owt th* entire f i I «■ a: either a list 

REM with b»5ic infopMation or on the Eeiplor** Tr«n»ri(itt»l 

REM For»i. 5in9l* Tr-kniiiii tt«1 Fcrms can «lsc. b« produced. 

REM Urittan br Thcron Ul*r*ng« durin9 n«rch 1960. 

CLEAR 2888 

DIM Ll{9a)iF«(9e) 

OPEN -D-. 1. "PI". 254 

FIELD 1<254 AS Al« 

OPEN •D-.2i ■P2".253 

FIELD 2<253 AS A2* 



HEM* 



REM - READ IN DATA 

NUM=81 

FOR 1=1 TO NUM 

READ L 1 ( 1 ) 

DATAS<20.2i2i2.25. l2i2eil5.5.9,BiB.li8«e>5>Uli 1.1. 18.5.6.6.6. 1. 3. 2< 

DATA2i4.1.B(B.S.a>4.5t t i8i9.2. 7. 7. 7. 5 . 1 . 1 . 1 . 7< 3i 1 .8.9.24. 3. 1 . B. 9. 24, 

DATA24.3. 1 . B. 9. 24. 1 . 5. 1 . 1 . 1 * 4. 4 

NEXT I 

INPUT-SHOULD FORMER EMPLOYEE'S RECORDS BE PRINTED (Y OH N)"!G« 

IF G»"-Y- OR G»-"N- THEN 548 

GOTO 4B8 

PRINT'UHAT TYPE OF PRINTOUT IS DESIRED ?" 



2i2i2.2 
3> lt8.9 



PRINT- 
PRINT" 
PRINT- 
INPUT Z« 
IF 2t--l" 



1. Conplet* i«t of records on th* EMPlovee Transmittal Ft 

2. List of *RiPlor**> with basic i nf orinat ipn. " 

3. A sinvl* Emplovee Transmittal Form at a tine.' 

THEN 1540 



IF Z»--2- THEN 1080 
IF Z«=-'3- THEN 76B 
GOTO 540 
REMe«««««<««<««***«»*»««*«««««**»*««4<««a>»»«««««,.«aa»*««««,i 

REM - PRINT SINGLE TRANSMITTAL FORM 

PRINT'Be iwrt that TransMittal Fotbis are aliened in the printer 
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the HOW-TO, SHOW&TELL, 

STEPbySTEP book of creating 

DOS RANDOM ACCESS 

PROGRAMS. 



NEW! 



Written for TRS-IO and •> computwi using 

Mtcroiott bMlc The breakthrough book *.0' 

n on- programmers . . . bualnMaman and 

profttssionais who want to soh/e in hov-s? 

orobl«m« by Wfpting your owi customliM 

program . . . and the hobbyist with the 

desire to get beyond me cassette and mto 

disk data storage and file mantpuiotion 

'008 Random Access A File Handling" ; 

the plain speaking, easy to reaa \bL' pdji 

book (Of learnnq HOW TO WHITE 

SPECIAL PROGRAMS ^or inventories. 

nalmg H3ts. vA^ik bChedules record 

■:*»Ding and more, Your acqualnlance wilh 

Level I and Level II basic and this seH 

■riRtruciion tutorial wilt nuure quiCk 

orogress 




OSC Publlsht 
2 Dogwood Dr 
PO Box 769 ■ 
Danbury, CT 06ft 



-v^^^i 



lYai. I want to expand rry prograrrmrhg 
lkr>o<v1adge 

Ptease lend rT>e a copy oi t>08 Rar^dom 

AooeM A FMa HandNng ' tor 21.50 ■ i 50 

shipping D 

Also send me the compatible program disk 

for 26 50 • 1,50 shipping. D 

Overaeas add t.OO par book arMJ disk 

alrmaiL 

|NarT>e 

lAdOress 

iCrty 

State 



Zip 



Uaster Charge □ 
JExpiralion Dale . 
Card 1 



VISA P 



Check a Wonay Order D 
COD (2 00 extra) O 
ISignature 



Phona Orders (203) 7^8-3231 
CT oraers aod 7 bft aaies tajt 



•SmU'UM ^•■••'t'M't an ajyafU 
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Program Usiing 2 continiMtJ 

780 PRINT 

BM lNPUT"Ent*r EmrloYee Number or (Zero) tc ^oit.-iH 

B2e IF R-a THEN 1828 

840 IF R>0 AND R<-LOFtl) THEN 700 

B6B PRINT-BAD EMPLOYEE NUMBER - TRY AGAIN" 

BSe GOTO B00 

Tea GET 1 . R 

920 GET 2.R 

94B GOSue 19f>a 

9tB IF Q*--Y- THEN 1020 

980 IF Ft(14)<>*-' THEN PRINTTORMER EMPLOYEE" 

IBBB IF FSdAlO"-- THEN 800 

1020 60SUB 2240 

1040 GOTO 800 

1060 REn**<t«*»****»*»***«»»»»«*#»»»»»»*»»»»- »••••»»•■• ••*♦•»«•« ••»»•*•**»•*■•»-«•■»*■ 

1080 REM - PRINT OUT LIST WITH BASIC INFORMATIOrl 

1100 PRINT" ■ 

1120 PRINT" •»» WIDTH MUST Bt SET T' 100 CHARACTERS MINIMUM ON THE PRINTER •»• " 

1140 PRINT" 

1 1&0 PRINT:PRINT"ALIGN PAPER TO TOP OF PASE THEN" 

11B0 PRINT-INPUT THE FIRST AND LAST EMPLOYEE NUMPEH DESIRED' 

12O0 PniNT"EXAMPLESi 1.999 OH 25fci512" 

1220 INPUT FI,F2 

IZ'40 LPRINT CHR»(31 ) (DATE»I • " ITIME* iCHR« (IJU) ! LPRINT 

1260 REM - HEADING HERE 

1280 FOR R-Fl TO F2 

1300 GET 1,R 

1320 GET IiR 

1340 GOSUB 1960 

1360 IF 6«-"Y" THEN 1400 

1380 IF FS{14)';>"-" THEN 1480 

1400 LPRINT Fid) !" "!F«{21l- "?F*(3)?" ";F»(4);" 'iFXfc);' '!Ft(45);- "tF«(5e>i" "iF«(59) 

1420 LPRINT TAB(691 ;F»(631 !" "iF«(64) 

1440 LPRINT TAB(69> lF«(6B) !" ";F*(t9> 

1460 LPRINT TAB(69nF»<73) !" ■|F»(74) 

1480 reXT R 

1300 GOTO 1B2Q 

1520 REM«««»««»««<«**»»»«<<»<*««»««>»<*«>»«»»»*»»«»«**<«***«*««««. •••.»«««««• 

1540 REM - PRINT SET OF EMPLOYEE TRANSMITTAL FORMS" 

1360 PRINT"ALIGN TRANSMITTAL FORMS IN THE PRINTER THEN" 

1580 PRINT- INPUT THE FIRST AND LAST EMPLOYEE NUMBER DESIRED" 

1600 PRINT"EXAMPLESi 1.999 OR 256. 512' 

1620 INPUT F1.F2 

1640 FOR R=F1 TO F2 

1660 GET l.R 

16B0 GET 2.R 

1700 GOSUB 1960 

1720 IF G«="V THEN 1760 

1740 IF F«(14)^->'-- THEN 1780 

1760 GOSUB 2240 

1780 NEXT R 

1800 REMa*****************************************************************!!!** 

IB20 REM - ADVANCE PAPER AND STOP 

1840 FOR I-l TO 28 

1860 LPRINT 

1880 NEXT I 

1900 CLOSE li2 

1920 STOP 

1940 REM««»»»*««*<t««*<<»*»««»»*»<«»»«<(««*<«*«**«. ••■■•«««<««««<«»»»««»»,«,«., 

1960 REM - BREAK DOWN THE RECORD INTO ITS PARTS 

1980 T-1 

2000 FOR J-1 TO 42 

2020 F»(J)-MID«lAl»iT,Ll(Jl ) 

2040 T=T+L1 (J) 

2060 NEXT J 

20B0 T=l 

2100 FOR J=43 TO NUM 

2120 F»(J)-MID*(A2».T.L1(J) 1 

2140 T-T+Ll <J) 

2160 NEXT J 

2180 RETURN 

2200 REM«<«*><*«**««««»««i*«»««««**<«««<*ii«*««««<««t««««»«*.. ..»«,«««.««.»„, 

2220 REM - PRINT ENTIRE RECORD ON FORMS 

2240 LPRINT-61010 " I F»{ 1 ) !SPACE»(9) lF» ( 2 ) i F*( 3) ! " "IF»(4);" "F*(5);' ■iF«(6) 

2260 LPRINTiLPRINT 

2280 LPRINT F»[7)I" "IF^OIl" ■;Ft(9H" •■,F%ll^)\' "iFtdl) 

2300 LPRINTiLPRINT 

2320 LPRINT F»d2)i- ■iF*d3»!- ■:F»(14);' •JF»d5);- "tF»d6)l- "iFSd?);" ";F«dB)J" "!F«d9)l" "lF»[2a 

i ■ " ;F«(21 ) ! ■ • ! 

F»(22) 

234B LPRINTiLPRINT SPACE* ( 64 ) 1 LEFTS { F» { 35 ) . 2 > 

2360 LPRINT F*(23)l- ■;Ft(24)i- "!F«(25)!- " ; F« ( 26 ) I " "!F«(27)i" -iF*(28)l" "(F»(29)I" •1F»(30>I" 

■ 1F»(31 ) !■ ■ iFS(32) ! 

■ "!F«(33)I" ■!F»(34)C • !R1GHTS(F«(35).2) I" "(F»(36) 

2380 LPRINTiLPRINT 

2400 LPRINT F«(37) i" ■;F«f381;' "!F«(39);- ";F«(40H- ■;F«(41)J" ■|F»142):" "!F»(43)|- ■1F»(44)l- •iF«(45) 

2420 LPRINTiLPRINTiLPRINT 

2440 LPRINT F*(46) sSPACESdAJ !F«(47) I ■ -!F«(4B>!" -!F«(49)l- •iF»{50)!" "!F*(51)1- •lF»(52)I" "IFttSa)! 

• IF»(34) 
2460 LPRINTiLPRINT 

2480 LPRINT SPACE* ( 40 ) i " RES i " I F» ( 75 ) ; " CO-CUR i " ! F» I 76 ) ! " LONG I "! F« ( Bl) : LPRINT 
2500 LPRINT F«(55)." ■tF«(56)i- •■,f*(57);- "!F«(58)!" -iF»(59)r LIFE ■.F*(77) Program Usiing 2 ccnttf,oi,s 
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AT LASTI 

Mass production prices lor high quality software Buy direct and save SCF« Also 
available for CPM and HDOS 

DATA BASE MANAGER Mod I & III S69. C149 (48Ki Mod II S199 

Maintain a data base and produce reports, all without user programming Define 
file parameters and report formats on-line Key random access, fast multi-key 
sort, field arithmetics, audit log. label Ha IrrrK-consummg overlays 500 happy 
users in one year Mod-ll and 48K versions Fiave over 50 enhancements, including 
40 fields maximum. 'I0M-M2 is great' - 80-US 

A/H Mod-IS69 Mod-ll S149 Mod-Ill 569 

Handles invoices, statements, aging, sales analysis, credit checking, forms input, 
and order enlry. Unlike other accounts receivable programs, ours can be used by 
doctors, store managers, etc 

WORD PRKESSOR S49 

Centers, justifies, indents, and numbers pages. Modi version (eatures 
upper/lower case without hardware modificalioni File meige option available 

MAIUN& UST Mod I & III S59. S79 I48K) Mod II S99 

The best' Compare and be selective. Includes forms input. 5-digit selection code. 
Zip code extension, sort on any field, and multiple labels Who else offers a report 
writer and merges with word processor'' 

INVENTORY Mod I & III S89. S109 (48K) Mod-ll S149 

Fast key random access. Reports include order info, performance summary. EDO 
and user-specified reports Many people have converted to our system' "Next to 
impossible to damage the file ' 

6L A/R. A/P. PAYROLL Mod-ll S129 each 

Integrated accounting package 100* page manual As opposed to Osboines slow 
binary search and 64 column screen, we use fast ISAM and 80 columns Dual disk 
ar>d TRSDOS required 

L21E 559 

A cassette package of 10 business programs for Level I1 16 K systems. Includes 
word processor and data base manager. Poker game S19 

Most programs are on-line, mleraclive, random-access, bug-free, documenled, 
and delivered on disks. Mod-I programs require 32K TRSDOS We're #1 in business 
Software — don t let our low price fool you' Ask for our tree 20-page catalog il 
you re still not convinced Compiled versions are available 



^ 



MICROARCHITECT. INC. ^54 

96 Dothan St., Arlington. MA 02174 




DISK DRrVE WOES? 
PRINTER INTERACTION? 
MEMORY LOSS? 
ERRATIC OPERATION? 

Don't WW — so 

Blame The 
Software! 

Power Line Spikes. Suroes 4 o , mt-xatnt '^^^' 'SO-2 

Hash could be the culprit! '^" «.259.705 -^r- 

Floppies, printers, memory & processor often interact! Our 
patented ISOLATORS eliminate equipment interaction AND curb 
damaging Power Line Spikes. Surges and Hash. 

• ISOLATOR (ISO-1) 3 filler Isolated 3-prong sochsts; integral 
SurpefSpIke Suppretelon; 1875 W Maximum load, 1 KW load eny 
•ockei $62.95 

• ISOLATOR <ISO-2) 2 filttf Itolttad 3-pror>g sochat banks; (6 
toekett tolal); Intogral Sptka/Surae Suppresalon; 1S75 W Max 
kMd, 1 KW emw bank $62.B5 

• SUPER ISOLATOR (ISO-3). similar lo ISO-1 except double 
filtering A Suppreatlon $94.95 

• ISOLATOR (ISO^ similar to ISO-1 except unit has 6 
IndMduelly flHwwl sockets $108.95 

• SUPER ISOLATOR OSO-11} similar to ISO-2 except double 
ftlterfng A Suppression $M.95 

•CIRCUIT BREAKER, any model (sdd-CB) Add$ 8.00 

• CKT BRKR/SWITCH/PILOT (CBS) Add $16.m 

«L^*l'i» Maalef-Card, visa, American Express 

DEALERS Order Toll Free 1-800-225^876 

(except AK. HI, PR ft Canada) 




WHATS THE BEST WORD??? 

How many times ha« you racked your brain tor just the (igtil word 
when wriling an important letter, reporl. o< article? How many limes have 
your ideas t>een misunderstood because the words you used didn'l express 
your thoughts clearly and accurately'' How many times have your turned in 
a report or mailed an imporlani letter and then hours later kicked yourself 
!□' not having thought ol the besi and most accurate words lo use ai Ihe 
lime you wroie \\ 

Now, by using the remarkable new REFWARE THESAURUS programs, 
your computer can speedily find Ihose words that are on the tip of your 
longue but that you can't quite remember at the momenl. And it tells you 
how lo spell them! 

Just slip a REFWARE THESAURUS disk inio your disk drive. Then type 
m your seniences or paragraphs. The computer will quickly olfer a variety 
of alternatives, retyping your sentences or paragraphs with substitute 
possibilities chosen from its mulli-lhousar>d word vocabulary. It displays 
the revised seniences on your monitor or types them on your printer as you 
choose, so thai you can mull them over and choose the one that most ac- 
curately expresses what you HEALLV mean to say 

Having helped thousands ol writers learn to express themselves with 
clariiy as editor of such publications as the World Book Encyclopedia, Ihe 
Encyclopedia Americana, and Ihe Reader's Digest Almanac and Yearbook, 
David C. Whitney has drawn on decades of editorial experience to prepare 
the revolutionary REFWARE THESAURUS programs, bringing the speed 
and power of the computer to the aid of anyone who wishes to improve his 
writing or Speaking 

In addition to Ihe specific programs capable of substituting suggested 
alternate words lor nouns and adjectives. REFWARE THESAURUS Bu)i<ler 
enables engineers, physicians, lawyers, educators, business, physicists, 
chemists, arid olher professionals and specialists to develop their ovrn in- 
dividually tailored computer vocabularies of hard-lo-remefnber technical 
words. 

REFWABETHESAURUSAdJecHreeVO OrdarNo lOOtRT S3S.8S 

Utilizes 6,200 adjectives to assist you in choosing Ihe most accurate 
modifiers lo describe nouns and pronouns in your letters, reports, and 
speeches. 

REFWARETHESAURUSNoun»1.0 Order No. 2001 RT $39.B5 

Draws on a vocabulary of 6,200 nouns to suggest allernates (or the names 
oP persons, places, things, and ideas thai you use in your writing and 
speaking. 

REFWARE THESAURUS Builder 1.0 OrderNo 5001RT S149.»S 

Series ol eight utility programs enables Ihe user to develop specialized 
computer thesaurus disk programs of hard-lo remember technical words 
and (heir allernates for personal use. Functions independently of Adjec- 
lives and Nouns programs. 

REFWARE THESAURUS Usar't Manual Order No. S001RT se.BS 

Complete description o\ use of each of Ihe above programs. Included at no 
additional charge with eac^ o' program disks listed above If ordered 
separately, price ol documentation is refundable upon receipt ol order and 
payment for program disk 

MINIMUM System Required TRS 80' Mod I or Mod III *»*. with two disk drives 

•ATrademarVol Tandy Coiporalion 



REFWARE' Reference software division David C Whitney Associates, Inc. 

P.O. BoK451,Chappaqua, NY. 10514 
■ A trademark of David C. Whitrwy Associates. Inc. 

Specify Mod I ( | or Mod III [ ) 



Qly. 


Order No 


Title 


Unit Price 


Tolal 




































Postage and handling 


S 2.00 


EnclosedJ ( jCheck { JMorteyOrder TOTAL 

Bill. ( )Viss ( ) MasterCharge 


S 





Card • 

Exp. Date Interbank « 

Signature 

Name Phone ( 

Address 



Cily State Zip 

Mall<KlFlrstClasa,butallow3lo4weekBtorclellvsry. no COD orders .^374 



I* See L/ar o/ <tdverfriws on pag« 402 
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2520 L PRINT 












254B LPRINT F»(iB);' 


■!F*(61 ) J- -iF^ttS) ;" 


' ;FS(63) !" 


" !F*(6A)! " 


DENTAL 


■ !F»(78) 


2360 LPRINT 












25BB LPRINT F»(65) !" 


" !F»(66) 5" " !F»(67) J" 


" ;F*(68) ;" 


■ ;Ft(69) 1" 


VISION 


■ ! K* ( 79 ) 


2600 LPRINT 












2620 LPRINT F*<7B)!- 


■!F«^7!)-, ■ ' ;F»(72) ;■ 


■ !F«(73) ;■ 


" !F*(74) 1- 


HEALTH 


■ ;F«(BB) 


2640 LPRINTSLPRINT 












2660 RETURN 












26B0 REM*««*«»*»*«END 


OF PROGRAM*«»»«»***» 











Program Listing 3 



IM REM - SORTER - This program i: i 9er,eri! FUfvo^r 5vrt ind print routifie. 

120 REM Itj feature? are: An unlimited rnjmt.*'- ■jf kev; . partial ksYF. 

MB REM AND/OR function for the .'■i.rt, fuur t . pe^ of printouti seven 

160 REM it«iTii cwn b* ?uriirii*d -and t^-? Frint'jijt cin t-v ond^repJ or 

180 REM alPh«ibetizfd. 

200 REM Written [■ , Thervr, l-Ji=Ten9a ti'if iu<3 March 1980. 

220 CLEAR 10000 

240 DIM L»19B).L1 (90). F»(90).Y'. 100) iE! ( 100)1 E2( 100) >K*( 100)! Wli 1000) , W2»( 1000) 

260 DIM P4<80) 

280 REM««*»***««***"«*«*****«*«***»««*****«****»*»* *♦**♦••■«•♦ •••*•*«♦**♦*•♦♦• 

300 REM - READ IN DATA 

320 NUM-ei 

340 FOR 1=1 TO NUM 

360 READ Lt(I>>Ll(l) 

3B0 DATA EMPLOYEE «. 5. POSITION TITLE. 20, CLASS. 2, BUILDING. 2, DEPARTMENT! 2. NAME. 25. SOCIAL SECURITY », 12, ADDRESS 

400 DATA 20. CITY-STATE. 15, ZIP, 5, PHONE. 9. EMPLOY DATEiG.TERM. DATE. S. REASON. !. RE-EMPLOY DATE, 8. BIRTH DATE>8 

420 DATA YRS. SERVICE. 5. ClTl ZEN. 1 . ETHNI C. 1 . MARITAL STATUS. ! .SEX. 1 . BANK ACCOUNT *t, 10, EXPERIENCE, 5 

440 DATA CERTIFICATE I .6, CERTIFICATE 2,6, CERTIFICATE 3, 6, DEGREE, 1 , HOURS. 3. INSTITUTION. 2. MAJOR 1.2, MAJOR 2<2 

460 DATA MINOR 1,2. MINOR 2, 2, MINOR 3, 2, ASSIGNMENT. -i. LEVEL, 1 , PROB. EXPR. DATE. 8, LAST TB TEST,S 

480 DATA LAST INCREASE. B, NEXT INCREASE. 8, DAYS, 4, HRS. /DAY, 5, TYPE, 1 . EXPR. DATE, 8 

300 DATA TOTAL, 9, PAYS, 2, FLD. EXEMP. , 7, STATE EXEMP. , 7, LOCAL EXEMP. , 7, RET. ID »(.5,F1CA EX. ,1, AUTO PAY, 1 

520 DATA STMT, 1, INS. SUBSIDY, 7. STEP/LEVEL, 3. CODE, 1 . RATE. 8. CONTRACT, 9, ACCOUNT, 24, STEP/LEVEL i 3> CODE. 1 

540 DATA RATE,8, CONTRACT, 9, ACCOUNT, 24, STEP/LEVEL, 3. CODE. 1 , RATE. 8. CONTRACT, 9. ACCOUNT. 24. STEP/LEVtL. 3. CODE, 1 

560 DATA RATE, 8, CONTRACT, 9, ACCOUNT, 24, RESIDENCY, 1,C0-CURR. ■/.,5,LIFE INS. , 1 , DENTAL INS. . 1 , VISION INS. . I 

580 DATA HEALTH INS. . 4. LONGEVITY. 4 

600 NEXT I 

620 FOR I-l TO 7 

640 READ S2(I) 

660 DATA 45,59.64,69>74.7fa.Bl 

680 NEXT I 

700 FOR 1=0 TO 9 

720 READ S3«(I) 

740 DATA0. 1,2.3.4.5.6.7.8.9 

76B rexT I 

780 OPEN 'D-, J, -PI*, 254 
BOB FIELD 1.254 AS Alt 
B20 OPEN ■D',2, ■P2',253 
840 FIELD 2.253 AS A2« 

860 REM»«»*»*»««»**»»»»*«»»»*««»*»«*««««**«««««******« •»••••««•••«•«♦•«•«»«■•«• 

eee rem - set up the qualifiers 

900 INPUT'HOU MANY KEYS" 5 X 

920 IF X<1 OR X>100 THEN 900 

940 FOR I"l TO X 

960 PRINT-ENTER ITEM NUMBliR FOR KEY «-!l! 

980 INPUT Yd) 

1000 IF Y(I)>0 AND Y(I)<=NUM THEN 1060 

1020 PRINT' INVALID ITEM NUMBER - TRY AGAIN" 

1040 GOTO 960 

1060 INPUT-DO YOU WISH A PARTIAL KEY (Y OR N) ' ;Ei 

1080 IF E«=*Y- THEN 1140 

U0B IF Et="N" THEN 1300 

1120 GOTO 1060 

1140 PR1NT"ENTER POSITION OF 1ST CHARACTER, NUMBER OF CHARACTERS" 

1160 PRINT-AND THE EXACT KEY FOR " !L»( Y( I ) ) ! " . EXAMPLE! 4,2,AB WHICH MEANS START" 

lieO PRINT-LOOKING AT THE 4TH CHARACTER, THE KFY IS 2 CHARACTERS" 

1200 PRINT"LONG AND THE KEY IS AB." 

1220 K»(l) = -.-t. ■ 

1240 INPUT El( I).E2(I><K«(I) 

1260 IF K»(l) = -.-«.- THEN 1140 

1280 GOTO 15t9B 

1300 PRINT-ENTER EXACT KEY FOR "!L«(Y(I))l 

1320 K«(I) = ".-». " 

1340 INPUT K»( I) 

1360 IF K»(I)-".*." THEN 1300 

13B0 Z=LEN(KSU ) ) 

1400 IF Z<=LHY(I)> THEN 1460 

1420 PRINT-THE KEY^ IS TOO LONG" 

1440 GOTO 1300 

1460 IF Z=L1(Y(I)) THEN 150B 

1480 K«( I)=K*( I)+SPACE«(mY(I) ) -2 ) 

1500 NEXT I 

1520 REM*****»*»#**»*«»**»**»«#««»*»«»**«»»»«« «**••#•* ••••»»«•»»♦»#«♦♦•«*««»«« 

1540 REM - IS AN AN AND/OR SORT 

1560 INPUT"IS THIS AN 'AND' OR 'OH' B0RT"162« 

1580 IF G2»="AND' ThiEN 1640 

1600 IF S2«="0R" THEN 1680 

1620 GOTO 1560 

1640 P3-1 

1660 GOTO 1740 

1680 P3=2 

1700 REM***»«*****«Hnt******«»»**««»«»»««**»««»*«»«»*«*-*»«»««*«*»«««*««*««»»»»« Frognm Listing 3 conlintjes 
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Pmgmti Utllng 3 coittlnuma 

I72ffl REM - DETERMINE THE TYPE OF PRINTOUT 

17*0 PRINT'HHAT TVPE OF PRINTOUT DO YOU DESIRE '■ 

1768 PRINT' 1. ninlnsl printout for **ch m*tch." 

17ea PRINT* 2. Entir* r*cord for ««ch mitch, ' 

18M PRINT- 3. A M«lUr>9 Iftbcl for tech MAtcN.' 

lB2fl PRINT" 4. Print onlv »p*clfic ittmt r*'»u*sted.- 

1S40 INPUT PI 

IB&B IF Pl-1 OR Pl-2 OR Pl-3 THEN 2060 

IBSe IF PIO* THEN 17*0 

1«B INPUT-HOW MANY ITEMS DO YOU WANT PRINTED FOR EACH MATCH' !P2 

1929 FOR I-l TO P2 

!9*B PRINT-ENTER ITEM »-)lI-TO BE PRINTED'! 

19M INPUT P*(n 

1980 IF P*(I><1 OR P*<I)>NUri THEN 1940 

2000 NEXT I 

2020 REM««««««««^««««*«««*»*..»«...».»»»»».*»«»*»*«»»«»««»»««.««.....«...«...» 

20*0 REM - ARE ANY ITEMS SUMMED '' 

2060 INPUT-DO YOU WISH TO HAVE ANY ITEMS SUPIMED (Y OR N)-!G« 

2090 IF G»--Y- THEN 21*0 

2100 IF Gt»-N- THEN 2*00 

2120 GOTO 2060 

21*0 INPUT-HOW MANY ITEMS' IN 

2160 IF N>0 AND N<-7 THEN 2220 

21B0 PRINT'ONLY SEVEN ITEHS CAN B£ SUMMED - ENTER AGAIN' 

2200 GOTO 21*0 

2220 FOR 1-1 TO N 

22*0 INPUT-ENTER THE ITEM NUMBER- I8< I) 

2260 FOR J-l TO 7 

2280 IF 52CJ)*S(I) THEN 2360 

2300 NEXT J 

2320 PRINT- INVALID ITEM NUMBER FOR SUMMATION - ENTER AGAIN" 

23*0 GOTO 22*0 

2360 NEXT I 

2380 REM««»»«»«*»»»»#»»»»»»»»»»»*»»»»**»«««»»»»»«»»»»»»»»»»»»»«*«««#*»«*«#«»»» 

2*00 REM - ALPHABETIZE OR ORDER THE PRINTOUT ? 

2*20 INPUT-DO YOU WANT THE PRINTOUT TO BE ALPHABETIZED OR ORDERED (Y OR N)";OS 

24*0 IF 0«--Y' THEN 2300 

2*60 IF 0«-*N- THEN 2620 

2*80 GOTO 2*20 

2300 INPUT-ENTER ITEM THAT THE PRINTOUT WILL BE ALPHABETIZED OR ORDERED BY" 501 

2320 IF Ol>0 AND OK-NUM ThlEN 2620 

23*0 PRINT- INVALID ITEM NUMBER - TRY AGAIN' 

2360 GOTO 2300 

2380 REM««»#««""«»«*«*#«M»«#»«»«*»»**»».*«**».«.»»M«..«««««*»***«». .»...• 

2600 REM - START OF THE SEARCH LOOP 

2620 GOSue 3760 

26*0 PRINT- ••••• WIDTH MUST BE SET TO 110 CHARCTERS ON THE PRINTER ••••*■ 

2660 GOSUB 3760 

2660 INPUT-ALIGN PAPER TO THE TOP OF PAGE - THEN PRESS ENTER' iF9« 

2700 REM - PRINT HEADING 

2720 LPRIhfT CHH*(31>< "SORTER - 'iDATE* 

27*0 LPRINT- «*»••*******»»••»•••••••••••**»*»#»»»»»«*»••••»»»»- 

2760 LPRINT'FOR THE •-lG2«|-' SORT THE KEYS AREi' 

2780 FOR I-l TO X 

2800 LPRINT Lt<Y<I))l" « 'IKVID 

2820 NEXT I 

2B*B LPRINT CHR«(30) tLPRINT 

2860 R-1 

2B80 CLS 

2900 PRINT 0(10.1)1 -NOW READING RECORD NUMBER' 

2920 FOR I-l TO LOPtI) 

29*0 GET l.I 

2960 GET 2.1 

2980 PRINT a<10.27).I 

3000 GOSUB *7O0 

3020 FOR J-1 TO X 

3O*0 IF El<J)-0 THEN 3160' IF NOT PARTIAL SKIP OVER 

3060 IF P3-1 THEN 3120 'AND SORT 7 

3080 IF M1D*(F«(Y(J)).E1<J).E2(J) )-K*(J> THEN 32Ba'D0ES PARTIAL KEY MATCH -> 

3100 GOTO 32*0 

3120 IF MID«(F»(Y(J)).E1(J).E2(J) )<>Kt(J) THEN 3*40'PARTIAL KEY MOT MATCH '' 

31*0 GOTO 32*0 

3160 IF P3-1 THEN 3220 

3180 IF Ft(Y(J) )-K«(J) THEN 32B0'DOES KEY MATCH ? 

3200 GOTO 32*0 

3220 IF F»(Y(J))<>K»(J) THEN 34*0'D0ES KEY NOT MATCH ? 

32*0 NEXT J 

3260 IF P3-2 THEN 3*40 'OR SORT ' 

3280 IF Gt-'N' THEN 3320 'CAN SUMMING BE SKIPPED ' 

3300 GOSUe *1*0 'DO THE SUMMING 

3320 IF 0«->N- THEN 3*20 'CAN ALPHABETIZING BE SKIPPED 7 

3340 WKR}-! 

3360 W2«(R)-F*(0n 'SAVE DATA 

3380 R-R4-1 

3*00 G<iTO 3**0 

3*20 ON PI GOSUB 3BB0.*9*0i 6020.6120 

3**0 NEXT I 

3*60 IF 0»-'Y' THEN 3380 "IS LIST ORDERED ' 

3*S0 IF €«--N- THEN 33*0 'CAN SUMMING BE SKIPPED ? 

3500 GOSUB 43*0 

3320 CLOSE 1.2 

3340 STOP 

3360 REM**«»***«M««*«**«<«««*«**«»«*«»>»«*«*>«»«««ft»«»«»»**«*»««**<««««**» 

3380 REM - ORDER THE LIST FOUND 

36M PRINT a(10il)i"N0« ORDERING THE LIST OF RECORDS FOUND" 

3620 N2-R-1 

3640 D-lNT(N2/2) Program Listing 3 continiMs 
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36b0 
3680 
3700 

3 7 IB 
37't0 
3760 
37B0 
3S00 
3S20 
3640 
3860 

3Bee 

3900 
3928 
3940 

3960 
3980 

ti000 
4020 
4040 
4060 
40S0 
4100 

4 11-0 
4140 
4 160 
4180 
4200 
4220 
4240 
4 260 
4 2H0 
4300 
4 320 
4340 
4360 
4380 
4400 
4420 
4440 
4460 
4480 
4300 
4520 
4340 
4360 
4380 
4600 
4620 
4640 
4660 
4680 
4 700 
4720 
4740 
4760 
4780 
4600 
4820 
4840 
4860 
4680 
4900 
4920 
4940 
4960 
4980 
3000 
5020 
3040 
S06B 
5080 



IF D =0 THEN 3920 

L2-N2-D 

FOR J"! TO L2 

FOR I=J TO 1 STEP -D 

IF W2»(I*D)=«>W2»(I) THEN 3820 

SWAP W2»( I+D>.W2»(I) 

SWAP W1(H-D).W1 ( I ) 

NEXT J 

NEXT J 

D=INT(D/2) 

GOTO 3660 



REM! 



REM - PRINT OUT THE ORDERED RECORDS 
FOR I-l TO N2 
GET 1 •UKIl 

GET 2.W1 ( n 

GOSUE? 4680 

ON PI GOSUB ^ee0.4940i6a2B.6l20 

NEXT I 

IF G«"='N" THEN 4100 

GOSUB 4540 

CLOSE i ■ 2 

STOP 



REM - SUM FOR T-'TAl.", 

FOR J2>1 TO N 

T7«=0!NNII=.0HI 

N3=9 

IF S(J2)=76 THEN NS^^ 

IF &(J2>-B1 THEN N3=4 

IF S(J2>=81 THEN NNtt=l# 

FOR J3=l TO N3 

T1»=MID»<F*<S(J2) I .N3-H-J3i 1 > 

FOR J4-0 TO 9 

IF 53»(J4>=T1» THEN 4400 

NEXT J-i 

GOTO 4 4 40 

T7»=T7itNNlt«J4 

NNH=NN«»10 

NEXT J3 

T8» ( J2 ) =Te» ( J2 ) +T7» 

NEXT J2 

RETURN 

REM***»«***'K»«*»r*«««w*>**'«**M«««"<'<*<«««»»*>«»(>«****"»<»«'««-»«^«(i»*<(i(«»««»«« 

REM - PRINT OUT THE TOTALS 

LPRINT:LPRINT 

FOR I-l TO N 

LPRINT:LPRINT-SUM FOR •lL«(S(I)i;- = 'JTeSdJ 

NEXT I 

RETURN 

REM»*»*"»«**««*»««»*«»**»*««»***-«»»*»*** *♦♦•»**•♦•••»«•*•«#*«♦♦•«*•»♦«««« 

REM - BREAK DOWN RECORD INTO ITS PARTS 

T=l 

FOR J-1 TO 42 

F»(J)-MID«(A1«.T.L1 (J) ) 

T = T-^L1(J) 

NEXT J 

T=.I 

FOR J=43 TO NUM 

F«< J)-MID«<A2t.T.Ll (J) ) 

T-T*L1 (J) 

NEXT J 

RETURN 

REM*««-*««««»<«»»**«*«*«««««««*««*<«***««««»«***»**»*<«B*««ii«««««****«»»«« 

REM - PRINT ENTIRE TRANSMITTAL FORM 

LPRINT'61B10 " !F*(1) !SPACE*(9) !F«(2) )F«(3) !■ "IF*(A);' "1F*(5);° "tF«(6t 

GOSUB 3660 

LPRINT'DIST EMP It POSITION TITLE CL BG DP NAME" 

LPRINTiLPRINT Ft(7) ; ■ ■ tF»(B) ! ■ • !F«19> ; ' ' lF*( 10] 1 ' • iF»( 11) 

GOSUB 5660 

LPRINT-SOCIAL S. ■ ADDRESS CITY-STATE ZIP PHONE' 

LPRINTILPRINT F»( 121 i- •iF«{13»;* '!F«(14)i" -iFSdS)!' "iFtllAK- ■)F«(17) 



• lF»( 18) 



■ IF»(19) 



»(20l !' ■ !F*(21) ;• 

■ ;F«(22) 
5 100 GOSUB 5660 

5120 LPRINT-EMP.DATE TER. DATE RE RE. DATE BIR.DATE YR, B C2 £T MS SX BANK ACC.#" 
5140 LPRINTILPRINT F« ( 23 ) i " -iF*(24)!" ■;F«(23I:" •lF»t26H" 'lF»(27)f ■lF»(28)i" ■lF«t29)!' 

(30) (• ■ ;F«(31 ) ;■ -1 

F«(32>;' •1F»133)!" "iFSfJAl;- -;FS(35)!- 'tF*(36) 

5160 G0SU8 3660 

5180 LPRINT-EXPER. CERTIFICATES 06 HR IN MJ MJ MN MN MN ASMT L" 

52O0 LPRINTiLPRINT F»(37) ;■ •JFK38)!- ■!F«(39)!- ■;F*(40):- ■;F*(4l)I- ■!F«{42);' 



IF 



!F»(43)I' -IFtf**)!" "iFtC 



5) 

5220 GOSUB 5660 

5240 LPRlNTPROe.EX. TB TEST LAST IN. NEXT IN. DAYS H/DV TY EX. DATE TOTAL" 

5260 LPRINTiLPRINT F» ! 46) ;SPACE»( 15 ) !F«(47 ) ! ° "iF»(4S)!" "IF*(49)!" -iFffSB)!' 

Ft(53) ! ■ ■ !F»t54) 

5280 GOSOe 5660 

5300 LPRINT-PAVS FED.EXM. ST. EXM. LOC.EXM. R.IDH PICA AP STMT IN. SUB.' 

5320 LPRINTiLPRINT SPACE»(401f RES i ' ! F» ( 75 ) ! " CO-CUR i"! F» ( 76 H " LONG!"iF*(Bl) 

5340 LPRINTiLPRINT F»(55);' ■!F»(56);- ■1F«(371;- ■!F«(58)|- ■!F*(59)I" ■IF»(77> 

5360 GOSUB 5660 

53B0 LPRINT-S/L CODE RATE CONTRACT ACCOUNT LIFE" 

5400 LPRINTiLPRINT F»(60);" ■■;F»(61)f ■tF$(62)!" ";F«(63>i" ■!F»(64)t- -!F»(78) 



iF«(5n !' 



!F»(52) !' 
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INTRODUCING THE MEMORY BOX 

MEMORY THAT NEVER NEEDS PROTECTION 

Plugs direcllv into ihe CPU ur expansion Int^ifacc. 

Includes flE own regulated power supply and ribbon cable. 

1024 bylES of ram In an unusrd bifb on the memoiy map 

(.1000-33FF HEX), 

Sdlvps memory allocation problems when using monitor 

programs and utility support routines. 

Programs stay in the memory box even wheri the CPU Is 

turned off. 

For Model I Level II and ail DOS systems (4. 16. 32. 48K) 
Price S49.95 

Two utility software programs written lor the Memory Box 
are: 

1. Micmon-A powerful machine language monitor (avat)- 
able at a keystroke ttilhout diiturbtng matn progrBms)- 
Prtc« $19.95 

2. U3000-A utility including cassette level meter piogram. 
adjustable keyboard debounce. screen print driver, P'S* 
numbering, smart line termination, and more (all Bvatlabie 
at a keystroke). 

Price $12.95 

Special offer complete package $69.95 



<> 



< 



DISPLAYED VIDEO IS DRIVING 
DOWN PRICES ON DISKS 

DISPLAYED VIDEO is now offering TRS-80' MODEL III with disk drives, one of tlu- 
inost reliable disk drive systems on the market, for Incredibly low prices!! 

MODEL III with 48K ram. dual 80 track double- density disk drives, complete, 

PLUG IT IN AND GO $2,275 

MODEL III with 48K ram. dual 40 track double-density disk drives, complete, 

PLUG IT IN AND GO $1,875 

Disk Drives: Includes case and power supply 

40 track disk drive $289 

80 track disk drive $395 

80/80 track disk drive $520 

Disk Drives: Not including case and power supply 

40 track (bare) disk drive $250 

80 track (bare) disk drive $345 

H 80/80 track (bare) disk drive $450 

Drive Cases and Power Supplies: 

5V4 inch single drive unit and power supply $ 80 

5'/^ Inch dual drive unit and power supply $110 

8 inch single drive unit and power supply $140 

16K RAM Memory Chip (200 NS) . . $1.95 each 

TRS-80' MODEL III 1 6K *. $839 

MODEL III Internal Drive Kit: Includes controller board, dual drive mounting bracket, 
dual power supply, all hardware, cables and connectors $410 




THE 2K HIDEAWAY EPROM BOARD 

Accepts 2716 compatible memory chips (not included). 

Includes its own power supply and connector. 

Install a pre-programed eptom or use a ram chip in 

combination with thepoweHul monitorand utility progiams 

sold above "Micmon or "USOOO" (not Included) 

2K Hideaway $49 9S 



THE EPROM PROGftAMER 

Attaches to cassette interface on Model 1 or III. 

Programs 5 volt IK. 2K. and 4K epronts. 

Includes driver program, instructions, ruble, and power 

supply. 

Progiammer $69.95 



U.V. 



"0- 



Eprom EraseT Lamp $49.95 

2716EpromChlp $ 8.95 

2K Ram Chip $29.95 




IMMEDIATE DELIVERY 

90 Days Parts and Labor Warranty 
Dealer inquiries invited 



Displayed Video 

7S3B Jackson Road 

Ann Arbor, Michigan 48103 

(313)426-5086 



'Ofo 




.^ 30 



To Order: Cal 



I ifad»mark ol th 



(313) 426-5086 or (313) 482-4424 or write DISPLAYED VIDEO, 
7538 Jackson Road, Ann Arbor, Michigan 48103 

Tandy CoipotsMon Prices subjett to change iimhout imjI 



< 




-.rilH 



yx. 



DISPLAYED VIDEO'S CfcRTIHED DATA CASSETTES 

Made of tap grade tape lonnulated by Agla-Gevaeri of 
Germany. 

Cases are of superior grade ftvc-sccew construction, 
(iuaranteed 100% error-free or your money back- 
length C-IO C-20 
12 pack .68 .88 ea. 
24 pack .58 -78 ca. 
Norelco Style hard plaitic cassette cases .21 ca. 
Special otter with every oider of 24 cassettes: 
a Pilot Razor Point pen will be included. 
DISKETTES (BOX OF 10) 
Verbatim certified diskettes 
Guaranteed 100% error-tree ot your money baclc 
5V^ inchMDS25-01 
10 pack $26 90 
1 IX) pack $25.90 
Add $1 .50 lor shipping & handling To Order: Send check 
npy order or call (31 3) 4Z6-5086 or (313) 482-4424. . 



'See L isl ot Advertisers on page 402 
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54:-0 


50SUB 5660 




54*0 


LPRINT'S/L CODE RATE CONTRACT 


ACCOUNT DENTAL- 


5AbB 


LPRINTiLPRINT F»(65)l- ■iF*{66);" 


■tF»(67)!' ■!F»(6e)f ■!F»i69)|- "IF»[79) 


^tsa 


GOSUB 5660 




z^aia 


LPRINT*S/L CODE HATE CONTRACT 


ACCOUNT VISION" 


5520 


LPRINTiLPRINT F«(7a)i" ■'!F«(71);' 


*tF»{721i- ■!Ft(731!- ■IF»{74)!- ■)Ft(e0) 


5540 


GOSUB 5660 




5560 


LPRINT-S/L CODE RATE CONTRACT 


ACCOUNT HEALTH" 


5580 


LPRINTiLPRINTsLPRINT 




5&O0 
5620 
5640 


RETURN 




REM - DRAW LINES OF STARS AND DASHES 




5660 


FOR D7=i TO 70 




56BB 


LPRINT'*" I 


, 


5780 


NEXT D7 




5720 


LPHINT 




5740 


RETURN 




3760 


FOR D7-1 TO 78 




57B0 


PRINT"-'! 




5800 


NEXT D7 




5620 


PRINT 




5840 


RETURN 




5860 


REM»»»»»««»»»»»»»«»««»»*»»»»» »»**•••••**•*••■•*** «•»♦•••♦•««••#••••»•••••• 1 


5880 


REM - PRINT OUT MINIMAL DATA 




5900 


LPRINT FKlll' '?F«(:^)1- --.Ffl^j:" " 


;F»(4)I" •:F«(6)!" ■1F«(45)5- "JFtCSB)!" "1F»!59) 


5920 


LPRINT TAB(69) !F«(63) !■ "!F«(fc4' 




5940 


LPRINT TA8<69) iF«(68) !■ ■;F»C69) 




5960 


LPRINT TAB(69) 1F«(73> !- ■!F«(74> 




5980 


RETURN 




6000 


REM««» ••»•*••••••••••*•••••••••••♦»• 




6020 


REM - PRINT A MAILING LABEL 




6040 


LPRINT F«(6)ILPRINT FtfBXLPRINT F«[9)!- "iFfilO) | 


6060 


LPRINT: LPRINTiLPRINT 




60B0 


RETURN 





Program Listing 4 



100 REH - THATRIX - Thii prosrcm r*«d£ tfi* «ntire p^rstriritl fil* and cr*«t*! a 

120 REM Mtnx th«t r *wt *stuti th» number of t*acherE of. each st«p 

.140 REM arid 1 *ve 1 <</ th« <al &r v E.ch«du1 * for the next v^ar. TNe 

168 REM rrtatri.>i is stored in a file tc> be used br & pro9rani to do 

168 REM fal«ry schedule modeling. 

208 REM Written bv Th«r<.n Ui«r*ng« durinfl March of 1988. 

228 CLEAR 2808 

248 DIM A(55.5).S«(55>.Y(55)<Z<50><El(50>iE2(5a}.K«[50)iB(55i5> 

268 INPUT"ENTER THE FILE NAME FOR THE MATRIX' IFIL* 

280 OPEN -D", 1. -PI", 254 

300 FIELD 1.254 AS Al« 

320 OPEN •D".2i "P2".253 

340 FIELD 2>253 AS A2« 

360 OPEN >D"<3iFILt<28 

380 FIELD 3>4 AS T«(l).4 AS T«(2)t4 AS T«(3}t4 AS T«<4)>4 AS T«(5> 

400 OPEN ■D".4.FIL»+"L" 128 

420 FIELD 4(4 AS T2«(Ui4 AS T2«(2>i4 AS T2«(3>)4 AS T2«[4)i4 AS T2*(5) 

440 FOR 1=1 TO 52 

468 READ Y < I ) i S« (I ) 

488 DATA liA. 1.5%B.2,C.2.5.D.3.E.3.5.Fi4.6,4.5iH.5. 1.5.5. J.6.K,6.5.L.7.M 

588 DATA 7.5iN)8iOi8.5<Pi?iO>9.5iR>10iS)18.5<T.lliU.11.5.V.12.W. 12.5.x 

528 DATA I3.Y, 14.Z.15.a, 16.b. 17.C. IB.d. 19.e.20.fi21.9.22.h.23. j.24.j,25 

548 DATA k • 26. ) • 27>ffl. 28. n< 29> o< 30< p • 31 • i> 32i r. 33. s. 34. t . 35. u< 36. v . 37. wi38 

568 DATA >;)39iYi40H 

580 NEXT I 

688 FOR 1-0 TO 9 ■ 

628 READ Ltd) 

640 DATAOi I>2t3.4,5>6t7.8t9 

660 NEXT I 

680 INPUT"ENTER CLASS HANTED FOR THE SEARCH" ICL» 

700 INPUT-IS THIS AN 'AND' OR 'OR' SORT"!AN» 

720 IF AN«="AND" OR AN»-"OR' THEN 760 

740 GOTO 788 

760 INPUT"HOW MANY KEYS FOR THE ACCOUNT CODES" INK 

780 PRINT-ENTER ITEM NUMBER. POSITICW OF 1ST CHARACTER) NUMBER OF CHARACTERS" 

800 PRINT'AND THE EXACT KEY FOR EACH ACCOUNT NWIBER DESIRED' 

820 FOR 1=1 TO NK 

648 K»(I )-*.-». ■ 

868 INPUT ZCD.EK I>iE2< I).K«<I ) 

688 IF K»(I)<>".*.- THEN 948 

988 PRINT-BAD ENTRY - TRY AGAIN' 

920 GOTO 860 

940 IF Z(n-59 OR Z<n-64 OR ZtI)-69 OR Zll)-74 THEN 980 

968 GOTO 900 

980 NEXT I 

1000 REM*»»*«****«**«***«««««««««*<««<*»**«**»**««»»»»»»«>«»»*>»**<«*«<«** 
1020 REM - START OF MAIN SEARCH LOOP 
1048 CUS 
1060 PRINT 3(10. n. "NOW READING RECORD NUMBER" 

laaa for r-i to lof( d 

1100 GET l.RiGET 2. R 

1128 PRINT S( 10.27). R 

1148 IF MID«(A1«.26»1)<>CL» THEN 1760 

1168 FOR 1=1 TO NK 

1180 Z2=(Z(I )-54)/5 

1200 Z3=77+(45*tZ2-l))*El(n t>tognm Usiing 4 contfniM 
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Word Processing? You need a 

SPELLING CHECKER 



_ Thi^ 15 an e-^awle of a text benq checked by 

HEXSTOirThe t«rt ktoII; i» the screen » it IS checKed. Wien 
m ttrv is detected, tiv have Uirpe dmcaSi -■-"■■»S*;v- 

1) WPlflre tfw incorrect word, T>» r 
is DKtflHTLY ff-CHEOSD for cwrKtnHs, U«n A 
XtA. - 

21 T1« word is nrrtct, iMW it as it is. c 
3) Leave the wril at it it, W iell ^Sf ELL to 
lE»w this Mord (gr future wfefWKe, with just or* Ve^slroie. 



U(R) IN EMOt! . 
aWTlNUATIQN ! 1 



HexepeLL 

^ncuKv 

zaps those j w oeky typos 

HEXSPELL shows you the errors right where it finds them, 
then instantly checks your corrections to make sure they ARE 
correct! When HEXSPELL is finished the corrected docu- 
ment is ready for printing. HEXSPELL comes with a 20,000 
word list, with room tor 8000 more! Just one keystroke 
teaches HEXSPELL a new word. You can even clear the 
memory and teach HEXSPELL a complete new language. 
Programs, vfordllst t msnual t69Us Manual only S12. ^ff^ ^^k 

R»quirBS «SK TRS« Mod I Willi 2 Orjie » TRSDOS LI ■ ' ^^^B 

T*tl«0 ■gainal ScripsTl & EMctfic Ptnci. sl^ouM) *oe1( Miih moit urord processo's 



PO. Box 397, Station A 
VwKOuver, ac Canada V6C 2N2 
lislephone (604) 662 7646 



A^HeXAGON 



!!NOW AVAILABLE!! 

^ *v I NDEX 

^^tBks\c) Sequential 
Access 
Method 



.CP** 



.t*e 



* Get and Put Records to Disk File by "KEY" 

* Read File in Key Sequence Without Sorting 

* Delate Records Without Recopying File 

* Add Records to Disk Files in Any Sequence 

* Variable Key Length From 1 to 50 Characters 

* Machine Language or Basic Subroutines. 

BUSINESS APPLICATION ADVANTAGES 

- Improved Disk Ihilizatkxi 

- Easier Program Development 

- Improved Operating Characteristics 

- Reduce or Biminale Sorting 

- Improved Perfotniance 



ISAM SUBROUTINES 
ISAM UTILITIES 



Documentation 
On Diskelte S90 00 



NEW! MACHINE LANGUAGE ^ BASIC5UBS — $140 

— PLUS — Free Mailing List Sample Application 

Add 6% Safes Tax for California Orders 

TRS-BO MODEL I. II, A III and CPM SOFTWARE FROM 

Johnson Associates -or- Tslaphone omer Um 
P.O. Box 1402 For Bwik Card Sales 

Rsddfng, CA 96001 (91 6) 221-0740 

WWTE FOR F1CE CATALOG 



./■as 



/f 



$ LYNN'S A/R SYSTEM $ 



12 Intergrated Account Receivable Programs 
Tested In Service For Over 2 Years 

User's Coments: 

e increased cash flow 
e saved over 50 hours a month in secretarial hours 
• almost completely eliminated billing errors 

LYNN'S A/R SYSTEM WILL 



% 



print invoices • store 1,1CX)open invoices a ted you your 
account's receivable total, amount of total invoices out- 
standing, average amount of total invoice's e tell you at any 
time how many invoices an individual account has open, the 
total amount owed, the average per invoice, the invoice date, 
and the invoice amount ■ total sates on account for given 
month, number of invoices sent, average sale per invoice 
• how much an account purchased during month, how many 



invoices were sent, average invoice for month • tell you 
what percent of sates an account is to total sales by month 

• tell you what percent of accounts receivable an account is 

• print labels for your accounts • print statements at end of 
month and/or beginnir>g of month and/or any time during 
month, (either individual or all accounts)* print alphabetical 
hardcopy of accounts and account numbers e print all items 
sold for the month a AND MUCH MOREII • 

49^^ + S2.00 Shipping & Handling 

lllmots ReiKtents Add S% Sales Tan 



Only 



Send $10.00 For Printouts 

And Documentation 

Credit Given On Order 



\= 



LYNN COMPUTER SERVICE 

6831 W. 157th St. 

Tinley Park, II 60477 

(312)429-1915 

Send state sales tax rate, company name - address - phone #, TRS-80 model #, number of drives, 
and whether you will be using NEWDOS or NEWDOS80 for model I, or TRSDOS/NEWDOS80 for 
model III. 

Equipment Needed: ask model l or ill, lineprinter, 2 
disk drives. Model I users wilt need NEWDOS or NEWDOS 
80 operating system by APPARAT, INC. 



mSSO arKJ TRSDOS art Irademarki o( TANDY COBP 

NEWDOS and NEWD0S80 are registered irademarks of APPARAT INC 



•'SffS List ot AOvartisers on page 402 



Program conlmue^ 



122B IF AN»=-AND- THEN 1280 

I2Aa IF MIDt(A2».Z3,Ei(I ) )-K»(I) THEN 1 3'i0 

1260 GOTO 1300 

1280 IF MID»(A2t,Z3,E2( DIOKKI) THEN 1760 

1300 NEXT I 

1320 IF AN*=-OR' THEN 1760 

13*10 FOR 1 = 1 TO 52 

1360 IF S»tI)<>mD»(A2».57, 1 > THEN I7'iO 

1380 FOR J«l TO 5 

1A0B IF L»CJ).:>nlD»(A2»t59. 1 ) THEN 1720 

1420 T7II = 0:NN« = .01« 

14^0 FOR K=5 TO 1 STEP -1 

1A60 H»=MIO«( AI«.249*K. 1 ) 

IJtBB FOR L=0 TO 9 

15B0 IF L»(L)=H« THEN 15i0 

1520 NEXT L 

1540 GOTO 1600 

1560 T7«''T7« + NN««L 

1580 NNIt-NNtt*!^ 

1600 NEXT K 

1620 M=T7»/B 

16't0 A( I 1 J l=A( 1 1 J )+M 

1660 IF 1-27 THEN I76E 

168B e( I. J)=B( 1. J)*M 

1700 GOTO 1760 

1720 NEXT J 

1740 NEXT 1 

1760 NEXT R 

17B0 REM»»*»*»» ••*■*•♦♦••*♦*•*•••♦••••»»••••»»*•»•#•••»•»•• «••«»♦«««♦♦«•«•♦♦»•*» 

1800 REM ■ WRITE MATRIX TO DISC 

1B20 FOR R=l TO 52 

18't0 FOR 1 = 1 TO 5 

1860 LSET T«( I )=MKSS( A(Ri I ) ) 

1880 LSET r2«( 1 )-MKS«(B(Ht I) ) 

1900 NEXT 1 

1920 PUT 3.R 

1940 PUT 'ttR 

1960 NEXT R 

1980 REM - PRINT OUT THE MATRIX 

2000 L PR INT CHR»(31 ) !-EMPLOYEE DI 5TR1 PUT I ON MATRI X - "^FlLt!" ■ ! DATE* ? CHRS ( 30 ) : LPRI NT 

2020 LPRINT TAe< 10) VPA" ^ TAB ( 20 ) •^EA + 2e- ; TAB! 30) ; ' MA" ; TAB I 40) !-MA<-30- i TAB (50) ;-MA-t-60" JLPRINT 

2040 J=13 

2060 FOR R=52 TO 1 STEP -1 

2080 IF R<26 THEN 2140 

2100 LPRINT R-12!"YRS."! 

2120 GOTO 2180 

2140 LPRINT J!-YRS. ■ ; 

2160 J=J-.5 

2180 GET 3tR 

2200 FOR 1=1 TO 3 

2220 LPRINT TAB( 1»10) ! CVS(T»( I ! ) ; 

2240 NEXT 1 

2260 LPRINT 

2280 NEXT R 

2300 LPRINTiLPRlNT CHR«(31 ) 1 "LONGEVITY MATRl X" ; CHR« (30) SLPRINT 

2320 FOR R=52 TO 27 STEP -1 

2340 LPRINT R-12!'YRS.-! 

2360 GET 4,R 

23B0 FOR 1=1 TO 5 

2400 LPRINT TAe( I»101 |CVS(T2»(1 ) ) ! 

2420 NEXT 1 

2440 LPRINT 

2460 NEXT R 

2480 REM»»»**»»»»*END OF PROGRAM****-****-** 





Program Listing 5 


100 


REM - TEACHER - This pr(.9ran> .J-i-t; 74lar. itriidule fticdelin9 for ttacfiers.. 


120 


"Ef^ Ti>t»l i;os*s ire cC'OiPijt^-l • or var lOur tncr*a!6; in teacher 


140 


REM saUr itr- . 


160 


REM Writtcf t-.' Th*ror> Wi^rrrf.Mi durinq n^r -zti 1980. 


1B0 


DIM M( 13.5) tS< 55.5). N( 55.5). N2f5!i.'ii 


200 


INPUT'ENTER THE FILE NAME OF THt MATISiX > OU WISH TO USfiFlL* 


220 


OPEN "DV3.FILS.20 


240 


FIELD 3.4 AS T«(l),4 AS T»(21.4 Ab 1 » ■, :J 1 ! 4 AB TS14),4 AS TtCi) 


260 


OPEN ■D-.4.FIL»-^"L- .20 


280 


FIELD 4,4 AS 72S(I),4 AS T2»(l>.4 AS T:»(3),i AS T2t(4)i4 AS T2t(5) 


300 


LPRINT 


320 


REM********************* •**«»(»* *t»4«t*»t>«if*«ift>»(»»«»««««a«»««K«a(4(«(,» 


340 


REM - READ THE STEP MULTIPLIERS 


360 


FOR 1=13 TO 1 STEP -1 


380 


FOR J=l TO 5 


400 


READ M(I. J) 


420 


DATA 163. 171. 179. 162. 184. 163. 164. 171 . 173. 175. 155. 157i 164. 166. 168 


440 


DATA 148. 150. 157, 159, 161. 141. 143. 150. 152. 154, 135. 137. 143, 145. 147 


460 


DATA 129. 131. 136, 138, 140, 123. 125, 130. 13;;, 134, 11 B, 120. 124, 126. 1 28 


480 


DATA 113. 115. 119. 121. 123. 108. 110. 114. I 16.118. 104. 106.110. 112. 114 


300 


DATA 100, 102. 106i 10B. 110 


520 


NEXT J 


540 


NEXT I 


560 


REM*«*»»«**»*»#**»*******»****»«* •«•*»•»»•■»»•••♦«♦•,« »,in.,,t,,,,»»,,nnn,„ 


580 


REM - COMPUTE NEW SALARY SCHEDULE FOR THE INCREASE Program Usting 5 COMInMS 
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Frogrvm Luting 5 conlinuMf 

600 PRINT-ENTER CURRENT BASE AND PERCENT INCREASE" 

62a PRINT'EKAMPLE: 12777i7.5- 

6Ae INPUT BiK 

660 PHINT-IF PROJECTIONS ARE TO BE ON NEXT YEARS MATRIX ENTER A l< IF ON THIS" 

680 PRINT-YEARS ENTER A B [ZERO)"! 

7B0 INPUT %•> 

720 IF )(9 = OR X9=I THEN 7itBELSE fcfaB 

740 LPRINT CHB»(3I )! -SALARY SCHEDULE FOR A " i K ; " 7. INCREASE" 

760 LPRINT-ON A-5BI-D0LLAR BASE USING MATRIX • iFIL» ! CHR« ( 30 ) ; LPRl NT 

780 REfl - CALCULATE NEW BASE 

800 B2=INT(B»( l*K/100)+.5) 

820 LPRINT TABf 16) !-AB" (TAB (30) i "AB'-la" iTABCf.) i "MA" i TAB (58) i'MA+^B- i TAB (72) ;'MA»faB- 

840 GOSUB 2320 

860 FOR 1-40 TO 14 STEP -1 

BBS LPRINT I S-YRS. " i 

900 FOR J=l TO 5 

920 S( 1 + 12. J) = INT!B2*(M(13. J)/100)t.5J-*INT( ( I- 10)/5)»300 

940 IF 1040 THEN 9B0 

960 S( 1*12. J)"S(I*12. J)-300 

9Ba LPRINT TAB114»J + 1);S(I + 12.JH 

1000 NEXT J 

1020 LPRINT 

1040 NEXT I 

1060 N=25 

1060 FOR 1-13 TO 1 STEP -.5 

1100 LPRINT I ;-YHS.- ! 

1120 FOR J- I TO 5 

1140 Z^INTII) 

1160 IF I-lNTd) THEN 1260 

1180 X-(M<Z.J)*f1(Z*l. J> )/2 

1200 5(Ni J)-INT<B2«(X/100)*.5) 

1220 LPRINT tab; I4»J-4) i ' -;S(N.J)! 

1240 GOTO 1300 

1260 S(N. J) = INT(B2*(ri(Z. J)/100)*.5> 

12B0 LPRINT TAe( 14*J-4)}n(Zi J)ISIN. J) J 

1200 NEXT J 

1320 LPRINT 

1340 N=N'l 

1360 NEXT I 

1380 LPRlNTiLPRINTiLPRINT 

1400 REM»*«««*««««««««*««*«««»«*«*««««»««a«««»«*»*»»>«it ««••••**«««»•»••«««•««•« 

1420 REM - READ MATRIX SHOWING EMPLOYEE DISTRIBUTION 

1440 FOR R-l TO 52 

1460 GET 3<R 

1480 GET 4>R 

1300 FOR 1=1 TO 5 

1520 N(R. I)=CVS(T«(I) ) 

1540 N2(Hi n-CVS(T2«(I) ) 

1560 NEXT I 

1580 NEXT R 

1600 REM - COMPUTE PRODUCT MATRIX 

1620 C2=0:l=13 

1640 LPRINT CHRK31 ) 1 -EMPLOYEE SALARY DISTRIBUTION" 

1642 LPRINT -WITH A-!X9i-YEAH STEP INCREASE TO CURRENT FILE" iCHR»( 30) :LPRINT 

1660 GOSUB 2420 

1680 FOR R-52 TO 1 STEP -1 

1700 IF R<26 THEN 1760 

1720 LPRINT R-12;-YRS.-! 

1740 GOTO 1800 

1760 LPRINT I i-VRS." ) 

17B0 1=1-. 5 

1800 Cl'^O 

1B2B FOR J-1 TO 5 

1840 T9=S(R. J)«N(R-X9i J) 

1860 LPRINT TAB(12»J) iT9! 

1880 C1-C14'T9 

1900 NEXT J 

1920 LPRINT TAB(73) I-/- ICI 

1940 C2-C2*C1 

1960 NEXT R 

1980 LPRINTiLPRINT-TOTAL OF ALL TEACHEFi SiALARIES =-;C2:LPRINT 

2080 LPRINT CHR«(31) ! "LONGEVITY DISTRIBUT ION" i CHR» ( 30) SLPHINT 

2020 GOSUB 2420 

2040 C2=0 

2060 FOR R-52 TO 26 STEP -1 

2080 LPRINT R-12i"YRS.'; 

2100 Cl^O 

2120 FOR J=l TO 5 

2140 T9=N2(R-X9. J)»(INT( ( R-22 ) /5 ) 'SOO) 

2160 LPRINT TAB( 12»J) iT9! 

21B0 C1-C1*T9 

2200 NEXT J 

2220 LPRINT TAB( 73* i ■ / ■ iCl 

2240 C2-C2+C1 

2260 NEXT R 

2280 LPRIMTtLPRINT-TOTAL OF ALL LONGEVITY =-;C2 

2380 STOP 

2320 FOR 1 1-1 TO 90 

2340 LPRINT-*- ; 

2360 NEXT II 

2380 LPRINT 

240O RETURN 

2420 LPRINT TAB! 13) : ■ AB" 5 TAB { 25 ) «'AB*20' I TAB (37) S'MA" tTA&(49) : -MA*30" !TAB<61 ) I 

2440 LPRINT -MA*-60- tTAB(75) ! "TOTAL- 

2460 GOSUB 2320 

2490 RETURN 

2300 REM»»»»»«»»»*END OF PROGRAM«*«»«»»«»» 
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BUSINESS 



Computerize your rental records before the first of the month. 



The Tenant Tracker 



Q0org0 Kwaacha 
8007 Mahogany Drive 
Charlotte, NC 28212 



Twuni 


AddfMa 


Month 


Rwri 


Data Rag. 


AffliRsc. 


Itac.) 


Coda 


Smith Jonathan 


1800 Cant uryAv 


01 -ao 


250.00 


01-02-80 


250.00 


1234 


T 


Smith Jonathan 


leOOCanturyAv 


12-M 


265.00 


1Z-04-80 


265.00 


1400 


T 


Smith Jonathan 


1 800 Century Av 


11-80 


265.00 


11-14-80 


275.00 


1399 


L 


Smith Jonathan 


ieoOC«nturyAv 


02-80 


250.00 


02-01-80 


250 00 


1245 


T 


Smtth Jonathan 


1B00C«nluryAv 


03-80 


250.00 


03-03-80 


250.00 


1250 


T 


Smith Jonathan 


IBOOCsnturyAv 


05-80 


250 00 


06-04-80 


250.00 


1300 


T 


Smith Jonathan 


1600CanturyAv 


04-80 


250 00 


04-01-80 


250.00 


1405 


T 


Smith Jonathan 


ISDOCanturyAv 


06-80 


265 00 


06-11-80 


265.00 


1470 


N 


Smith Jonathan 


IBOOCanturyAv 


07-80 


265 00 


07-02-80 


265.00 


1500 


T 


Smith Jonathan 


1800CanturyAv 


10-80 


265.00 


10-01-80 


265-00 


1801 


T 


Smith Jonathan 


leOOCanturyAv 


09-80 


265-00 


09-02-80 


265.00 


1659 


T 


Smith Jonathan 


ISOOCsnturyAv 


08-80 


265-00 


08-15-80 


275.00 
S3 125 00 


1545 


LB 




Fig. 1 


Rental Record Input File Dump. 







If you need a method of computerizing 
records for rental property that you may 
be managing, I have written the following 
program for a local real estate manage- 
ment firm. The program Is designed to 
keep a record of every rental unit's 
monthly rent payments for one year. Ad- 
mittedly, It Is a simple program that can be 
altered to suit your particular needs. This 
modified version will run on a TRS-80, 
Level II 16K with cassette. 

How the Program Works 

After CLOADIng and typing Run, the pro- 
gram prints out a heading on the screen 
and, after a brief delay, will display a menu 
of options. Option 1 allows you to enter In- 
itial rental information. The program 
prompts for the following fields: 

• Tenant name— Enter last name first, 
then first name (without commas). 

• Address— Enter as you wish without 
commas, but be consistent in format 
or you may have difficulty retrieving 
data, in my sample run I used "#### 
street name." 

• Rental month— Enter two digits for 
the months, dash, two digits for the 
year (MM-YY). 

• Date payment received— This, of 
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Month 

1-80 

2-80 

3-80 

4-80 

5-80 

6-80 

7-80 

8-80 

9-80 

10-80 

11-80 

12-80 



Tanant Nama 
Smith Jonathan 
Smith Jonathan 

Smith Jonathan 
Smith Jonathan 
Smith Jonathan 
Smith Jonathan 
Smilh Jonathan 
Smith Jonathan 
Smith Jonathan 
Smith Jonathan 
Smith Jonathan 
Smith Jonathan 



Rant 

$250.00 

S250.00 

S250.00 
S250.00 
1250.00 
$265.00 
S265.00 
$265 00 
S265O0 
$265.00 
S265.00 
$265.00 



Data Rac. 
Ot -02-80 
02-01-80 
03-03-80 

04-01-80 
05-04-80 
06-11-80 
07-02-80 
08-15-80 
09-02-80 
10-01-80 
11-14-80 
12-04-80 



Ami. Rac. 
$250.00 
S2SO0O 
$250-00 
$250.00 
S250.00 
S265.00 
$265.00 
$275.00 
S265.00 
S265 00 
$275 00 
$265.00 

$3125.00 



Fig. 2. Rental Record History for 1980 



Rac.< 

1234 

1245 

1250 
1405 
1300 
1470 
1500 
1645 
1659 
1801 
1399 
1400 



Coda 

T 

T 

T 

T 

T 

N 

T 

LB 

T 

T 

L 

T 



Varlat)(a 


Program Function 


M$( ).L$< ) 


Rental Month (MM-YY) 


D$( ).0S( ) 


Date payment was received (MM-DD-YY) 


A!( ),P!( ) 


Rental amount ($$$.00) 


R( ).T{ ) 


Receipt number or other control number 


A$( ),J$( ) 


Address of rental property (no commas) 


NS( ).K$( ) 


Nante ot tenant (no commas) 


B!( ).S![ ) 


Amount received ($$$.00) 


BB.SS 


Totaled amount received 


CS< ).UV ) 


Code to describe status of payment 




Codes used in this program: 




T- payment In time 




L - late paymt with late charge 




N - late paymt w/o late chge 




B - bounced check 




- deposit lorfelture 




O - other 




Table 1. Variable Listing 



"The program is designed to keep a record 
of every rentai unit's monthiy rent payments for one year." 



course, Is very Important to any real 
estate management firm. Use format 
"MM-DD-YY." 

• Rental amount— Enter rent due as a 
dollar amount (ex:200.00). 

• Amount received— Enter same as 
above. 

• Receipt number— or some other con- 
trol number, If one Is used by your 
firm. 

• Code— Refer to Table 1 for list of 
codes used In the sample run. You 
may wish to add your own. 

Type Enter after each field entry and 
End In the tenant name field to close the 
file and display the option menu. 

Option 2 allows you to change data in a 
file In case an error exists. The program 
prompts for the tenant name and rental 
month. Only the first five characters of the 
name need be entered. However, the entire 
rental month field (MM-YY) must be 
entered exactly. When a match occurs In 
the file, the program will prompt each field 
once again for the correct data. You need 
only enter data In the field that needs cor- 
recting. In atl other fields, type Enter to 
maintain already existing data. After- 
wards, the program will ask whether you 
want to enter another correction; indicate 
either yes or no. The Option menu will then 
be displayed. 

Option 3 allows you to Inspect the entire 
file In order of entry. The program will 
display two months of data per screen. 
Type Enter to continue scrolling. 

Option 4 also permits you to display the 
file except you must specify the tenant's 
name. Once again, only five characters of 
the name are needed. 

In Option 5 by specifying the address the 
file is displayed. You must enter at least 
nine characters of the address to obtain a 
match. In my sample run I used "1800 
Cent." 

Option 6 enables you to save your data 
on cassette tape. Type 6, press record-play 
on your recorder and hit Enter. The pro- 
gram will prompt you for a menu when It 
has completed saving the data on tape. 

Option 7 allows you to input data from 
cassette. Type 7, press play on your 
recorder and hit Enter. The program will 
prompt you for a menu when It has com- 
pleted loading. 

In Option 6 typing 8 will display the 
sorting options available. 

In Option 9 typing 9 will terminate the 
program. It also erases all data that you 
may have In memory, so be sure to save it 
on tape before ending the program. 

Output Reports and Sorting Options 

Requesting Option 8 in the above section 
will display another menu of sorting op- 
tions. It needs to be pointed out that Op- 



tions 2,4,5 and 6 are not Included In this 
program listing. Output reports In the area 
of real estate management depend on 
each firm's needs and must be written as 
such. I have Included two output reports as 
examples. For example: 

■ Option 1 will print a hard copy report 
of the entire file. See Fig. 1 for my 
sample run. This form of output 
report Is not very practical. It Is strict- 
ly designed as a control report. 



Option 3 will print a hard copy annual 
report of each requested address. 
This option will also sort the data In 
descending numerical order by 
month. See Fig. 2 for my sample run. 
The program wilt first prompt you for 
an address. Enter the full address. 
The program then will prompt you for 
"# line feeds to heading." Enter the 
number of lines you wish skipped 
before the heading Is printed. 



Urm 


Prognm Function 


1040 


Inttlmllza program and print haKlIno 


2B-M 


DtrrwiBton wtabiM 


38-80 


Dtaplsy BwallabI* opttons 


88-9S 


Dlract progrvn to chosan option 


100-1M 


Option 1 - %ntv paymsnt lo Ills 


160-195 


Option 2 - maka corrsctloni lo f Ita 


200-220 


Option 3 - diaplay aniira tlla 


225-280 


Option 4 - display Individual tanant Ilia 


266-300 


Option 5 - display addraaa Ilia 


305-330 


Option 6 - aava currant (llo on tap* 


335-360 


Option 7 - Input axlating tlla from lapo 


366-400 


Option - Mat aortlng optloni tor output raports 


406-415 


DIract program lo choaan aort option 


420-455 


Sort Option 1 - Print dump ol antira (lla 


460 


Sort Option 2 - (unavallabia In thit listing) 


495-532 


Son Option 3 - Annual rapon aortad by addrass 


535 


Sort Option 4 - (unavallabia In this llsllnfl) 


840 


Sort Option 5 - (unavallabia In this listing) 


848 


Sort Option 6 -(univallaMa In this listing) 


550-555 


Tanrtlrtatas program 


560-565 


Subroutines - torrrtatlad print lor output In Options 3,4,5 


570-610 


Subroulina - sorts data In daacandlng ofdar, rantal rrwnth 


815-620 


Subroutina - usad In options 2,4,5 




Tflft/e 2. Program Summary 



Program Listing 

18 CLEAR28aBiCLSjPHINTSTRING$(64,191},STRING$(64,143) 

15 PRlNTei42,"* * * REHTAL RECORD PROGRAM * * * " : PRINTSTRINGS (64 

,186) ;STRING$(e4,191} 

20 F0RXX-=1T0999:NEXT 

25 DIMM5(5B),D$(5B),A1(5B),R(50),CS(5B),AS(50),H$(5B),BI(5B),L(5 
B) 

38 DIMJS(5B),K$(5B),L$(5B),0$(5B),Pl(5a),SI(58),T(5B),US(58) 
35 CLSiPRINTplB,"* * OPTIONS AVAILABLE * *" sPRINTiPRINTiYY-B 

48 PRINT'TO ENTER PAYMENT TO FILE TYPE 1" 

45 PRINT'TO MAKE CORRECTIONS TO FILE TYPE 2" 

58 PRINT'TO DISPLAY ENTIRE FILE TYPE 3" 

55 PRINT'TO DISPLAY INDIVIDUAL TENANT FILE... TYPE 4" 

68 PRINT'TO DISPLAY ADDRESS FILE TYPE 5" 

65 PRINT'TO SAVE CURRENT FILE ON TAPE TYPE 6" 

78 PRINT'TO INPUT EXISTING FILE FROM TAPE. ...TYPE 7" 

75 PRINT'TO LIST PROGRAM SORTING OPTIONS TYPE 8" 

88 PRINT'TO END PROGRAM TYPE 9' 

85 QS«INKEYS;IFQ$="THEN85ELSE9B 

98 W-VAL(Q$) :ONWGOTO10B,168,2BB,225,265,385,335,365,550 

95 PRINT'INCORRECT ENTRY. ..TRY AGAIN' :GOT085 

IBB CLSiPRINT'TO CLOSE FILE, TYPE. .. 'END* IN NAME FIELD" iPl-Pl+1 

IBS FOR I-Pl TO SB: PRINT-ENTER TENANT NAME (LAST FIRST}' 

IIB INPUTNS(I) :IF NS{I)"'END" THEN P1-I-1:GOT0155 

115 INPUT'ENTER TENANT ADDRESS(###I STREET) ■|A$( I) 

128 INPUT'ENTER RENTAL MONTH (MM-YY) ' )MS(I) 

125 INPUT'ENTER DATE PAYMENT RECEIVED (MM-DD-YY) "/Djfl) 

138 INPUT'ENTER RENTAL AMOUNT { $$5.BB) ' i Al (I) 

Program confinuai 
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MD 



MOO-D€<JIGM 



ANNOUNCES 

THE NEW 

MDX-3 

INTERFACE EXPANSION BOARD 



INTIKFACI IXPANtlON MARD 

FOR THI TRt-tO 

MODIL III COMPUTIR 

FEATURES: 

• Phone Modem 

• RS-232 Port 

• Floppy Disk Controilef 
Dual Density 

Data Separator 

• SHk Screen 

• Soldef Mask 

• User Manual 

Also Available 
TheMDS-1 

• PtuQ in ctata separatof 

for the MOX-2 

• Fully assembled and tested 

• User Manual 



STILL AVAILABLE FOR 
THETRS-80M0DELI 

MDX-1 and MDX-2 Boards. 

FEATURES: 

• Phone Modem 

• 2K-4KE PROM Option 

• 32K MEMORY Expansion 

• Floppy Disk Controller on MDX-2 

• Real Time Clock 

• Paratel Port 

• RS-232 and 20ma Serial Port 

• DiX3l Cassette Line 

• On Board Supply 

• Silk Screen 

• Solder Mask 

• User Morvjal 



IN STOCK NOW! 



PC Board & Manual 
MDX-1 $64.95 

MDX-2 $74.95 

MDX-3 $74.95 

MDS-1 $21.95 



User Manual 



S7.95 



AH Boards Add S5.00 SNpptrig 
Assembled Boards Available 
...Call Fof Prices 



< . ' ■ Of ■,^ f ■ 1 1 ■ 

^rntCPO DG^tcn 

P <) Eiu. MB 
Ma'i'"fa( a Texas T^^'^ 



Program continutti 



135 INPUT'ENTER AMOUNT RECEIVED ( $$$.00) " f Bl (I) 

140 1NPUT"EHTBR RECEIPT NUMBER (»*#«) ';R(I) 

145 PRINT"ENTER CODE..,T-ON TIME" ! PRINTTAB(13) "L-LATE W/CBG"iPRI 

NTTAB(13) "N-LATE W/0 CHG" i PRINTTAB (13) "B-BOUNCED CHECK" 

150 PRINTTAB{13) "D-DEPOSIT FORFEITURE" :PRINTTAB(13) "O-OTHER" iIKP 

UTC$U) :NEXT 

155 CLS!PRINTe468,"* • * FILE CLOSED * * *" iFORXX-lT0999:NEXT;GO 

T035 

160 CLSilNPUT'ENTER NAME (LAST FIRST) " jN$ilNPUT"ENTBR RENTAL MON 

TH(MM-YY) "|M$ 

165 FORI=lT0PliIFLEFT$(N$(I) ,5) =LEFT$ (NS,5) AKDH$»M$(I)GOT0175 

170 NEXTiPRINT"NAME NOT IN FILE" ;GOT0195 

175 PR1HT:PRINT"RE-ENTER INFO WITH CORRECTIONS" i INPUT"ENTES NAME 

■jNS(I)iINPUT"EKTER ADDRESS" )A$(I) 

180 INPUT"ENTER RENTAL MONTH (MM-YY) " |M$ (I) ; INPUT"ENTER DATE PAYM 

T RECEIVED(MH-DD-YY) ";D?(I) 

185 INPUT'ENTER RENT AMOUNT" jAi (I) i INPUT"ENTER AMOUNT REC"(BI(I) 

190 INPUT'ENTER RECEIPT #"jR(I) i INPUT"ENTER CODEi ";C$(I) 

195 N$«""iM$«""jGOSUB615iIFX$-"V"THEN160ELSE35 

200 CLS:FOR I='1TOP1:GOSUB560 : YY=YY+1 

2B5 IFyY<>2THEN215 

210 YY-0!PRINTe960,'rYPE ENTER TO CONTINUE LISTING" j : INPUT 

215 NEXT 

220 INPUT'TYPE ENTER TO DISPLAY 0PTIONS";X:G0TO35 

225 CLS: INPUT'ENTER TENANT NAME (LAST FIRST) "jNS: PRINT 

230 FOR I-1T0P1:IFLEFT$(NS(I) ,5)<>LEFT$(N$,5)THEN25B 

235 GOSUB560:YY«YY+1 

240 IFYYO2THEN250 

245 YY=0:PRINTe960,"rYPE ENTER TO CONTINUE LISTING" j : INPUT 

250 NEXT 

255 PRINTiPRINT'END OF FILE SEARCH. ,," iPRINTiYY-j 

260 N$="":GOSUB615:IFXS="Y"THEN225ELSE35 

265 CLS:INPUT"ENTER RENTED ADDRESS (»t«« STREET) "; AS: PRINT 

270 FOR I<=lTOPl!lFLEFT$(AS(I)»9)<>LEFTS(AS,9)THEN290 

275 GOSUB560:YY-YY+1 

260 IFyY<>2THEN290 

285 Yy-=0:PRINTe960,"TYPE ENTER TO CONTINUE LISTING" 1 1 INPUT 

290 NEXT 

295 PRINTiPRINT"END OF FILE SEARCH. .." !PRINTiYY«=0 

300 A$«"":GOSUB615:IFXS="Y"THEN265ELSE35 

305 CLSrINPUT'PREPARE CASSETTE TO SAVE DATA PILE, WHEN READY TYPE 

ENTER" I X 
310 CLS:PRINTe460,"* * * COPYING FILE ONTO TAPE * * •■ 
315 PRINT #-l,Pl 

320 FOR I-1T0P1:PRINT «-l,N$(I) ,A${1) ,HS{I) ,DS(I) ,Al(I) ,B1 (I) ,R{ 
I) ,CS(I) :NEXT 

325 CLS!PRINTe455,"...BURPl..* COPYING COMPLETE •...NOTE TAPE LO 
CATION" 

330 PRINT6896,"TYPE ENTER TO LIST OPTIONS"; ! INPUTX:GOT035 
335 CLS I INPUT" PREPARE CASSETTE FOR DATA INPUT. . .WHEN READY TYPE 
ENTER" J X 

340 CLS:PRINTi460,"* • * COPYING FILE FROM TAPE • * *" 
345 INPUT t-l,Pl 

350 FOR I-1T0P1:INPUT »-l,N$(I) ,A${I) ,MS(I) ,D${I) ,AI (I) ,B1 (I) ,R{ 
I) ,C$(I) :NEXT 

355 CLS!PRINTe466,"* * * INPUTING COMPLETE * * *" 
360 PRINTe896,"TYPE ENTER TO LIST OPTIONS"; i INPUT:G0T035 
365 CLS:PRINTei0,"* * SORTING OPTIONS AVAILABLE * *" :PRINT:PRINT 

370 PRINT'TO PRINT A DUMP OF ENTIRE INPUT FILE TYPE 1 

■ 

375 PRINT'TO PRINT ANNUAL REPORT SORTED BY RECEIPT « TYPE 2 

380 PRINT"TO PRINT ANNUAL REPORT SORTED BY ADDRESS TYPE 3 

H 

385 PRINT"TO PRINT ANNUAL REPORT SORTED BY TENANT NAME... .TYPE 4 

■ 

390 PRINT"TO PRINT MONTHLY REPORT BY ADDRESS TYPE 5 

m 

395 PRINT"TO PRINT MONTHLY REPORT BY TENANT NAME ...TYPE 6 

■I 

400 PRINT"TO LIST ORIGINAL OPTIONS TYPE 7 

405 Q$=INKEYS:IFQ$-""THEN405ELSE410 

410 K-VAL(Q$) iONKGOTO420,460,465,535,540,545,35 

415 PRINT" INCORRECT ENTRY. . .TRY AGAIN" :GOTO405 

420 BB-0:LPRINTTAB(20)"* * * RENTAL RECORD INPUT FILE DUMP * * * 

"iLPRINT" ■ 

425 LPRINTTAB(3) "TENANT ADDRESS MONTH RENT D 

ATE REC AMT REC REC# CODE" 

430 FORI-lTOPl 

profffmm cofitlniM) 
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Software Breakthrough... 

NEW QUIKPRO Program 
WRITES Programs For You 

in Minutes. 




Review of QUIKPRO 

by Technical Writer 
Wayne Hepburn 

QUIKPRO by ICR FutureSoft is the 
name given a new breakthrough in 
software. It is written for use on TRS- 
80 Model I Disc System, Model II 
and Model III Disc System. 

Until now, whenever you 
wanted a new program, you either 
had to pay good money for each and 
every new application program or, if 
you are capable, spend hours upon 
hours writing your own. Thanks to a 
marvelous new program, those 
choices are obsolete. 

Now you can do it yourself. 
Anytime you want a new program, 
ectsily and quickly, you can make 
your own. Anybody who can turn a 
computer on and off can do it with 
Quikpro ..it's that easy and fast. 

This important breakthrough 
is the invention of Joseph Tamargo 
of Florida. His brilliant approach to 
program writing allows you, finally, 
to tap the real power of your com- 
puter in new ways. I located Mr. 
Tamargo and interviewed him about 
the Quikpro. He told me "The best 
part of this program is that it gives 
you a separate BASIC program every 
time you use it. You can List each 
program you create from it, look at 
it, and actually see what makes it 
tick." 

What's more, 1 found out you 
can modify, alter and enhance, even 
copy, programs you create from 
using Quifcpro. I believe there is no 
other program even close to Quik- 
pro for flexibility and ease of 
program generation. This flexibility 
may well make Quikpro superior to 
every other Filing, Data Entry 

r-Sts List of Advertisers on page 402 



or Data Base Management Program 

The applications are virtually 
unlimited. Anyone who uses a com- 
puter at home, in business, in schools 
or other educational situations will 
find hundreds of applications. 
Teachers, Students, Hobbiests, Small 
arxi Large Businesses can all find 
great benefits in using Quikpro in 
any of hundreds of applications like 
these examples: 

Using Quikpro you can 
quickly write programs for Financial 
Records. Stocks, Checking Accounts, 
Receiveables, Inventories, Schedules, 
Personal Records, Statistics, Invoices, 
Catalogues, Reference Banks, Ac- 
counting Data of all kinds, and the 
list just goes on and on, almost 
without limit. 

Quikpro cuts program 
development time dramatically. ..to a 
fraction of what It would take the 
old way (the way you do it now). It 
will generate File and Data Entry 
sequences for mainframes to remote 
or host computers. You can create 
ar>d run a demonstraton program in 
a few minutes. 

Unlike novelty programs you 
play with for a while and grow tired 
of, Quikpro is one you will regard 
like a good right arm. Year after year 
you will use it to create all the new 
Filing and/or Data Entry programs 
you will ever need. You never have 
to buy them again. 

Thanks to this invention, the 
power and speed promised by com- 
puters from the beginning have now 
become a reality Since I had seen 
announcements about a program to 
be imported from a foreign nation, 
one that supposedly writes programs 
like Quikpro but sells for over six 
times as much money. I asked Mr. 
Tamargo for his comments about 



that. What he told me is "Quikpro is 
so good, anyone can use it im- 
mediately. To prove that point and 
the tremendous capacity it gives the 
user, tCR FutureSoft will send 
QUIKPRO directly to users with an 
absolute moneyback guarantee of 
satisfaction. The user can try it out 
on his/her own computer, writing as 
many programs as desired, for 15 
days after delivery, and if not fully 
satisfied can return the materials for 
a full refund with no reason given. 
That's how good Quifcpro is." 

I couldn't argue with that. 
When the supplier stands behind the 
product with a 100% refund guararv 
tee, it has to be as good as they say 
or even better, and I believe it is. 

The best news is you don't 
have to wait to get QUIKPRO from 
ICR FutureSoft or a dealer. You can 
get it right now by writing or calling. 
QUIKPRO will be delivered im- 
mediately by mail with instruction 
manual and full documentation on 
the moneyback guarantee basis. To 
get yours, just write on a plain piece 
of paper your name and address, 
specify if you want QUIKPRO for 
TRS-80 Model I, II, or III. Include 
your check or money order for only 
$89-95 or furnish your Visa or 
Mastercard number and expiration 
date to charge. Mail to : ICR 
FutureSoft, 2031 Zeta, P.O. Box 1446, 
Orange Park EL 32073. 

If you prefer to call and get 
Immediate delivery, you can phone 
24 hours daily to 1-904-269-1918 
Please have your credit card number 
and computer model information 
ready. Operator is not qualified to 
answer questions about the program. 
Order your QUIKPRO right now. 
Every day you delay is costing you 
time and money. ^x 
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SCRIPMOD 

By TERRY FIVEASH 



Scrtpmod Featuros 

For uu wilh tnv smart ptinter (MX-BO, MiC'o- 
line BO. LP IV, DW II, IDS 4<0. IDS 460, NEC. 
DIABLO, OUME, and more.) 
UndBfline, Supersc'ipl, Subscrlp, Bold Tpy«, 
Pilches, Pause and enter led from keyboaril or 
change print «iiri««ls 

' FIX ' included to make unlimited bacMupi 
Any ASC II Code Ifom 1 to 255. 
Print special characters. 



SUPPLIED ON DISC WITH DOCUMENTATION 

Model I, 3ZK, with lowercase S3S.H 

Model Ml, 32K S39.flS 





by Dan Case 
Super adventure with 
sound! Rescue fair prin- 
cess from people at Ran 
Model I, III. 1BK. 
Level II fM.H 



Video Sciean filler 
Hard acrylic plaslic scroan 
Ihal s easy to install — 
easy on your eyes. 

Model I. II, III <14,>9 

Special liies 8vallat)le 



COLOR COMPUTER PROGRAMS 

Rainbow FIloa I Data Base Mgr . ISK, Ei- 

lended Banc 110.05 

Rainbow Small Bustrwsi System I DoTie Book- 
keeping loimat, 16K, Extended Basic . . S24.BS 
Rainbow Oama Pack I ( Hangman, Target Shoot, 
Boggle, Craps. 4K SIB.H 



Sand Ctvacli er Money Oritar / COD's Wateomo 
Oklahoma Residents add 2% tax 

mgio)[r@(ol[u]©ftg 

P O BOX 7544 / TULSA. OKLAHOMA 7410S 
CODs Call (918) 747-9646 ^598 



". . . there is no direct method 
of deleting a record completeiy. 



Progrmm continue 

435 LPRINTUSING" % * % % % % »ll.«« 

% % #11. ## ###« % %"IN$(I),A$(I),MSU).A1(I),D${I) ,B1 

(I),R{I),C$(I) 
440 BB-BB+B1(I) 
445 NEXTI 

450 LPRINTTAB( 59) STRINGS (7, 45) |LPRINTTAB( 58);: LPRINTUSING" $»##!. 
*«"|BB 

455 LPRINTCBR$(27) iCHR$(ll) :GOT0365 
460 GOT0535 

465 J=:0:KK-0:PRIHT;INPUT"ENTBR ADDRESS OP DESIRED RBPORT"f A$t Z$- 
■-■:SS=0:INPUT"ENTER « LINE FEEDS TO HEADING";GK 
470 F0RI-lT0PliIFLBFT$(A$,9)<>LBFT$(A$(I} ,9)THEN480 
475 J-J+1:J${J)«A$(I) iK$(J)-NS(I) iLS(J)=-M$(I) iOS(J)=D$(I) ;P1(J)■ 
AI(I>!SI(J)-B1{I) iT(J)-R(I)iUS(J)=C5(I):KK=l 
480 NEXTI 

482 IPKKO1G0T0532 

485 J1><J:GOSUB570:G$-RIGUT$(L$(1) ,2) 
490 FORX*1TOGKjLPRINTCHRS(138) :NEXT 

495 LPRINTTAB(20) ■* * * 19'jG?;" RENTAL RECORD HISTORY * * *":LP 
RINTTAB(30)A$:LPRINT" ' 
500 LPRINTTAB(5) "MONTH TENANT NAME RENT DATE REC 

AMT REC REC# CODE" 
505 FORJ-lTOJl 
510 LPRINTUSING" i«l%% % % $*«!.*« % 

% 9*t«.t* ««*! % %"iL(J],Z$,G$,K$(J],P1(J),0$[J) ,S1U1 fT( 
J),U$(J) 
515 SS-SS-t-Sl(J} 
520 NEXTJ 

Program continues 



ADVENTURESiri 
F=or TRS-80 and COLOR-80. These Ad 
ventures are written in BASIC, are full fea- 
tured, fast action, full plotted adventures 
that take 30-50 hours to play. (Adventures 
are interactive fantasies. It's like reading a 
book except that you are the rDain char- 
acter as you give the computer commands 
like "Look in the Coffin" and "Ligfit the 
torch.") 

Adventures require 16K. They sell for 
$14.95 each. 
ESCAPE FROM MARS (by Rodger Olsen) 
This ADVENTURE takes place on the 
RED PLANET. You'll have to explore a 
Martian city and deal with possibly fiostite 
aliens to survive this one. A good first 
adventure. 

PYRAMID (by Rodger Olsen) 
This is our most challenging ADVEN- 
TURE. It is a treasure hunt in a pyramid 
full of problems. Exciting and toughl 
TREK ADVENTURE Iby Bob Retelle) 
This one takes place aboard a familiar 
starship. The crew has left for good reasons - 
but they forgot to take you, and now you 
are in deep trouble. 

DEATH SHIP (by Rodger Olsen) 
Our first and original ADVENTURE, 
this one takes place aboard a cruise ship - 
but it ain't the Love Boat. 

VAMPIRE CASTLE (by Mike Bassman) 
This is a contest between you and old 



QUEST 



QUEST - A NEW IDEA IN ADVEN- 
TURE GAMES! Different from all the 
others. Quest is played on a computer 
generated map of Alesia. Your job is to 
gather men and supplies by combat, bargain- 
ing, exploration of ruins and temples and 
outright banditry. When your force is strong 
enough, you attack the Citadel of Moorlock 
in a life or death battle to the finish. Play- 
able in 2 to 5 hours, this one is different 
every time. 
16K COLOR-80 OR TRS-80 ONLY. $14.95 




Drac - and it's qetting a little dark outside. ^. ■. ^ n _i 

$14 95 each l^ Pleaso Specify system on all orders 

This is only a partial listing of what we have to offer. Send for free catalog to: 

AARDVARK-80 -^^ 



ARCADE AND THINKING GAMES 
16K and extended or level II BASIC 

TIME TREK, REAL TIME REAL 
GRAPHICS TREK. See the torpedoes fly 
and Klingons explode. No more scoll- 
ing displays, no more turn taking. - This 
one has real time and real displays. In 
BASIC - for 16K level II or extended color 
BASIC. $14.95. 

STARFIGHTER - This one man space 
war game pits you against spacecruisers, 
battlewagons, and one man fighters. You 
have the view from your cockpit window, a 
working instrument panel, and your wits. 
Another real time goody. $9.95. 

BATTLEFLEET - This grown-up ver- 
sion of Battleship is the toughest thinking 
game available on 80 computers. There is 
no luck involved as you seek out the 80's 
hidden fleet. This is a topographical toughie 
$9.95. 

SLASHBALL - A two player game of 
strategy and skill, this is like nothing you 
have ever seen before. This takes fast 
fingers, quick wits and concentration. Play- 
able from age 6 to 65, it is a good family 
game. $9.95. 

MINOS - 8K - Features amazing 3D 
graphics. You see a maze from the top, the 
screen blanks, and when it clears, you are in 
the maze at ground level finding your way 
through on foot. Realistic enbugh to cause 
claustrophobia. $12.95. (COLOR 80 ONLY) 




TRS-80 



2352 S. Commerce, Walled Lake, Ml 48088 
(313)669-3110 



COLOR-80 
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• option 7 will return you to the original 
options menu. 

A Few More Pointers 

You may have noted that there is no 
direct method of deleting a record com- 
pletely. To do this, I recommend that you 
use Option 2 and enter at least one blank In 
all fields. 

You will need to consider changing 
dimension statement values and the string 
space value to suit your needs. One Idea 
that is somewhat useful is to set up an en- 
tire year's file with tenant names, ad- 
dresses, and rental amounts. Then, through- 
out the remainder of the year, Option 2 can 
be used to add data each month as the rent 
Is paid. 

Sort Option 2 was originally designed to 
print an annual report sorted by receipt 
number. Sort Option 4 printed an annual 
report sorted by name, much lllte sort Op- 
tion 3. Sort Options 5 and 6 printed monthly 
reports sorted by name and address. As 
you can see, an output report can talte 
many forms. Only you can determine 
which report best suits your needs. ■ 



consider changing dimension statement values 

and the string space vaiue 
to suit your needs." 



Pmgrtm continued 

525 LPRINTTAB(53)STRIHGS{7,45) jLPRI!ITTAB(52)» 

530 LPRINTUSING"$#ttl.«f|SStGOT036S 

532 CLS:PRZ1IT§465, "REQUESTED ADDRESS HOT IN PILE" tPORXX-lT0999iH 

EXTiGOT0365 

535 CLS:PRI»Te465,"OPTIOH UNAVAILABLE AT THIS TIME" iPORXX-lT0999 

iHBXTiGOT0365 

540 GOT0535 

545 GOT0535 

550 PRINTSTRIHG$(64,191)fSTRING$(64,143} tPRIHTTAB(15)"* * * PROG 

RAM TERMINATED * * *"iPRINTSTRING$(64,18a) )STRINGS{64,191) 

555 END 

560 PRINTA$(I),NS(I)iPRINT"RENTAL MONTHi ' ;M$(I) iPRINT"DATE PAYM 

ENT RECEIVBDi ";D$(I) iPRINT"RBNTAL AMOUHTi "; 

565 PRINTUSING"i#t.##"|Al(I) :PRINT"AMOUNT RECEIVEDi 'iJPRINTUSIN 

G"»I#.#»"|BI(I);:PRINT- RECEIPTI 'tR{I)t' CODEi "jC$(l)iPR 

INT I RETURN 

570 F0RJ-1T<XI1:L(J)-VAL(LEPT$(LS(J) ,2)) iNEXTJ 

575 PORI-lTOJl-1 

580 PORJ-I+lTOJl 

585 IPL(I)<-L<J)THEN605 

590 L-L(I) iK$»KS(I) j05-0$(I) iP-PI (I) iS-Sl (I) iT-T(I) sUS-DSd) 

595 L(I)-L(J) !K$(I)-K${J) jOS{I)-0${J):PI(I)-P1(J) :SI(I) -SI (J) iT( 

I)-T(J):U$(I)-U5(J) 

600 L{J)-L:KS(J)-KS:OS(J)-0$iPI{J)-P:SI(J)-StT(J)-T:U$(J)-US 

605 NEXTJ 

610 NEXTI: RETURN 

615 PRINT'FOR ANOTHER NAME OR ADDRESS TYPE Y-YES OR N-NO" 

620 X$-INKEY$tIPX$-'"THEMe20ELSERETURN 



STOCK MARKET 
SOFTWARE 

By H AH Tniini Company for Mod. I. II. & HI TRS-80«s 

STOCK TRACKER™ times trades on individ- 
ual stocks and options. Uses a technical volume 
analysis. Completely objective. Gives buy, sell 
signals. 

MARKET TRACKER™ times tops & bottoms 
on the Dow Industrials; a composite of six tech- 
nical indicators. Some judgement required. 
Gives buy, sell signals. 
These two programs are accurate. 
Hundreds of satisfied users. 

ASK FOR THE EVIDENCE ! 

FOR MORE INFORMATION OR TO ORDER. CONTACT: 

H '^^ 9i WSPING CQM^NY 



POST OFFICE BOX 3354« 

PLEASANT HH-L. CAUFORMA 94523 

T«l«ption« 4IS/e37-l030 



-223 



VISA A MASTEPtCARD 



iI>A*9d.TM.of bdk) Shock 



HOW ACCEL2 WORKS 

TRS-80 Model I/Ill BASIC Compiler 

ACCELZ uses a novel translation techntgue that keeps code growth down and rnsures 
ntghasi compatibility wilti BASIC source programs whrle giving huge speedups Onty a 
carefully chosen subset ot BASIC irtstructwns is translated. The non-comptlable state- 
ments are left in the compiled program in their origirul source torm ar>d at runtime are ac- 
(ualty given to the BASIC interpreter to execute Program flow may Hip into direct execution 
of the compiled machine instructions and then Hop back to interpretation many times dur- 
ing execution. 

Why Compilation improves pertormance 

' Htayt Hesoluiiw Term grvcn lo llK p'ocess Dl ideniilying Ih* value M i vanatile given ils 
rume Ai i pfogratn runs Ihe inierpieiei buMs i diclionary conssling ol j clum ol nem, 
exn combining t n'MtM rume. diU type >nd curtcni vihje Evcfy licne a variable rs to be 
resCvnl Ihe inierpreler musi sequentialhr searcn tnis dictwnary Sy coninsi. ACCEL7 buMs 
the variable ()K;t)onary ooce al compite time and 1^erBat1er can reler lo tt<e wablc names by 
direcl jMriss, witn no run-Iirrw search 

'Line ResMuiion The mterpreier Fiai io take ihe iir>e- number loHowing a GOrO or GOSUB 
convert it to tMnary. irx) then search ihe progiam sequenlulfy to lind the taroel line Al 
compilelime ACCEL2 generates single machine -instructions lor GOTO or G0SU8 using the 
actual address ol the largel line For the interpretet. bath name resohjtHHi and line resolulion 
jel slower as Ihe orogram gets more cornple;!. wfiereas lor compiled code these two operahons 
are independent ol prograrr si7e or number ol variables 

'CorrtpulalionalOperations The mterpreier must parse each statemeni every time nndlhe 
one Dyie codes thai correspond lo Ifie operations, took ahead lo the neit operator lo establish 
Ihe precedence rules and check lot data type msmalch anc conversion Consianis must be 
converted Irom character strings to internal binary Bui under ACCEL? Conslanls are convened 
and embedded righi in the Z80 msiruclion stream, and operations are translated once and loi 
all al compile tme into sequences ol calls lo KM or the mniime component INTEGER opera- 
lions are actualty ijinefl inlo directly executing siraighi line ZSO code' 

The result is a mixture ol BASIC statements and machine lan^ge inslruclions, usualty 
not more than IV?-2% times Ihe size ol the original but n>nnir»g much faster (can be 
50-100 times as fast with some programs) 

ACCEL2 32KTR5-80 Model I/Ill Compilesselectedsubselinallvariabletypes. localand 
global compilation options, output save lo ES/F waler. disk under TRSDOS. NEWDOS. 
NEWDOS/80 

S88.95 + $2.00 shipping 



Developed m Bnlam 
by Souiriern Sollware 



TRS-80 THSlXJSim Radio Stvac" 



ALIEN GELOf fi SOFTWARE 
Boi 11721 Mam l>ost Ollice 

San Francisco. CA 94101 
«1S)3873131 
i Slnngy'FkicpylTTieulroninc NEWtX)SlmAppafiI. inc 



Masierchaige/ Vim 

CAa(k]6% 



^S99 List of AOwtla^n on pag* 403 
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BUSINESS 



To landlord or not to landlord: that is the calculation. 



Investment Property Analysis 



Leslie E. Sparks 
1014 Evergreen Drive 
Durham, NC 27712 



investment. A hard copy option is aiso 
available. 

Ovttrvlew of the Pregram 

First, enter the data for the program 
from the keyboard by filling In a five-page 
menu. The data you enter will concern ex- 



penses, income, and capital costs of the 
investment. When the menu is full and you 
are sure that the data are correct, you can 
initiate calculations by pressing G. 

The program calculates the loan pay- 
ment schedule for the life of the invest- 
ment (not the life of the loan). It also does a 



The analysis of a real estate Investment 
Involves some rather tedious calcula- 
tions. For example, mortgage payment 
schedules must be calculated in order to 
find loan costs. You aiso need to figure 
present values of all the cash flows from 
Investments in order to calculate their 
present worth. 

You can use tables to help with the cal- 
culations, but often the tables don't have 
the values you need. And if you have sev- 
eral investments to analyze, the use of 
tables soon becomes more work than you 
bargained for. The obvious thing to do is to 
let your TRS-80 do the tedious math for 
you. 

The program presented here is designed 
to do all the needed calculations to eval- 
uate an investment in rental property. It 
calculates the taxable and spendable 
rental income expected from the invest- 
ment, along with the expected capital 
gain. The program can handle both first 
and second mortgages, which can have 
both different interest rates and different 
lives. The life of the Investment can be less 
than, greater than or equal to the life of 
either of the loans. 

The program presents a summary of the 
calculations which shows total rental in- 
come (after tax), total spendable Income 
(after tax), capital gain profit, total profit 
and the total spendable profit from the 
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Program Listir)g 

1 REM *********■'•****************''•*'''*******'''****************** 

20 REM RENTAL PROPERTY INVESTMENT ANALYSIS BY L. E. SPARKS 

30 REM VERSION 2.0 19 JULY 1980 32K TRS-B0 DISK BASIC 

40 REM ******-i>***-*-<'-************'******************************* 

50 CLS 

60 CLEAR 1000 

70 PRINT 

80 PRINT STRINGS(63,"*') 

90 PRINT TAB(15) "RENTAL PROPERTY INVESTMENT ANALYSIS " 

100 PRINT TAB(15)" BY" 

110 PRINT TAB(15)" L. E. SPARKS VERSION 2.0" 

120 PRINT STRINGS[63,"*") 

130 G05UB 7060 

140 PRINT STRING$(64,"=") 

150 PRINT"ENTER PROPERTY IDENTIFICATION INFORMATION." 

160 LINEINPUT ZZ$ 

17 CLS 

180 PRINT "INITIALIZATION " 

190 DEFINT J,K 

200 DEFSTR F 

210 DIM F(41) ,E(20),EF(20),PT{12),R{12),RY(12),NU(12),Z(30),EO{2 

0) ,EY(20] ,DS(30) 

220 REM PI INTEREST PAID ON 1ST MORTGAGE P2 PRINCIPAL PAID 1ST 

P3 INTEREST PAID 2ND MORTGAGE P4 PRINCIPAL PAID 2ND 

230 DIM P1(35),P2{35),P3(35) ,P4(35) 

240 REM TX TAX PAID,RA AFTER TAX INCOME, CF CASH FLOW AFTER TAX 

250 DIM RX(30),RF(30),RZ(30),RT(30),RL{30),RI(30),RG(30) 

260 DIM TXC3fl),RA(30),CF(30),DFC30),SF(3fl) 

27 GOSUB 7 35 

280 GOSUB1150 

290 JM = +1 

300 CLS 

310 GOSUB 3390 

320 IF JM = -1 THEN 280 

330 GOSUB 3860 

340 GOSUB 4690 

350 PB1NT"D0 YOU WANT HARD COPY 7" 

360 GOSUB 410 

370 IF YS="Y"THEN GOSUB5630 

Program continues 



;CHR$(94) i" ARE 



Program continued 

380 PRINT"DO YOU WANT TO DO ANOTHER ANALYSIS ?" 

390 GOSUB 410 

400 IF YS="Y" THEN 280 ELSE END 

410 REM GET CHARACTER 

420 Y$=INKEYS:IF YS=""THEN 420 ELSE IX=ASC(Y$) 

430 RETURN 

440 REM NUMERIC INPUT 

450 IC = JV 

460 IF IC = THEN IC =55 

470 V$=Y$ 

480 IF Y$="$'' THEN VS="" 

490 IF Y$="," THEN VS-"" 

500 Z$=Y$ 

510 REM 

520 PRINTejP*64+IC,ZS;CHR$(140) ;" "; 

530 GOSUB 410 :'G0 GET A CHARACTER 

540 IF IX=13 RETURN : 'RETURN IF ENTER PRESSED 

550 IF IX = 8 THEN 560 ELSE 580 

560 IF LEN(VS) = THEN 580 

570 IF HID$[Z$,LEN(Z$) ,1) <> "," THEN V$- LEFTS (VS ,LEN (V$) -1) 

580 IF IX= 8 THEN IP LEN(Z$)>0 THEN Z$=LEFT$ (ZS,LEN ( Z?) -1} 

590 IF IX = 8 THEN 510 

600 IF IX>31 THEN Z5=Z$+Y$ 

610 IF yS="," THEN 650 

620 IF yS="$'' THEN 650 

630 IF Y$-"%'' THEN 650 

640 VS=V$+YS 

650 GOTO510 

660 STOP 

670 REM INSTRUCTION SUBROUTINE 

680 PRINT " MAY BE USED TO CHANGE PAGES. "l 

690 PRINT CHRSODf" ";CHR$(92);" ";CHRS(93); 

ACTIVE . "; 

700 PR1NT"USE G TO START CALCULATIONS. "; 
710 PRINT"ENTER DATA TO CHANGE"; 
720 RETURN 

730 REM UPDATE INSTRUCTIONS 
740 PRINT @ 896,STRINGS(63,"*") J 
750 PRINT 8JZ,STRING$(6 3," "); 

760 PRINT@960,''USE ";CHRS(93); " FOR CORRECTIONS "; 
770 PRINT"ENTER REST OF ITEM AND <ENTER> TO CHANGE"; 
780 RETURN 

7 90 REM POINTER CONTROL 
800 PRINT@JP*64+JV,CHR$(94) ; 
810 GOSUB410:'GO GET A CHARACTER 
820 PRINTiJP*64+JV, " "; 
830 ID=0 
840 JD=0 

850 IF 1X=27 OR IX-91 OR IX=123THEN ID— 1 
860 IF IX=26 OR 1X=10 OR IX=13 THEN ID=ID+1 
870 IF IX =8 THEN JD =-JA ELSE IF IX=9 THEN JD-+JA 
880 JV=JV+JD 

IF aV>JH THEN JV-JS ELSE IF JV<JN THEN JV-JM 

IP=IP+ID 
910 IF IP<1 THEN IP=HX 
920 IF IP>HX THEN IP=1 
930 JP=IP+IJ 
940 RETURN 

950 REM POINTER CONTROL FOR INCOME SUB 
960 IF IP = 8 THEN JV = ELSE JV = IC 
970 PRINTejP*64+JV,CHR$(94) f 
980 GOSUB 410 

990 PRINT @ JP*64+JV," "; 
1000 ID = ! JD = 
1010 IF IX = 27 OR IX = 91 OR IX 
26 OR IX = 10 OR IX 

8 THEN JD =-14 

9 THEN JD a +14 

MX AND ID - -1 THEN IP = IP -2: GOTOlflSB 
+ ID 
+ JD 

1080 IF IP <1 THEN IP = MX 

1090 IF IP = 7 THEN IP = HX:JV = 

1100 IF IP > MX THEN IP = 1 

IF IC >30 THEN IC = 16 

IF IC < 16 THEN IC = 30 
IJ 



890 
900 



1020 IF IX 

1030 IF IX 

1040 IF IX 

1050 IF IP 

1060 IP = IP 

107 IC = IC 



1110 

1120 



123 THEN ID 
13 THEN ID ■ 



« -1 

+1 



1130 JP = IP + 

1140 RETURN 

1150 REM PAGE 1 

1160 JP=6 

1170 IP=1 

1180 IJ =5:JV=28 

1190 IF JH = -1 THEN 2710 

1200 JN=28 :JM=48:JA=20 

1210 CLS; PRINT: PRINT STRING? (6 3/ 

• FIXED EXPENSES * " 



PRINT"* PAGE 1 OF 5 PAGES 



Fmgnm continues 



MMSFORTH VERSION 2.0: 

MORE FOR YOUR RADIO SHACK 
TRS-80 MODEL I OR MODEL III ! 

* MORE SPEED 

10-20 Ilmai Uittf thin Laisl II BASIC 

* MORE flOOM 

vary compac) compilvd coda olui VIRTUAL 
MEMORY makai your RAM icl lirgai. Vanibli 
numbar ot MocK Duflars 31'C^>r -uriqua word- 
namai ut» onljr 4 bytti in headari 

* MORE INSTRUCTIONS 

Add YOUR commands to lt« 7»5T*NDAROpljs 

inilFucllon Mt! 

Far mofa complala Ifian mo»l FO't'is: iinola S 

Ooubla ptaclslon, ariays, iliinghandling, clocV, 

mora. 

* MORE EASE 

Eicallant lullscraan Editor, stiucluiad S 

modular progfamming 

Wo(d taarch utIlOy 

THE NOTEPAD lallar wfitar 

Opitmiiad tO( your TRS-80 wilh kayboaid 

rapaati, upparflowar casa display ilrliar, lull 

ASCII, singia- i doubia-Mtdfi grap'ilca, ate 

* MORE POWER 

Forth oparating syilam 

Irilarpralar AND con^pilar 

8000 AiaambJar 

IZSO Asaamblar atao aiailabla) 

Inlarmli 35- to SO-lracK disk drlvas 

Modal til Syitam can raid, wrila & run Modal I 

itlskattasl 

VIRTUAL I/O 'or Wdao and printar. a<%y and tape 

imMagabyts Hard disk ■• a I lab la) 




FORTH 



THE PROFESSIONAL FORTH 
FOR TRS-80 

(Over 2,000 systems in use) 

MMSFORTH OltK Syttsm V2.0 (raquiral 1 d'lK d'lvg i 
ItKRAM.JZK lor Modal III) l12t.«S* 

AND MMS GIVES IT 
PROFESSIONAL SUPPORT 

SOU'S* cooa provlOad 

MMSFORTH NawslattSf 

Many damo programs aboard 

MMSFORTH Ul«i Group* 

Inav pan Siva upgridas lo latsBl varsion 

Programming flail c#n gii^nrlda *4vic«, moOillcitior^! 

and cuslom programs, to lil YOUR nsvds. 

MMSFORTH UTILITIES DISKETTE: includas FLOATING 
POINT MATH (L.2 BASIC ROM roullnai plus Complai 
numbars, Raci angular- Polar coordinata convarstons, 
Dagraaarnoda, rr>ora|. pluia full Forth-slyleZSO ASSEM 
BLER: plus a powarlul CnOSS-R^FERENCER 10 lisl 
Forth mrords by block arid Mrs All or one diskalta 
('•Qutras MMSFORTH V2.0. 1 dri.e & 32K RAM) . t».K' 

FORTHCOM: communications packaga piovldas RS-232 
Orlvar, dumb tarminal moda. Iransfar ol FORTH blocks, 
and host moda lo oparala a rarr>ota TR5-S0 Iraquiraa 
MMSFORTH V2.0, t driva ft 32K RAMI . . . . tM.flS' 

THE DATAHANDLER V1.2: a isry SOphisl.catad data- 
basa rrianagamani syslam oparabia by non-pro- 
giainmats (raquire* MMSFORTH V7 0. 1 driva I 32K 

Rami tss.ss- 

MMSFORTH GAMES DISKETTE, raal-tima graphics & 
board garraa w/sourca coda Incljdas BREAKFORTH, 
CRASHFORTH, CRYPTOOUOTE, FREEWAY, OTHELLO 
S TICTACFORTH |raqujras MMSFORTH V2.0, 1 Oiiva & 
32K RAMI t39.B$* 

Olh*r MMSFOftTH protfucls undai daialopntanl 

FORTH BOOKS AVAILABLE 

MMSFORTH USERS MANUAL oilhoul Appandicas. lor 
non-ownara . t17.50' 

START I NQ FORTH - bast compaiilon to our man- 
ual I1S.W 

INVITATION TO FORTH datailad baglnnar book on 
llgFOHTH I17.S0* 

THREADED INTERPRETIVE LANGUAGES advancad, 

• icallant anilytli ol MMSFORTH Ilka lan- 
guaga S1l,tS' 

PROGRAM DESIGN i CONSTRUCTtON - Intro, lo sKuc- 
turad programming, good lor Forth . . . SIS,K' 

FORTH -n STANDARD MANUAL official ratarenca ID 
79-STANDAflO word lat, ate Sll.tS* 

FORTH SPECIAL ISSUE, BYTE Magailns lAug. ^960) 
wa slock inia collactor's Itam to: Form usara and bagln- 
n«f» M.W* 

* - ORDERING INFORMATION. Soflwara pricas Includa 
manualt and raoulra signing ol a alnglasystam, slngla- 
uaw Mcansa. SPECIFY tor Modal I or Modal III! A4d 
(2.00 SJH plus t3.00 par MMSFORTH and S1.00 par addi- 
tional book, Mas* O'dars add 5H tax. Foraign ordars 
add 20%. UPS COD, VISA i MJC accaptad: no unpaid 
purchaaa ordara, plaasa. 

Said S*S[ Iw I'M UMSfORJM ■rtoimar.or, 
Good Otalers iouglM 

Gat MMSFORTH products Irom your 
com pu tar daalar or 

MILLER MICROCOMPUTER 
SERVICES (M11) 

61 Lake Shore Road, Natick, MA 01760 
(617)653-6136 

»^112 



>'5«* List of Advertisers on page 402 
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Computer lnform;iti<»n Kxchanj;e 
Box 159 (7M) 757--}Ji-l9 .-.: 
S;in l.uis Rev CA 92068 



Shack-SOHodel-l Users: 
Restore ReliabiUty 

Tirtd of spontwwous re-booting, "loss" of 
memory, UL ERROR on programs that are 
correct. "BAD RAM" or ROM that is good and 
other symptoms of dirty edge connectors? 

C)E Cramol in cleaning kit lets you quickly, 
safely strip away coatings of high -resistance 
oxide films built upon ..S-80's rton-gold- 
plated edge fingers, and coat them to reduce 
further buildup. Contains one bottle cleaner, 
one lubricant/sealer. 
CIE Cramolin |i.95 ($3.49 CA) 

Silver Solder Rejuvinates 
Shack-so Edge Connectors 

Ratty Radio Shack edge fingers require 
frequent Cramolin cleaning for system 
reliability. Tandy didnotgoldplate them, but 
after you silver tttem you can tug cables and 
jar computer iwitt>out system reboot! 

Kit contains special high-quality flux and 
16" (about 1.5 oz) of solder, S-6% silver, 
balance tin (contains no cadmium, zinc, or 
toad) Caution: do not resolder fingers with 
ordinary solder, or system will be totally 
unusable! 
CIE $4.&0 ($4.77 CA) 

Media Buys: 

Diskettes 

B" Unbranded, single -density. 10, in 
envelopes, fully guaranteed $19.95' 
5" Memorex sngi dens., box 10 $24.75» 
5" Menwrex dbl. dens., box 10 $2fi.S5* 
5" Dysan, plastic box of 10, double -density 
ultra-reliable $44.95* 
5" Wabash SSSO with hub ring $26 55* 
5" Wabash DSOD with hub ring $$38.98* 
Reinforcements, 50 rings for 5" $7 75* 
Ring tools--apply reinforcements $4.95* 
Cleaning kits. 3M or FO, 2 disks $22.46* 



GuARANTt E 

All CIE disks guar^nlppd 

If yoii gel i bad disk. CIE wiH replace if 



Hardware: 

Percom, LNDoubler Savings 

DOUBLE DENSITY attachmeMs 

$153.50/$! 57. 50/$207* 

Double disk storage with either Percom or 
LNW Research plug-in adapters. No 
soldering. Percom Doubler 2 comes with 
DoubleDOS TRSOOS varient, is $153.50*. 
LNDoubler 1 includes DOS-plus deluxe 
operating system. LNDoubler 5/8. with 
operating system, allows use of dmible 
density with either 5" or 8" drivesl^ust 

Lowest Prices 
On Disk Drives! 

TEAC40-track single/double density, single 
headed (writes, reads on one side of disk), 
with incredible 1-yr factory guarantee! 
Case, power supply disassembled for 
shipping, just insert 6 screws. Exclusive: no 
extender cable needed! $2M». 

•0-TRACK, 1-HEADED $»5* 

SO-TRACK, 2-HEADED (dbl sided) $M0» 
Bare 40-track. uApowared $215* 

Bare -80 -track $225* 

SOFTWARE to 50X off 

Leading brands including Acorn, Allen 
Gelder, Alternate Source. Apparat, 
Blechman Enterprises. Breeze Computing, 
CIE, Data Soft, Dorsett. Edu Ware. Ellis 
Computing, Hexagon Systems, Micro Clinic, 
Micro Works, Microsoft, Modular Software, 
Nepenthe, Personal Computer Service, 
ProSoft. and Ramware. 
BOOKS, leading publishers, 10% off 



Discounts: 

•prices C'E net, iiiLiudntg 10'. dist.ount 

fo> WOo-- more total order, 3 or more items 

nominal shippina charge on all but books and 

softvsire 



$/YR' 



$*it,**t.**"fE 



Program continueC 

122B PRINT STRINGS{63,""") 

1230 PRINT ■ ITEH ' ;TAB { 40 ) ; "S/HO 

1240 PRINT STRING$(63,"-") 

1250 FOR J = 1 TO 6 

1260 PRINT" ■; 

1270 PRINT USING F ( J) ; EF (J) ; i PRINT USING " 

Y(J) 

1280 NEXT J 

1290 JZ >= 832 

1300 PRINTg832,"> "j 

1310 GOSUB670 : 'PRINT INSTRUCIONS 

1320 IC =45:MX=5 

1330 GOSUB 790 

1340 IP IDO0 THEN 1330 ELSE ID-l 

1350 IF IX<32 THEN 1330 

1360 IF YS="G" THEN RETURN 

1370 IF YS-">' THEN 1580 

1380 IF YS - "<■ THEN 1150 

1390 GOSUB730 

1400 GOSUB 1480 

1410 GOSUB 1540 

1420 IP-IP+1 

1430 IF IP<1 THEN IP=MX 

1440 IF IP>MX THEN IP-1 

1450 JP-IP+IJ 

1460 CLS 

1470 GOTO1210 

1480 REM UPDATE INFORMATION 

1490 GOSUB 440 

1500 IF JV=JM THEN EY (IP) -VAL (VS) :EF ( IP) -EY (IP)/12 :RETURN 

1510 EF{IP) = VRL(VS) 

1520 EY(IP)-12.*EF(IP) 

1530 RETURN 

1540 REM CALCULATE TOTAL COSTS 

1550 EF(6) = EF(1}+EF(2)+EF(3)+EF(4)+EF(5) 

1560 EY{6) - EY(1)+EY(2)+EY(3)+EY(4)+EY{5) 

157 RETURN 

1580 REM PAGE 2 

1590 IP=l:JP=3:IJ-2 

1600 JV-28:JN-28:JM-48:JA«20 

1610 CLS 

1620 PRINT "** PAGE 2 OF 5 PAGES ** OPERATING COSTS *•" 

16 30 PRINT*ITEM";TAB(33);"S/hO $/YR" 
1640 PRINT STRINGS(63,"-") 

1650 FOR J- 1 TO 12 

1660 PRINT USING F ( J+6) ; E (J) ; : PRINT USING " $ttl,*«*.lt'i 

EQ(J) 

1670 NEXT J 

1680 JZ - 896 +64 

1690 PRINT e 896, ■< OR >"i 

1700 HX=11; IC -45 

1710 GOSUB670 

17 20 GOSUB7 90 

1730 IF IDO0 THEN 1720 ELSE ID-1 

1740 IF IX<32 THEN 1720 

17 50 GOSUB 7 30 

1760 IF Y$="G" THEN RETURN 

1770 IF YS="<" THEN 1150 

1780 IF yS=">" THEN 2000 

1790 GOSUB 1860 

1S00 GOSUB192B 

1810 IP=IP+1 

1820 IF IP<1 THEN IP-MX 

1830 IF IP>MX THEN IP"1 

1840 JP = IP + IJ 

1850 GOTO 1610 

1860 REM UPDATE COSTS 

1870 GOSUB 440 

1880 IF JV.JM THEN EQ{ IP) -VAL (V$) : E (IP) -EQ( IP)/12 . :RETtm» 

1890 E{IP)=VAL(VS) 

1900 EQ(IP)=E(IP)*12. 

1910 RETURN 

1920 REM SUM TOTAL EXPANSES 

1930 E(12)'=0 

1940 EQ(12)-0 

1950 FOR JJ = 1 TO 11 

1960 E(12).E{12)+E(JJ) 

1970 EQ(12) - EQ(12)+EQIJJ) 

19S0 NEXT JJ 

1990 RETURN 

2000 REM INCOME ESTIMATES GO HERE 

2010 IJ - 2 

2020 HX ■= 8 

2030 IP-1 

2040 IF IP = HX THEN 2590 

2050 IC - 16 

Progrmm continiM* 



146 • 80 Microcomputing, November 1981 



Prog/am coniinue<i 

2060 JP = 3 

2070 JV=28:JA=20:JN='28:JH=4B 

2080 CLS 

2090 IF IP = MX THEN JV = ELSE JV - IC 

2100 PRINT ■*** PAGE 3 OF 5 PAGES •*• INCOME ESTIMATES ***" 

2110 PRINT STRING${63,"=") 

2120 PRINT"TYPE OF UNIT "jTAadS);"! UNITS' ; TAB (30 ); "RENT $/M0' ; 

TAB(50) ; "RENT S YR" 

2130 FOR J - 1 TO NT 

2140 PRINT ■ ■; 

2150 PRINT FT(J) ;TAB(20) ;NU(J) ;TAB(3fl)i 

2160 PRINT USING " S# »*,«#•.♦»"! R (J) ; : PRINT TABC45); 

2170 PRINT USING F[0};RY(J] 

2180 NEXT J 

2190 PRINT "**** TOTAL " ; TAB ( 20) ;NS ; TAB ( 3 0) ; 

2200 PRINT USING ■$•,•♦««##.»♦" fRM; : PRINT TAB{45); 

2210 PRINT USING F(0);RY 

2220 PRINT" ■; 

2230 PRINT USING F(41)jVA 

2240 PRINT"****";: PRINT USING " DOLLAR COST OF VACANCY S*i*,»« 

l.»»/YR';VA*RY/100, 

2250 RG = RY*(lfl0.-VA)/100 

2260 PRINT ■****■ j:PRINTUSING" ADJUSTED GROSS RENTS $t,l**l*» 

.««/YR";RG:PRINT STRINGS (6 3 , "-" ) 

2270 PRINT e 896, "< & > MAY BE USED TO CHANGE PAGES "; 

2280 PRINT CHRS{91);" ';CHR$(92)j" "fCHRSOB); " ";CHRS(94)!" AR 

E ACTIVE"; 

2290 PRINT " ENTER NEW DATA TO CHANGE. PRESS G TO START CALCULA 

TIONS "; 

2300 GOSUB 950 

2310 MX = 8 :IJ-'2 

2320 IF ID <> THEN 2300 ELSE ID = 1 

2330 IF IX < 31 THEN 2300 

2340 IF YS ■= "G" THEN RETURN 

2350 IF YS ="<" THEN 1580 

2360 IF Y5 = ">" THEN 2710 

2370 JZ = 832 

2380 GOSUB730 

2390 GOSUB 2500 

2400 GOSUB 2600 

2410 IF IP = MX THEN 2440 

2420 IF IC <30 THEN IC = 30 :GOTO2080 

2430 IF IC > 16 THEN IC =16 

2440 IP - IP + 1 

2450 IF IP >HX THEN IP =1 

2460 IF IP < 1 THEN IP =HX 

2470 JP = IP+IJ 

2480 IF IP = 7 THEN IP = MX 

2490 GOTO 2080 

2500 REM DATA ENTRY 

2510 GOSUB 440 

2520 IF IP - MX THEN 2590 

2530 IF IC " 30 THEN 2560 : REM TO ENTER RENTS 

2540 NU(IP) = VAL(VS) 

2550 GOTO2570 

2560 R(IP)-VAL(VS) 

2578 RY(IP) = R(IP)*NU(IP)*12 

2580 RETURN 

2590 VA = VAL(V$): IC - 16:RETURN 

2600 REM SUM UP TOTALS 

2610 NS '0 

2620 RH = 

26 30 RY =0 

26 40 FOR JJ = 1 TO NT 

2650 NS - NS+NU(JJ) 

2660 R« <• RM + NU(JJ)*R(JJ) 

2670 RY = RY + RY (JJ) 

26 80 NEXT JJ 

26 90 RETURN 
2700 END 

2710 REM ENTER MORTGAGE COSTS ETC 

27 20 CLS 

2~''0 JV=0: JA=0: JH=fl:JN-0 

27^3 IC = 6 

27 50 IP = 1 

2760 MX = 12 

2770 IJ = 1 

27 80 JP = 2 

2790 JZ = 896+64 

2800 CLS 

2810 PRINT ■***• PAGE 4 OF 5 **** INVESTMENT DATA *••*" 

2820 PRINT STRINGS(63,"-") 

2830 FOR JJ- 1 TO 12 

2840 PRINT ■ "; 

2850 PRINT USING F (JJ+18) ; itJJ) 

2860 NEXT JJ 

Program coniinuas 



REMsoFT. Inc. 

L«t Your TRS-80* 

T«ach You 

ASSEMBLY LANGUAGE 

Tired ol buytng booh after tMKtk on assemUy 
language programming and still not knowing your 
fW Iroin your PUSH' 

REMsQFT pfowJIy announces a more effi- 
cient way, usino your own TRS-80* . lo learn ifte 
fundamenlals of assembly language programming 
-at YOUR pace and at YOUR convenience 

Our unique package, ' INTRODUCTION TO TRS-ST 
ASSEMILY PflOSRAMMING", will provide you wilfi 
the to>lowing: 

• Ten 4 5- minute lessons on audio cassettes 

• A driver program to make your TRS-80* video 
rrwnitor serve as a blackboard lor the instructor 

■ A display program lor each lesson to provide 
illustration and reinforcement tor what you are 
hearing 

• A textbook on TRS 80* Assembly Language 
Programming 

• Slep-by-step dissection of complele and useful 
routines to tesi memory and lo gam direcl control 
over the keyboard, video monitor, and printer 

• How to access and use powerful routines m your 
Level II ROM 

This course was developed and recorded by 
Joseph E Willis and is based on the successful 
series of courses he has taught at Meta Technologies 
Corporation, itte Radio Shack Computer Center, and 
other iDcalions in Norlhern Ohio. The minimum 
system required is a Level II. 16K RAM 

REMASSEM-1 only $69.95 



LEARN TRS-80® 

ASSEMBLY LANGUAGE 

DISK I/O 

Your disk system and you can really slep out with 
REMSOFrs Educational Uodute REWDISK-1 a 
short course revealing tfie details ol DISK I/O 
PROGRAMMING using assemtily language 

Using the sa'T>e lO'mal as Our ext'emely popular 
introduction 10 assenibly language pfogrammmg. 
th)S -ASSEMBLY LANGUAGE DISK I/O PftOORAM- 
MING' course includes 

• TiMo 4S-niirii]te lessons on audio cassette 

• A driver program lo make your TRS-80* video 
monitor serve as a blackboard tor the instructor 

■ A display program lor each lesson to provide 
illustration and reinforcement for what you are 

hearing 

• A booklet ol comprehensive, fully -com men ted 
program listings illuslratit>g sequential tile I'O. 
random-access tile I/O and track and sector \'0 

• A diskette with machine-readable source codes 
tor all programs discussed, in both Radio Shack 
EOTASW and Macro formats 

• Routines to convert from one assembler formal 
to the other 

This course was developed and recorded by 
Joseph E Willis, tor the student with eipenence 
in assembly lar^uage programming, it is an mter- 
mediate-to advanced-level course Minimum hard- 
ware required is a Model I Level II. 16 K RAM one 
disk drive system 



REMDISK-1 



only $29.95 




Dealer inquiries invited 

REMsOFT. INC. 

571 E 185 SI 

Euclid. Ohio 44119 

(216)531-1338 



% 



^70 



OlT« rHiOents add 5'/i*/. uies Ui 

IHS 80* is i i^KJeryfti o' 'he Taio, Ceo 



■See List ol A0vertise'S on page 402 
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". . . if you have several investments to analyze, 
the use of tables soon becomes 
more work than you bargained for." 



Program continued 



2870 


PRINT e 896, "< OR > "; 


2880 


MX - 12 : IC - 55 


2890 


GOSUB 670 


2900 


GOSUB 7 90 


2910 


IF ID <> THEN 2900 ELSE ID 


2920 


IF IX < 32 THEN 2900 


2930 


GOSUB 7 30 


2940 


IF Y$ = "G" THEN RETURN 


2950 


IF Y$ - ">" THEN 3070 


2960 


IF YS = ■<" THEN 2000 


2970 


GOSUB 3030 


2980 


IP = IP + 1 


2990 


IF IP > MX THEN IP =■ 1 


3000 


IF IP < 1 THEN IP - HX 



3010 JP - IP + IJ 

3020 GOTO 2800 

3030 REM UPDATE INFORMATION 

3040 GOSUB 440 

3050 Z(IP) = VAl.(V$) 

3060 RETURN 

3070 REM MORTGAGE ETC DATA CONT. 

3080 IP 

3090 MX 

3100 JP 

3110 JZ 

3120 CLS 

3130 PRINT 



1 

10 

2 

696-^64 

'***** PAGE 5 OF 5 PAGES ***** INVESTMENT DATA COST * 



3160 
3170 



3140 PRINT STRINGS(63,'-"} 
3150 FOR J = 1 TO MX 
PRINT " 
PRINT USING F(J+30) ;Z{J+12) 
3180 NEXT J 

3190 PRINT e 896, "< ") 
3200 IC = 55 
3210 GOSUB 670 
3220 GOSUB 7 90 

3230 IF IDO THEN 3220 ELSE ID = 1 
3240 IF IX < 32 THEN 3220 
3250 GOSUB 730 
3260 it Y$ ="G" THEN RETURN 
3270 IF YS = "<■ THEN 2710 
3280 IF Y$ ■=■>■ THEN 3070 
3290 GOSUB 3350 
3300 IP = IP+1 
3310 IF IP > MX THEN IP ■ 1 
3320 IF IP < 1 THEN IP - MX 
3330 JP = IP + IJ 
3340 GOTO 3120 
3350 REM UPDATE INFORMATION 
3360 GOSUB 440 
3370 Z{IP+12) - VAL{V$) 
3380 RETURN 

3390 REM CHECK DATA INPUT 
3400 SC»Z(1)-Z{2)-Z(3)-Z(7)+Z(11}+Z(12) 
3410 CLS 

3420 PRINT STRING$(64,"*") 

3430 IF SC <> THEN PRINT "POSSIBLE ERROR IN DATA INPUT'ELSE 35 
10 

3440 PRINT"THE SUM OF THE DOWN PAYMENT THE FIRST AND SECOND HORT 
GAGES" 

3450 PRINT'DOES NOT EQUAL THE PURCHASE PRICE PLUS CLOSING COSTS" 
3460 PRINT "DO YOU WISH TO REVIEW DATA ?" 
3470 GOSUB 410 
3480 IF YS = "N" THEN 3510 
3490 JH = -1 
3500 RETURN 

3510 REM CHECK TO SEE IF INTEREST RATES WtE NON ZER0 
3520 CLS 
3530 PRINT STRING$(64, 



') 



3540 IF Z(4) = AHD Z{3) > THEN 3550 ELSE 3600 

3550 PRINT"POSSIBLE ERROR. INTEREST RATE FOR FIRST" 

3560 PRINT"MORTGAGE IS ZERO." 

3570 PRINT"DO YOU WISH TO REVIEW DATA?" 

3560 GOSUB 410 

3590 IF Y$-"Y" THEN JM - -1:RETURN 

3600 IF Z{7)>0 AND Z(8} - THEN 3610 ELSE 3660 



Program continuas 



Pfoptrty tu S4,400/yf 

rnBuranc* $1D(Vmo 

Uc%t\a» WOO^r 

R«pl«c«m«nt rsBsrvM $75/mo 

Other tlxsd txp UMno 

JinHw $45CVmo 

Soc Mc, untmp SWmo 

0>rt»ga collection — $2(Umo 

UtIlltiM »25/mo 

Supplies S2S/TT>o 

Mkimenance laOO/yr 

AtJvertlsIng MQfttw 

M«n«gem«nt OOCVmo 

Purcheee price WSO.OOO 

Down peyment— $130,000 

I8t mortgefle. $200,00 

2nd moilgage' (50,000 

Intent rate 12% Doth 

Ufe 1»l 25 ye«» 

Ufe 2rKl 10 yee™ 

Peymenta per yeer 12 for both 

Lite of Investment Syeers 

Life ol bidg for dep 33 years 

Per cent (or land 20S 

Esclatlon fw Investment 15% per year 

Esclallon (or rent 9% per yeer 

Esclatlon foreipenae 10% par year 

Discount rete ■ B% 

Marginal Income tax 50% 

Capital gains rate 25% 

Cost ot setting 8% o( setling prtce 

2 of>e bedroom undjr rent at S40(Vmo, 
2 two bedroom (ur at Vlilmo 
4 three bedroom fur at $635/rT>o. 
VacarKy allowance - 6% 

fig. 1. Data for Exampla. 



year by year calculation of the income and 
expenses (escalated as specified by the 
user) for the life of the Investment. Straight 
line depreciation Is also used as part of the 
taxable income calculation. Both taxable 
and spendable Income are calculated. 

At the end of the last year of the Invest- 
ment, the program calculates the ex- 
pected selling price (based on a user- 
specified escalation factor), capital gains 
tax, total rental Income, total capita) gain, 
and total profit from the Investment. The 
program also calculates the present value 
of various cash flows from the Investment 
and compares the present value of the 



* Page l o( 5 pagee ' Fixed Expenses * 



ttem 



VMq 



Property Tex —I QJOO 

Insurance S OM 

Ucenae S 0.00 

Replacement Reserrea S 0.00 

other Fixed Expenses S 0.00 

Total Fixed Expanses S 0.00 



0.00 
0.00 
0.00 
0.00 
0.00 
0.00 



> Irfay Be Used To Change Pagea. 11— Are Active. Use Q 
To Stert Calculattons. Enter Data To eh«no« 

Fig. 1. First Page of Manu, FIxad Ex- 
penaas. 
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■ ■ Page 2 of 5 pafiaa • • Operstlng Costs ' * 

Itam S/Mo S/Yr 

Janitor -J 0.00 S 0.00 

Qardsner $ 0.00 $ 0.00 

Soc. Security & Unemp i 0.00 % 0.00 

Qarbage Collection- $ 0.00 ( 0.00 

Utilities S 0.00 S 0.00 

Supplies t 0.00 S 0.00 

Maintenance S 0.00 S 0.00 

Advartlslno S 000 S 0.00 

Management t 0.00 S 0.00 

Free Rent (Mgr Janiiof) S 0.00 S 0.00 

Other Operating Expenses - S 00 S 00 

< on > May Be Used to Change Pages, tl— Are Acltva. 
Use G lo Start Calculations. Enter Data to Ctiarvge 

Ffg. 2. Page 2 of Menu. Operating Costs. 

total profit with the amount of the down 
payment. If the total profit from the Invest- 
ment Is less than the down payment, the 
program prints out a message calling at- 
tention to that fact. The program also 
prints out a message If the spendable In- 
come from the Investment is negative. This 
message alerts the user that money must 
be taken from savings or borrowed to keep 
the Investment going. 

After the summary results are dis- 
played, you are asked if you wish to see de- 
tailed results for each year. If you do, the 
income, expenses, and tax paid for each 
year are displayed. 

If the spendable income for any year Is 
negative, a message Is printed to alert you 
that the investment Is not paying for Itself. 
If the taxable Income Is negative, a 
message Is printed to Inform you that 
there is a tax loss that can be used to 
shelter other incomes. 

If you do not want to see the yearly 
details, you will be asked If you want a 
printout of the calculations. If you do, the 
input data and all the calculated results 
are printed on the line printer. 

After the results of the last year are 





Type of Unit 


• Ufilta 


Rent S/Mo 


Rent S Yr 


1 Bed Fur -* 







0.00 




0.00 


1 Bed Untur 







0.00 




0.00 


2 Bed Fur 







0.00 




0.00 


3 Bed Un(ur 







0.00 




0.00 


3 Bed Fur 







0.00 




0.00 


3 Bed Unlur 







0.00 




0.00 


Total 







o.w 




0.00 



Allowance For VacarKles As % Of Rents— O.W/o 
"" Dollar Cost of Vacancy S O.OO/Yr 
" " Adtusted Gross Rents S O.OCVYr 



< & > May Be Used To Change Pages tl— Are Active 
Enter New Data To Change. Press G To Start Calcula- 
ttons 

Fig. 3. Page 3 of Menu, Income Estimates. 



"This message alerts the user 
that money must be taken from savings. . . " 



Program conUnued 

3610 PRINT"POSSIBLE ERROR." 

3620 PRINT" INTEREST RATE FOR SECOND MORTGAGE IS ZERO." 

3630 PRINT"DO YOU WISH TO REVIEW DATA ?" 

3640 GOSUB 410 

3650 If YS ="Y" THEN JM =-l:RETURN 

3660 REM CHEL'K TO SEE IF NUMBER OF PAYMENTS ENTERED 

3670 IF Z(3)>3 AND Z(5) >0 THEN 3710 

3680 PRINT"POSSIBLE ERROR IN INPUT DATA" 

3690 PRINT "LIFE OF 1ST MORTGAGE IS 0. DO YOU WISH TO REVIEW DAT 

A?" 

3700 G0SUB41D:IF YS="Y" THEN JM = -1:RETURN 

3710 IF Z(6) >0 THEN 3760 

3720 PRINT "POSSIBLE ERROR IN INPUT DATA!" 

37 30 PRINT "NUMBER OF LOAN PAYMENTS PER YEAR IS 0. 

3740 PRINT "DO YOU WISH TO REVIE DATA ?" 

3750 GOSUB 410 : IF YS="Y" THEN JM =-l:RETURN 

3760 IF Z(7)>D AND Z(9)>0 AND Z(10) > THEN RETURN 

3770 IF Z(9)> THEN 3810 ELSE PRINT "POSSIBLE ERROR IN INPUT DA 

TA" 

3780 PRINT "LIFE OF SECOND MORTGAGE IK B. DO YOU WISH TO REVIEW 

DATA?" 

3790 GOSUB 410 

3800 IF ¥$="¥" THEN JM =-l:RETURN 

3810 IF Z(10)>0 THEN RETURN ELSE PRINT "POSSIBE ERROR IN INPUT D 

ATA." 

3820 PRINT"THE NUMBER OF LOAN PAYMENTS PER YEAR IS 0" 

3830 PRINT "DO YOU WISH TO REVIEW DATA?":GOSUB 410 

3840 IF YS="Y" THEN JH=-1 

3850 RETURN 

3860 REM SET UP TO CALCULATE PAYMENT SCHEDULE 

3870 REM CHECK TO SEE IP THERE IS FIRST MORTGAGE 

3880 IF Z{3)=0 THEN 4270 

3890 REM NOW AHORIZE LOAN 

390 CLS 

3910 PRINT"PLEASE WAIT IT WILL TAKE 1 TO 2 MINUTES FOR CALCULATI 

ONS' 

3920 PRINT"* FIRST MORTGAGE CALCULATIONS " 

3930 REM XI IS INTEREST RATE PER PERIOD 

394B X1=Z(4)/Z(6)/100:REK INTEREST PER PERIOD 

3950 V={X1+1.0000) I [Z{6) *Z(51 ) 

3960 P-X1*V*Z(3)/(V~1.) 

3970 REM NOW CALCULATE PAYMENT SCHEDULE 

3980 S=0 

3990 Sl-0 

4000 N3-1 

4010 S2=0 

4020 A-Z[3} 

4030 Jl=l 

4040 N2-Z(6)*Z[5) 

4050 IF N2>Z(6) *Z[13) THEN N2-2 (6 ) *Z { 1 3) : ■ LIMIT CALCULATION TO L 

IFE OF INVESTMENT 

4060 31=0:' Bl-BALANCE ON FIRST MORTGAGE AT END OF N2 PERIODS 

4070 P1(J1)=0 

4080 P2(J1)=0 

4090 J2'=l 

4100 X2= INT(X1*A*100)/100 ; REM INTEREST TO NEAREST CENT 

4110 pp=p-x:; 

4120 P2(J1)=P2(J1J+PP 

4130 P1(J1)=P1{J1)+X2 

4140 S-'S+PP 

4150 A=A-PP 

4160 IF N3=N? THEN 4240 :REH HAVE FINISHED PAYMENT SCHEDULE 

4170 IF J2 . : THEN 4210 :REH HAVE COMPLETED 1 YEAR OF CALCULA 

TION 

4180 N3-N341 

4190 J2=J2U 

4200 GOTO4100 

4210 Jl-Jl+1 

4220 N3=N3+1 

4230 GOTO 4070 

4240 REM FINISHED WITH FIRST MORTGAGE 

4250 B1-A:IF Bl<0 THEN B1=0 

426 A=0 

427 REM NOW DO SECOND MORTGAGE 
4280 IF Z(7)=0 THEN 4670 

4290 REM NOW AHORIZE LOAN 
4300 CLS 

Program cooiinues 
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". . . unlike depreciation of the building, 
depreciation of tfie furnishings 
is a real out-of-pocl<et expense." 



Program coftiniMd 

4310 PRINT"PLEASE WAIT IT HILL TAKE 1 TO 2 MINUTES FOR CALCULATI 

ONS" 

4320 PRINT "** SECOND MORTGAGE CALCULATIONS" 

4330 REM XI IS INTEREST RATE PER MONTH 

4340 Xl-Z(8)/Z(10)/100. 

4350 V={X1+I.0000) [ {Z(10)*Z{9)} 

4360 P=Xl*V*Z(7]/(V-l.) 

4370 REM NOW CALCULATE PAYMENT SCHEDULE 



4380 


S-0 


4390 


Sl-0 


4400 


N3 = l 


4410 


52-0 


4420 


A=Z(7) 


4430 


Jl-1 


4440 


FOR J - 1 


4450 


N2-Z(9)*Z 



TO Z(9 ) :P3(J)-0iP4{J)-fl:NEXT J 
[10) 

4460 IF N2>Z(10}*Z(13] THEN N2-Z (10) *Z ( 13) 
4470 B2=0: 'B2='BALANCE ON SECOND MORTGAGE 
4480 P3(J1]=0 
4490 P4(J1)=0 
4500 J2=l 

4510 X2= INT(X1*A*100)/100 : REM INTEREST TO NEAREST CENT 
4520 PP=P-X2 
4530 P4(J1)=P4(J1)+PP 
4540 P3(J1)=P3(J1)+X2 
4550 S=S+PP 
4560 A-A-PP 

4570 IF N3=N2 THEN 4650 :REH HAVE FINISHED PAYMENT SCHEDULE 
4580 IF J2=Z(10) THEN 4620 :REM HAVE COMPLETED 1 YEAR OF CALCUL 
AT ION 

4590 N3=N3+1 
4600 J2-J24-1 
4610 GOTO4510 
4620 J1=J1+1 
4630 N3=N3-fl 
4640 GOTO 4480 
4650 REM FINISHED 
4660 B2=A:IF B2<0 THEN B2-B 
4670 REM ALL LOANS TAKEN CARE OF 
4680 RETURN 

4690 REM NOW DO YEAR BY YEAR CALCULATION 
4700 DF*-0iTR-0:TP>0:PQ-0iDS«0 

4710 OR - 1+Z(20)/100.! 'DISCOUNT RATE FACTOR 
4720 N%-INT(Z(13) ) : 'LIFE OF INVESTMENT 

4730 DP=Z(1)*(1-Z(15)/100.)/1!(14) : 'STRAIGHT LINE DEPRECIATION 
4740 EY-1+Z(1B)/100.: 'ESCLATION FOR EXPENSES 
4750 EX-'' + Z(17)/100: 'ESCLATION FOR INCOME 
4760 X9-EY(6) 
4770 X8»EQ(12) 
4780 ZT = Z(21)/100. 
4790 EO=-0 

'TOTAL INTEREST PAID 

'TOTAL AFTER TAX SPENDABLE INCOME 

1 TO N% 

RG*EX[ (J-1) : "ADJUSTED GROSS INCOME ESCLATION LAG 



4800 


TI = : 


4810 


SI = : 


4820 


FOR J = 


4830 


RX(J) 


S 




4840 


RF{J) 


4650 


RZ(J) 


4860 


RL(J) 



X9*EY[J: 'FIXED EXPENSES 

X8*EY[J: 'OPERATING EXPENSES 

P1CJ)+P2(J)+P3(J)+P4(J) : 'LOAN PAYMENTS PRINCIPAL 
+ INTEREST 
4870 PQ = PQ+(P2(J)+P4(J))*DR[-J : 'PRESENT VALUE OF PRINCIPAL 
PAYMENTS 

4880 RI(J) - P1{J)+P3{J) I 'INTEREST PAID FOR YEAR 
4890 TI = TI + RI(J) : 'TOTAL INTEREST PAID TO DATE 
4900 RG{J) = RX(J) - RF(J) - RZ(J) - RL(J) - Z(23):'GROSS INC 
CHE 

4910 RT(J) = RX{J) - RF(J) - RZ(J) - RI(J) - DP - Z(23):'TAXA 
BLE INCOME 

4920 IF RT(J) < THEN AL = AL + RT ( J) :GOTO4980 
4930 IF AL > RT(J) THEN RT(J) "^ : AL = AL - RT(J) !GOTO4980 
4940 IF AL> THEN RT(J) - RT (J) -AL: ' ADJUST FOR PREVIOUS LOSS 
4950 TX(J) = ZT*RTCJ) : 'TAX PAID 
4960 RA{J) = RT(J]-TX(J) ; 'AFTER TAX PROFIT 
4970 GOTO 5000 
4980 TX(J)=0 
4990 RA[J)=RT(J) 
5000 CF(J] = RAIJ)+DP 

Pmgtam conunues 



printed or if you decline the printout op- 
tion, you will be asked H you want to 
analyze another Investment. If you do, the 
program returns to page one of the Input 
menu. Note that all the previously entered 
data are still in the program. Thus, If you 
want to look at the same investment but 
with a different interest rate, just change 
the interest rate. You do not need to 
reenter all the data. You may Initiate 
calculations for the next investment at any 
time by pressing G. 

Input 

Data Input Is handled by filling In a five- 
page menu. The information required for 
each of the five pages Is shown In Figs. 1 
through 5. You can move from page to 
page using the < and > keys. The > key 
allows you to go to the next page In the 
menu white the < key returns you to the 
previous page. Note that the > page is the 
only key active for page 1 and the < key is 
the only key active for page 5. 

The particular data Item being entered is 
indicated by the position of the right arrow 
(which is used as a marker) on the CRT. 
You can move around the menu pages by 
using the four arrows on the keyboard. 
Each arrow moves the marker arrow on the 
CRT in the same direction that the arrow 
points. For example, the up arrow moves 
the marker on the CRT up. 

The first page is used to enter data for 
fixed expenses. Replacement reserves are 
the monies that you should set aside each 
month or each year to ensure that there is 
money to replace such items as furnishings 
in the rental property. Basically this is the 
same as an account for depreciation of the 
furnishings of the property. It is shown as a 
separate expense because, unlike depreci- 
ation of the building, depreciation of the fur- 
nishings is a real out-of-pocket expense. It 
is highly probable you will need to replace 
some of the furnishings during the life of 
the investment and money that is set aside 
can handle this. This handling of the depre- 
ciation ot the furnishing may not meet IRS 
standards, but it is realistic and the proper 
way to handle it for analysis purposes. 

The second page of the menu Is for 
operating expenses. These are expenses 
over which you have some control. You 
can get rid of the gardener, for example If 
things get tough. The Items here are 
straightforward and do not require much 
discussion. The main thing to rememtier Is 
to include all expenses. If you have un- 
listed expenses, enter them as other ex- 
penses. Be sure to include an expense for 
management— even If you manage the 
property yourself. 

The third page of the menu Is for enter- 
ing expected Income from rentals. You can 
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TRS-80® SOFTWARE TRS-80® 



MODIL III SOFTWARE 

26-1563 Scrips!* I & III $79.00 

26-1566 Visicalc 1 $83.00 

26-1567 Visicalc 111 $83.00 

26-1552 General Ledger $90.00 

26-1553 Inventory Ctl $90.00 

26-1556 Payroll $180.00 

26-1555 Accts. Receivable $135.00 

26-1554 Accts. Payable $135.00 

26-1558 Bus. Mail List $90.00 

26-2201 Fortran I $90.00 

26-1562 Profile $72.00 

Plus many more 

COLOR SOFTWARE 

26-3050 Chess $36.00 

26-3051 Quaser $36.00 

26-3052 Pinball $27.00 

26-3053 Football $36.00 

26-3055 Checkers $27.00 

26-3057 Dino Wars $36.00 

26-3059 Backgammon $27.00 

26-3152 Typing Tutor $27.00 




MODEL 11 SOFTWARE 

26-4530 Scripsit II $265.00 

26-4511 Visicalc II $265.00 

26-4512 Profile II $162.00 

26-4501 Generol Ledger $180.00 

26-4502 Inventory Mgmt $180.00 

26-4503 Payroll $360.00 

26-4504 Accts Receivable $270.00 

26-4505 Accts Payable $270.00 

26-4507 Mail List II $108.00 

26-4701 Fortran $270.00 

26-4703 Cobol $270.00 

Plus mony more 

POCKET SOFTWARE 

26-3510 Real Estate $22.50 

26-3511 Civil Eng $22.50 

26-3513 Aviation $22.50 

26-3516 Bus. Statistics $18.00 

26-3517 Bus. Financial $18.00 

26-3518 Per. Financial $18.00 

26-3514 Math Drill $13.50 

26-3515 Games $13.50 



ORDER TOLL FREE 1-800-84 1-0860 

CALL US - SAVE MONEY 

We carry the full line of TRS-80 Computers. All TRS-80 software, 
furniture, and accessories sold at discount. We stock most items to 
assure you fast delivery and save you money. 

WRITE FOR FREE CATALOG 



r WiCflQ inflMflGEMEI^T BVSTEIHS. il>IC. " 



No Taxes on Out Of 
State Shipments 

Immediate Shipment 
From Stock on Most Items 



DOWNTOWN PLAZA SHOPPING CENTER 

DEPT. # 4A 
115 C. SECOND AVE. S.W. 
CAIRO, GEORGIA 31728 
(912) 377-7120 Go. Phone No. 



Thousands of 
Satisfied Customers 



VISA And 
Mostercharge Welcomed 



^So* List of AOvwIis^rs on ptgg 402 
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"The discount factor is the minimum return 
that you will accept on your money." 



Program continued 
5010 DF(J) = CF{J)*DRI-J 
5020 TR = TR + or (J) 
5030 DF = DF+DF(J) 

5040 EQ=P2 (J)+P4 (J)+EQ : 'EQUITY ACCUMULATED 

5050 SI = SI + RG(J) - TX(J) : 'TOTAL SPENDABLE INCOME TO DATE 
5060 DS[J) = (RG(J) -TX(J) ) *DR[-J :'DISCOUNED SPENDABLE CASH 
5070 DS = DS + DS(J) : 'ACCUMULATED DISCOUNTED SPENDABLE CASH 
5080 NEXT J 

5090 REM NOW CALCULATE SELLING PRICE 
5100 SP = Z(l)*(l+Z(16)/100.) [Z{13) 

5110 PR=SP»(1-Z(19)/100) :REM SELLING PRICE LESS COST OF SELLING 
5120 AD = DP*Z(13) : 'ACCUMULATED DEPRECIATION 
5130 PR = PR - Z(l) +AD: 'TAXABLE PROFIT ON SALE OF PROPERTY NOTE 

DEPRECIATION ADDED BACK Z(l) PURCHASE PRICE 
5140 TX = PR *Z(22)/100.: 'TAX PAID ON SALE OF PROPERTY 
5150 PZ = PR - TX -AD : 'AFTER TAX PROFIT NOTE DEPRECIATION REHOV 
ED FROM PROFIT 

5160 PD = PZ*DR[-N%: 'DISCOUNTED VALUE OF AFTER TAX PROFIT 
5170 DZ = PD + DF: 'TOTAL PRESENT VALUE OF PROFITS FROM INVESTMEN 
T 

5180 REM 

5190 REM NOW PRINT OUT THE RESULTS 
5200 PRINT 

5210 PRINT"**** RESULTS OF CALCULATIONS ****" 
5220 PRINT STRINGS (54,"=") 

5230 PRINT ■* SUMMARY RESULTS " 

5240 PRINT "SELLING PRICE OF PROPERTY" ;TAB( 40) ;: PRINT USING F(0) 
;SP 

5250 PRINT "OUTSTANDING LOAN BALANCE " ;TAB( 40) ;: PRINT USING F{0) 
;B1+B2 

5260 PRINT"DOWN PAYMENT + PRINCIPAL PAYMENTS " ; TAB( 40 );: PRINT U 
SING F10) ;EQ+Z(2) 
5270 PRINT "TAXABLE PROFIT FROM SALE OF PROPERTY" , -TAB ( 40 );: PRINT 

USING F(0) ;PR 
5280 PRINT "TOTAL AFTER TAX PROFIT FROM RENTS" j TAB ( 40 );: PRINT US 
ING F(0) ;TR 

5290 PRINT "AFTER TAX PROFIT FROM SALE OF PROPERTY" ;TAB( 40) ;: PRI 
NT USING F(0) ;PZ 

5300 PRINT"TOTAL PROFIT FOR INVESTMENT " ;TAB{ 40 );: PRINT USING F( 
) ; PZ + TR 

5310 PRINT"PRESENT VALUE OF PROFITS" ;TAB{ 40 ) f : PRINT USING F(0);D 
Z 

5320 IF DZ < Z[2) THEN PRINT "NOTE PRESENT VALUE OF PROFITS IS L 
ESS THAN YOUR DOWN PAYMENT" ELSE 5340 
5330 PRINT"THIS IS NOT A GOOD INVESTMENT." 

5340 IF AL<0 THEN PRINT"NOTE INVESTMENT DID NOT PAY ITS WAY"!PRI 
NT'YOU WOULD HAVE TO TAKE MONEY FROM SAVINGS" : PRINT"OR BORROW HO 
RE MONEY TO PAY EXPENSES" 

5350 PRINT"DO YOU WANT TO SEE DETAILS?" 
5360 GOSUB 410 
5370 IF yS="N" THEN RETURN 

5380 IF Y$<;>"Y'' THEN PRINT"PLEASE ANSWER Y OR N":GOTO5350 
5390 REM PRINT DETAILS 
5400 CLS 

5410 FOR J = 1 TO N% 
5420 CLS 

5430 PRINT "** RESULTS FOR YEAR ";J!" **" 
5440 PRINT STR1NG5(63, ■=") 

5450 PRINT USING "RENTAL INCOME $#**,»«*<.*» 

";RX(J) 

5460 PRINT USING "FIXED EXPENSES $»»»,itl».*» 

";RF(J) 

5470 PRINT USING "OPERATING EXPENSES $###,lll».## 

";RZ(J) 

5480 PRINT USING "INTEREST PAID $i«t, *«##.«« 

";RI{J) 

5490 PRINT USING "PRINCIPAL PAID $l»»,#ftl.## 

";P2(J)+P4(J) 

5500 PRINT USING "DEPRECIATION ALLOWANCE $«««,«**«.«*' 

;DP 

5510 PRINT USING "TAXABLE INCOME $***,tll*.#t 

" ; HT ( J ) 

5520 PRINT USING "TAX PAID $«*<,<*<*. 11 

";TX(J) 

5530 SFtJ)=RG(J)-TX(J) 

5540 PRINT USING "AFTER TAX PROFIT 5#<<,lttt.#t 

";RA(J) 

Program continuts 



"" Page 4 of 5 "" Investment Data "" 

-Purch»8« Plica ol Property S 0.00 

Arrrount of Down Paymofit -- $ 0.00 

Amount of First Mortgago S 0.00 

I ntersst Rate First Mortgaoe % PerYr-— 0.00% 

Life of First Mortgage Years 

Number of Payments Per Year 

Amount of Second Mortgage S O.OG 

Interest Rate Second Mortgaga V. Yr 0.00% 

Lite of Second Mortgafle Years 

Number of Payments Per Year 

Closing Coats S 0.00 

Other Costs of Buying S 0.00 

< OR > Miy Be Used to Change Pages tl«— Are Active. 

Use G to Start Calculations. Enter Data to Change. 

Fig. 4. Page 4 of Menu. Investment Data. 



enter information for six different rental 
units (one, two and three bedroom fur- 
nished and unfurnished rental units). 

You are asked for two pieces of informa- 
tion for each type of rental unit— the 
numt>er of units and the monthiy rent for 
that type of unit. The computer caiculates 
the total annual rent expected from ail 
units of a given type and the monthly and 
yearly Income for all rental units. 

The program calculates and displays 
the dollar cost of the vacancy allowance 
and the expected rental Income also, tak- 
ing into account the vacancy allowance. 

The fourth page is used to enter Informa- 
tion on the capital costs of the investment. 
Here, you enter Information on the pur- 
chase price of the property, the amount of 
the down payment, the amount of the first 
and second mortgages, the closing cost 
and other costs involved in purchasing 
property. 

The fifth and final page is where you 
enter information on life of the investment, 
life of the property for depreciation, ex- 
pected escalation for rents and expenses, 
expected appreciation of the investment, 
Income tax rates, and the discount factor. 

The discount factor is the minimum 
return that you will accept on your money. 
What you enter here is up to you. In 
general, a good value for the discount rate 
Is the tax-free interest you can earn on a 
risk-free investment. 

Output 

The first two pages of the hard-copy out- 
put are a repeat of the input information In 
the same format as the menus used to 
enter the input Information. If you don't 
believe the calculated output, carefully 
double-check the input data. 

The third page ofthe hard-copy output Is 
a summary of the calculated results. The 
first item on this page is total spendable 
Income from rents. Total spendable in- 
come Is the total Income available to 
spend on your computer or other bad 
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". . . it is possible to have a positive taxable income 
and a negative spendable income. . . " 



habits. Spendable Income is the rental 
receipts minus all the cash outlays you 
made to operate the property. Cash out- 
lays also Include the total loan payment 
(principal and Interest) but do not Include 
depreciation of the property. Principal 
payments are Included as pocltet ex- 
penses because your checkboolt sees the 
total loan cost as the interest payment 
plus the principal payment. Depreciation 
is not Included as pocltet expense be- 
cause you don't write a check for depreci- 
ation. Depreciation Is an expense for tax 
purposes but not an expense (or the pur- 
pose of calculating spendable Income. 

If the total spendable Income Is 
negative, then the rental Income from the 
property was not enough to cover upkeep. 
You need to borrow or withdraw money 
from savings when the spendable Income 
is negative. Note that It Is possible to have 
a positive taxable Income and a negative 
spendable Income or vice versa. 

(Rememtwr: Spendable Income Is what 
goes Into or comes out of your pocket.) 

The second item shown Is the after-tax 
profit from rents. This Is what the IRS says 
you made, or lost, from renting the prop- 
erty. In this case, depreciation (straight 
line is used in the program) Is an allowable 
expense but principal payment Is not. A 
negative after-tax profit from rents can be 
used to shelter Income from other sources 
(check with the IRS to be sure). So a nega- 
tive after-tax profit from rents is not all 
bad— provided, of course, that the spend- 
able Income Is positive. 

The next several Items In the output 
show the capital gain realized by selling 
the property at the end of the Investment 
life. First the selling price, followed by the 
purchase price are shown. Next, your 
equity in the property Is shown (down pay- 
ment plus principal payments). Loan 
balance for the first and second mort- 
gages is shown followed by the Isalance 
after the loans are paid off. The ac- 
cumulated depreciation follows along 
With the cost basis for tax purposes. The 
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' Invest mvnl Data Cont* 



— Uf« of Invvstmsnt Ysvt 

U(« of Prop Fof Dttprsclatlon Y»ars 

P*rC«ntotV«lua[}uatoLini] 0.00% 

EscalatkMi Rat* For PropaMy %/Yr 0.00% 

Etcalatloii Rat* For Rant IncratMS 0.00% 

Eacalalion Rata For Expansa Incrsasaa 7 0.00% 

CoaUot Selling Proparty % of PtIc* 0.00% 

DIacount Rata % 0.00% 

Marginal Incoma Tax Rata % 0.00% 

Tax Rata for Capital Qalna % 0-00% 

< May ba Uaad to Changa Pages U-— Are Active. Use G 
to Start Calculations. Enter Data to Chanoa 

Fig. 5. Page 5 of Menu. Investment Data. 



Program conimued 

5550 PRINT USING "SPENDABLE CASH FLOW $#t I , *#tt . *( " 

;SFCJ) 

5560 PRINT USING "CASH FLOW $ t« f , *ll* . «*" ; 

CF(J) 

5570 PRINT USING "DISCOUNTED CASH FLOW $t l« , I ttl . 1 1" 

:DF{J) 

5580 PRINT STBINGS(63,"=") 

5590 PRINTe896, "PRESS ANY KEY TO SEE MORE " 

5600 G0SUB4ie 

5610 NEXT J 

5620 RETURN 

5630 REH HARD COPY ROUTINE 

5640 CLS 

5650 PRINT"**** HARD COPY ROUTINE ***•" 

5660 PRINT "CHECK TO SEE IF PRINTER IS ON " 

5670 PRINT STRINGS(64,"=") 

5680 LPRINT TAB(5)"REAL ESTATE INVESTMENT ANALYIS" 

5690 LPRINT TAB(5) "VERSION 2.0 BY L. E. SPARKS" 

5700 LPRINT STRING$(70,"-") 

5710 LPRINT TAB{ 5) "PROPERTY IDENTIFICATION ";ZZ$ 

5720 LPRINT STRINGS (70 ,"=" ) 

5730 LPRINT TAB(25) "***•" ;TAB(30) ; "INPUT DATA ****" 

5740 LPRINT STRINGS [70 , " = ") 

5750 LPRINT TAB{5) "* PAGE 1 OF 5 PAGES * FIXED EXPENSES " 

5760 LPRINT STRINGS (70, "=") 

5770 LPRINT TAB{ 5) " ITEM " ; TAB(4a ) ; "S/M0 5/YR- 

5780 LPRINT STRINGS (7 ,"-" ) 

57 90 FOR J = 1 TO 6 

5800 LPRINT TAB( 5) ;: LPRINT USING F(J)jEF(J); 

5810 LPRINT USING " S#*# , I ♦# . «»" j EY ( J) 

5820 NEXT J 

5830 LPRINT STRINGS (70 , "*") 

5840 LPRINT TAB(5) "** PAGE 2 OF 2 * OPERATING EXPENSES •*" 

5850 LPRINT STRINGS (70, "«") 

5860 LPRINT TAB(5)"ITEH " ;TAB ( 40 ) ; "5/M0" ;TAB ( 50) ; "S/YR" 

5870 LPRINT STRINGS (70 ,"=" ) 

5880 FOR J = 1 TO 12 

5890 LPRINT TAB( 5) ;: LPRINT USING F(J+6);E(J); 

590B LPRINT USING " S# »»,###.*#"; E0( J) 

5910 NEXT J 

5920 LPRINT STRINGS (7 ,"*" } 

5930 LPRINT TAB{5}"*** PAGE 3 OF 5 PAGES * INCOME ESTIMATES ***" 

5940 LPRINT STRINGS (70 ,"-" ) 

5950 LPRINT TAB(5)"TYPE OF UNIT" ;TAB (18 ) ; "t OF UNITS" iTAB(30) ; "R 

ENT $/HO";TAB(50) ; "RENT S/YR" 

5960 FOR J = 1 TO NT 

5970 LPRINT TAB ( 5) ;: LPRINT FT ( J ) ; TAB ( 20) ;NU ( J ) ; TAB (30) ; 

5980 LPRINT USING "$l ,###»*#,##" ;R (J) ;: LPRINT TAB(45)j 

5990 LPRINT USING F(0);RY(J) 

6000 NEXT J 

6010 LPRINT TAB{5) ; :LPR1NT USING"VACANCY ALLOWANCE AS % OF RENTS 

- #«.#n";VA 
6020 LPRINT TAB(5);:LPRINT USING"DOLLAR COST OF VACANCY = $###,1 
#l.#*/YR"fVA*RY/100 

6030 LPRINT TAB(5) ; iLPRINT USING 'ADJUSTED GROSS RENTS = S«t*t 
,#««.»#/YR";RG 
6040 LPRINT STRING$(70,"*") 

6050 LPRINT CHRS (140) : 'TOP OF FORM PRINTER CONTROL 
6060 LPRINT " "sLPRINT" ":LPRINT" " 

6070 LPRINT TAB(5)"PAGE 2 OF OUTPUT INPUT DATA CONT " 
6080 LPRINT STRINGS(70,"=") 
6090 LPRINT ■ ■ 

6100 LPRINT TAB(5) "**** PAGE 4 OF 5 PAGES * INVESTMENT INFORHAT 
ION *••*" 

6110 LPRINT STRINGS(70,"-") 
6120 FOR J - 1 TO 12 

6130 LPRINT TAB(5) f :LPRINT USING F(J+18);Z(J) 
6140 NEXT J 

6150 LPRINT STRINGS(70,"*") 
6160 LPRINT TAB(5) "***** PAGE 5 OF 5 PAGES INVESTMENT DATA CONT 

6170 LPRINT STRINGS(70,"=") 

61S0 FOR J =■ 13 TO 22 

6190 LPRINT TAB(5) ! iLPRINT USING F(J+18);Z(J) 

6200 NEXT J 

6210 LPRINT STRING$(70,"*") 

Program cantwues 
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"The investment with the maximum 
present value of spendable Income 
is the best." 



Program conimued 

6220 LPRINT C1!R$(140)!' TOP OF FORM FOR PRINTER 

623B LPRINT " " 

624B LPRINT " " 

6250 LPRINT " " 

6260 LPRINT TAB(5}'PAGE 3 OF OUTPUT " 

6270 LPRINT STRING$(70 , "-") 

6280 LPRINT " " 

6290 REM 

6300 RCH 

6310 REM NOW LPRINT OUT THE RESULTS 

6320 LPRINT 

6330 LPRINT TAB(5)'**** RESULTS OF CALCULATIONS ****" 

6340 LPRINT STRINGS (70 , "=") 

6350 LPRINT " " 

6360 LPRINTTAD(9) " SUMMARY RESULTS 

6370 LPRINT STRINGS (70 , '=") 

63B0 LPRINT TAB(5) "TOTAL SPENDABLE INCOME FORM RENTS ";TAB(44); 

6390 LPRINT USING F(0);SI 

6400 LPRINT TAB(5) "TOTAL AFTERTAX PROFIT FROM RENTS" ;TAB( 44 );: L 

PRINT USING F(0) ;TR 

6410 LPRINT TAB(5) "SELLING PRICE " ;TAB( 44) ;: LPRINT USING F(0)jSP 

6420 LPRINT TAB{ 5) " PURCHASE PRICE" ;TAB ( 44) ;: LPRINT USING F(0);Z{ 

1) 

6430 LPRINT TAB(5)"DOWN PAYMENT + PRINCIPAL PAYMENTS" ;TAB( 44) ;: L 

PRINT USING F(0) ;EQ+Z(2) 

6440 LPRINT TAB( 5) "PRESENT VALUE OF PRINCIPAL PAYMENTS ";TAB(44) 

6450 LPRINT USING F(0);PQ 

6460 LPRINT TAB{ 5) " PRESENT VALUE OF EQUITY ";TAB(44); 

6470 LPRINT USING F(0);Z(2)+PQ 

6480 LPRINT TAB(5) "BALANCE LEFT ON LOANS" lTAB( 44) ;: LPRINT USING 

F(0) ;BltB2 

6490 LPRINT TAB( 5) "SELLING PRICE - LOAN BALANCE " ; TAB ( 44) ; : LPRIN 

T USING F(0) ;SP-B1-B2 

6500 LPRINT TAB(5) "ACCUMULATED DEPRECIATION " j TAB ( 44) :LPRINT US 

I NG F ( ) ; AD 

6510 LPRINT TAB(5)"C0ST BASIS FOR TAX PURPOSES " ;TAB{ 44) :LPRINT 

USING F(0) ;Z(I)-AD 

6520 LPRINT TAB(5)"C0ST BASIS FOR TAX IS PURCHASE PRICE - ACCUHU 

LATED DEPRECIATION" 

6525 LPRINT TAB(5)"C0ST OF SELLING " ;TAB( 44) ;: LPRINT USING F(0)i 

SP*Z(I9)/100 

6530 LPRINT TAB(5) "TAXABLE PROFIT FROM SALE OF PROPERTY" jTAB( 44 

);:LPRINT USING F(0);PR 

6540 LPRINT TAB ( 5 ) "CAPITAL GAINS TAX " ;TAB( 44) ;: LPRINT USING F(0 

) ;TX 

6550 LPRINT TAB(5}"AFTER TAX PROFIT ON SALE" ; TAB ( 4 4 );: LPRINT USI 
NG F ( ) : PZ 

6560 LPRINT TAB ( 5 ) "TOTAL AFTER TAX PROFIT FOR INVESTMENT "jTAB( 
44);:LPRINT USING F(0);PZ t TR 

6570 LPRINT TAB{ 5) "PRESENT VALUE OF PROFIT ON SALE " ;TAB(44) f : LP 
RINT USING F(0) ;PZ*(1+Z(20)/100.) 1-Z(13) 

6580 LPRINT TAB{5) "PRESENT VALUE OF ALL PROFITS" ; TAB( 44) ;: LPRIN 
T USING F(0) ;DZ 

6590 LPRINT TAB( 5) "PRESENT VALUE OF ALL SPENDABLE INCOME" ;TAB( 44 
):LPRINT USING F ( 0) ;DS+PZ* { 1+Z ( 20) /100) I -Z ( 13) 
6600 LPRINT ■ ":LPRINT STRINGS (70 ,"*" ) 
6610 IF DZ> Z(2) THEN 6630 

6620 IF DZ < Z{2) THEN LPRINT TAB{ 5) "NOTE THAT PRESENT VALUE OF 
PROFITS IS LESS THAN YOUR DOWN PAYMENT" iLPRINT TAB(5)"THIS IS N 
OT A GOOD INVESTMENT" 

6630 IF SI<0 THEN LPRINT TAB(5)"1!! NOTE IM THE INVESTMENT DID 
NOT PAY ITS WAY":LPRINT TAB{5) "YOU WOULD HAVE TO TAKE MONEY FRO 
H SAVINGS" :LPRINT TAB(5)"0R BORROW MORE HONEY TO PAY EXPENSES." 
6640 LPRINT STRINGS (7 ,"-" ) 
6650 REM LPRINT DETAILS 
6660 JP = 3 

6670 LPRINT CHRS (140) : 'TOP OF FORM PRINTER CONTROL 
6680 LPRINT" "iLPRINT " ":LPRINT " " 

6690 LPRINT TAB(5)"PAGE "MP+l;" OF OUTPUT DETAILED RESULTS" 
6700 JP-JP+2 
6710 JZ-1 

67 20 FOR J -: 1 TO N% 
6730 JZ=JZ+1 

6740 LPRINT TAB(5) "** RESULTS FOR YEAR ";J;" **" 
6750 LPRINT STRINGS {70 ,"-" ) 

Program continues 



IRS requires that you subtract the ac- 
cumulated depreciation from the pur- 
chase price of the property to calculate the 
cost of the property for tax purposes. The 
taxable capital gain followed by the capital 
gains tax paid are then shown. 

The next four items summarize the total 
profit from the investment. The last Items 
show the present value of the total after- 
tax profit and total spendable profit ex- 
pected from the Investment. These three 
items are very Important. If you are evalu- 
ating more than one investment, the in- 
vestment with the maximum present value 
Of spendable income is the best. 

If you are evaluating one Investment, the 
investment is attractive if the present 
value of the spendable income is greater 
than your down payment and equity. Any 
investment that gives a present value less 
than your down payment and equity Is a 
poor one. A present value less than your 
down payment and equity means that you 
could increase your spendable Income by 
putting money In a risk-free investment 
represented by the discount rate rather 
than from the investment you're analyzing. 

The next several pages of the printed 
output are the year-by-year details of in- 
come and expenses for the rental property. 
The main thing to look at here is the spend- 
able income— if it Is negative, you need to 
borrow or take money from savings to keep 
the investment going. Also note the tax- 
able income. If it is negative, you have a 
tax loss that can be u&ed to shelter other 
incomes (check with the IRS for specifics). 
As long as the spendable income Is posi- 
tive, a negative taxable Income is fine- 
especially if you're in a high tax bracket. 

In the program, tax losses in one year 
are carried forward to offset the next 
year's taxable rental Income. 

The output displayed on the CRT is 
essentially the same as the printed output. 
Some of the items are not displayed, but 
all of the Important information is shown 
both on the CRT and the hard-copy output. 

Calculations 

The calculations performed by the pro- 
gram are straightforward. The program 
calculates the loan payment requirements 
of the first and second mortgages for the 
life of the investment (not the life of the 
loan). The Interest and principal amounts 
are kept separate for later use. 

After the mortgage calculations are 
taken care of, the program does a year-by- 
year calculation of the income and the ex- 
penses of the investment. The expenses 
are escalated using the escalation factor 
and entered as part of the input data. The 
rental income Is also escalated. However, 
the program assumes that rental price in- 
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New software system turns your TRS-80* 
computer into a complete office manager. 



Windham Software's Medical and Dental 
Office Systems economically manage 
financial and diagnostic office ftinctions. 

If you're a physician or a dentist in a group of up to ten 
practitioners, you probably feel like you're spending 
more and more time on things other than caring for your 
patients— like bookkeeping, insurance forms, billing, 
collections, record-keeping. 

If you consider computerization as a good solution, 
you're on the right track. We at Windham Software have 
your answer. We've developed two comprehensive soft- 
ware packages — the MOS-2 for medical offices, and the 
DOS-2 for dental offices— specifically for groups of up to 
ten practitioners. 

The MOS-2 and DOS-2 from Windham Software are 
economical packages — priced at $499— which include 
all the financial functions you've seen in other available 
office management systems. But there's more. 

The MOS-2 and DOS-2 can handle up to 15,000 
patient records— more than any other similar system. Up 
to 500 procedures and 500 diagnoses can be stored and 
retrieved on the MOS-2. And both systems provide a full 
statistical report on procedures performed, and number 
of patients seen per doctor each month. 

Designed ^ecifically for groups of 
up to ten practitioners. 

Some software systems demand a change in your way of 
doing business, or radical programming alterations — 
expensive propositions. The Windham MOS-2 and DOS-2 
were develm)ed by practitioners working with systems 
specialists. They have been using the MOS-2 and DOS-2 
on the Radio Shack' TRS-80 Model II to manage their 
practices for some time. The team also developed the 
Medical Office System being marketed by Radio Shack 
for TRS-80 Models l/III (Cat. No. 26-1568). Their experi- 
ence and understanding have led to the development of 
a system ready to go to work in your office, as you now 
operate it. 

The most comprehensive software 
package for your TRS-80 Model II. 

The past few years have seen numerous microcompu- 
ters mtroduced to the market. We designed the MOS-2 
and DOS-2 to operate on the Radio Shack TRS 80 Model 
II microcomputer The Model II is an economical hard- 
ware system, fast, adaptable, and with a particularly high 
capacity. It is readily available and serviced through 
Radio Shack dealers everywhere. The MOS-2 and DOS-2 
perform more functions and have greater storage capac- 
ity by far than any other medical or dental software 
package available for this hardware. 



IBM and Hewlett-Packard micro systems available soon. 

•TRS-80 and Radio Shack are registered trademarks of Tandy Corp. 

•'S«« Lilt ot Adv9ftia»n on pag9 402 



What Windham Soltware Systems can do 
and how your practice can benefit 

A wide range of financial and management functions 
are performed by the MOS-2 and DOS-2. Billing, account 
aging, payment recording — even insurance forms — are 
all completed automaUcally by the system. Patient rec- 
ords can be quickly and easily sorted to provide meaning- 
ful practice profile information, heretofore nearly 
impossible to obtain. 

The MOS-2 and DOS-2 are so simple to operate — any 
or all ofyour current staff can easily be trained to work 
with a system.Noneedforcomputer language — the sys- 
tem commimicates with simple English Questions and 
answers. Recording errors are virtually eliminated with 
the system's verification system. Since many office func- 
tions are now completed automatically, much time is 
saved which can be devoted to other important tasks in 
your office. Automatic account aging and statement 
generation also improves collections. Each system is 
priced at $499 — a comprehensive, efficient, economical 
office management package that very quickly pays 
for itself 

TXtrn your paperwork over to a specialist — the 
MOS-2 Medical Office System or the DOS-2 Dental Ofiice 
System, from Windham Software. 



H 



ow to order. 



.Orders may be placed by phone or by mail. Call toll- 
free 800-424-4320, Operator 20; or in Washington, D.C. 
202-822-9090, Operator 20. For further information or a 
brochure, you may call 203-456-3550. Or fill out the 
attached coupon and mail it today! 

Windham Software, Inc. 

29/51 Ivanhill St., VVimTnantic,CT 06226 ^312 

Please send me: D MOS-2 Medical Office System 

□ DOS-2 Dental Office System 
I enclose: fl Check D Money Order for $499. 
Please charge 10 my; n MasteK^ard DVISA LI American Express 



Acct.No. 
Exp. Date:. 



Inter.-Bank No. (for Master Charge) 



(Signature Tor rrwlit card u*f) 
(Total: $499 each. Connecticut residents, please add 7Vi % sates tax.) 



Address 



City/SUle/Zip 



Type of Practice 

Q I'm not ready to order, but please send me your brochure. 
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"The present value of all cash flow 
Is calculated using the discount rate 
entered during data entry." 



Program conrinuM} 

6760 LPRINT TAB( 5) j :LPRINT USING "RENTAL INCOME — 

$«»#,«««<. «#";RX(J) 

6770 LPRINT TAB(5) j :LPRINT USING "FIXED EXPENSES ■ 

$***,**tt.lt"iRP(J] 

6780 LPRINT TAB(5) i iLPRINT USING "OPERATING EXPENSES 

$*##,!###. t»-;RZ(J} 

679B LPRINT TAB{5} f iLPRINT USING "INTEREST PAID 

S«««,»li«.#«"lRI(J) 

6600 LPRINT TAB(5);:LPRINT USING "PRINCIPAL PAID 

$•#•,#♦##. #t ";P2( J) +P4( J) 

6810 LPRINT TAB15) ;:LPRIHT USING "SPENDABLE GROSS INCOME 

$t«<,«itt.«<";RG(J) 

6820 IF RG(J)<0 THEN LPRINTTAB( 5) "*** NOTE THAT GROSS INCOME I 

5 NEGATIVE. YOU NEED A LOAN TO KEEP GOING " 

6830 LPRINT TAB( 5) ;: LPRINT USING "TAXABLE INCOME 

S»»»,t##».#»";RT(J) 

6840 IF RT(J) < B THEN LPRINT TAB(5)" *** NOTE YOU HAVE A LOSS F 

OR TAX PURPOSES WHICH CAN SHELTER OTHER INCOME." 

6850 IF RG(J) <0 THEN LPRINT TAB(5)"*** YOU ALSO HAVE A REAL OUT 

OF POCKET LOSS AS NOTED ABOVEIi" 
686b] LPRINT TAB( 5) I : LPRINT USING "DEPRECIATION 

— $««#,#»#». #»";DP 

6870 LPRINT TAB{ 5) ;: LPRINT USING "TAX PAID 

$»»l,«#i».##";TX(J) 

68B0 LPRINT TAB(5) ; jLPRINT USING "AFTER TAX PROFIT 

Sttt,ltlt.4«";RA(J) 

6890 LPRINT TAB{5) i iLPRINT USING "TAXABLE CASH PLO« 

5«»«,««*t.l«";CF(J) 

6900 LPRINT TAB(5);:LPRINT USING "SPENDABLE CASH FLOW 

— -$###,»###.#»" ;RG( J) -TX( J) 

6910 LPRINT TAB(5) ;:LPRINT USING "DISCOOKTED TAXABLE CASH FLOW 

--$«««, ««««.»»";DF(J] 
6920 LPRINT TAB(5) ; :LPRINT USING "DISCOUNTED SPENDABLE CASH FL 
OW $*l4,lt*t.l*';DS(J) 
6930 LPRINT STRINGS (70, "=") 

6940 IF JZ < 3 THEN 6980 ELSE LPRINT CHRS{140) 

6950 LPRINT " "iLPRINT " "iLPRINT "PAGE ")JPj" OF OUTPUT. DETA 
ILED RESULTS CONT " 
6960 LPRINT STRINGS (70 , "-") 
6970 JZ=a!jP=JPtl 

6 9B0 NEXT J 

6990 LPRINT TAB(5) "NOTE. SPENDABLE CASH FLOW IB TAKEN AS THE TOTA 

L INCOME" iLPRINT TAB(5)'MINUS FIXED t OPERATING EXPENSES"; 

7000 LPRINT "MINUS INTEREST i PRINCIPAL PAYMENTS MINUS TAXES." 

7010 LPRINT TAB(5)" CASH FLOW IS TOTAL INCOME MINUS FIXED fc OPE 

RATING EXPENSES MINUS INTEREST' 

7020 LPRINT TAB(5} "MINUS TAXES. NOTE PRINCIPAL PAYMENT IS NOT TA 

X DEDUCTABLE. 

7030 LPRINT STRINGS{7B,"=") 

7040 RETURN 

7 050 RETURN 

7060 REM INSTRUCTION ROUTINE 

7070 PRINT "THIS PROGRAM IS WRITTEN FOR A TRS-80 MODEL 1 WITH" 

7080 PRINT "LEVEL II BASIC AND 32 K RAM." 

7090 PRINT"THIS PROGRAM IS DESIGNED TO CALCULATE THE PRESENT VAL 

UE" 

7100 PRINT"OF THE CASH FLOWS FROM A RENTAL PROPERTY INVESTMENT." 

7110 PRINT'DATA ARE ENTERED BY FILLING IN THE MENUS THAT FOLLOW. 

7120 PRINT"USE > TO GO TO THE NEXT MENU PAGE. USE < TO GO TO THE 

m 

7130 PRINT"PREVIOUS MENU PAGE. USE THE ARROWS TO MOVE AROUND THE 

MENU. 
7140 PRINT'MENU INSTRUCTIONS ARE PRINTED AT THE B0TTOT4 OF EACH P 
AGE." 

7150 PRINT STRINGS(63,"»") 

7160 PRINT" ***** PRESS ANY KEY TO CONTINUE •*•••" 
7170 YS=INKEYS:IF YS-"" THEN 7170 ELSE CLS 
7180 PRINT" ****** INSTRUCTION CONTINUED *♦«*•*■ 
7190 PRINT STRINGS(63,"-") 
7200 PRINT"FOR SOME ITEMS YOU HAVE THE OPTION OF ENTERING COSTS 

7210 PRINT"ON A MONTHLY OR YEARLY BASIS DEPENDING ON THE DATA " 

7220 PRINT'YOU HAVE. HOVE THE ARROW TO THE APPROPIATE COLUMN" 

7230 PRINT"AND ENTER THE DATA. THE COMPUTER WILL CALCULATE THE" 

7240 PRINT'COST THAT YOU DID NOT ENTER. FOR EXAMPLE IF YOU ENTER 

■ 

Progrmm confinuva 



creases are on a yearly basis since rents 
areoftenset by teases which run for a year 
or more. 

Depreciation is caiculated for the 
buiiding only. Straight line depreciation Is 
used. 

The present value of ail cash flow is 
calculated using the discount rate entered 
during data entry. The present value of all 
principal payments Is also calculated. 

The selling price is caiculated by escala- 
ting the purchase price which is specified 
by the input data. The taxable capital gain 
is calculated by subtracting the ac- 
cumulated depreciation from the pur- 
chase price which gives you the cost 
basis. This Is then subtracted from the 
selling price, less the selling costs from 
the basis. The present value of the net, 
after tax profit of the sale, Is then cal- 
culated. Finally the present values, after 
taxes, of cash flow and spendable cash 
flow are calculated. 

Us«r InatructkMis 

in this section, user instructions fol- 
lowed by an example run are presented. 
After you have run the example, you 
should not have any trouble running the 
program. 

Before showing you the Input data 
menu, the program asks you to provide 
identification for the investment you are 
analyzing. You can use any Identification 
scheme you want. The program uses a 
Line input (Disk Basic) so you can enter any 
set of characters you wish tor the identifica- 
tion, if you do not have Disk Basic, change 
Line Input to Input. 

After you have provided the program 
Identification, program operation Is a mat- 
ter of filling In the menu pages and then 
pressing G when you are ready to initiate 
calculations. You select the data Item you 
want to enter by using the > and < keys to 
find the appropriate page and then by 
using the up, down, left, or right arrow to 
move the marker on the CRT to the ap- 
propriate entry point. When you enter 
numbers from the keyboard, you may use 
commas to separate thousands. For exam- 
ple, the number 1(XX) may be entered as 
i.OCX) or 1000. it is easier to keep track of 
things if I enter the commas. 

The key to running the program is filling 
out the menus. (See Fig. 1, page 1 of the 
menu.) There are three columns for the 
page— item, $/M0, and $/YR. The item col- 
umn is the name of the expense, the $/M0 
column Is where you enter the monthly 
cost of the expense (If you know It) and the 
$/YH is where you enter the yearly cost of 
the expense (if you know it). Also note the 
right arrow (— ) in the figure after property 
tax. The right arrow indicates what data 
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will be entered if you want to enter data. 
The right arrow can be moved around the 
menu by using the up arrow (t), the down 
arrow (*), the left arrow i-^) and the right ar- 
row (-*) keys on the keyboard. Thus, if you 
want to enter cost of license, press the 
down arrow key until the right arrow Is to 
the right of license on the CRT. If you wish 
to enter the monthly cost of licenses, 
simpiy enter the appropriate amount and 
press Enter when you are done. Note that 
when you enter the amount, you can use 
commas if you want. When you have 
entered the last digit of the amount, press 
Enter. Now note that the menu is reprinted 
with the amount you entered in the $/M0 
column and also note that the computer 
has calculated the $/YR and fllied In that 
column. Also observe that the computer 
has added the %IMO and SA'R amounts to 
the total fixed expenses. 

If you know the $/YR instead of the 
J/MO, press the right arrow key {— ) to move 
the arrow to the $/YR column. Then enter 
the cost per year. The computer will 
caiculate the monthiy cost for you. 

Data entered on page two are the same 
as for page one. 

Page three requires that you enter infor- 
mation on the number of units and the 
monthly rent per unit. The computer cal- 
culates the yearly rent for you. You can not 
enter the yearly rent. You must enter the 
monthiy rent. Be sure to enter the 
allowance for vacancies. Note that this is 
entered as a percent of the rental income 
and not a dollar amount. The computer will 
calculate the dollar amount for you. Pages 
four and five have one column for data. 

As soon as you press Q, the computer 
starts the calculations. The first thing it 
does is check key Input data to see If they 
are reasonable. If the data are not reason- 
able, the computer prints an error mes- 
sage and asks if you want to review the in- 
put information. Return to the appropriate 
page of the menu, review the data and 
make necessary corrections and then 
press G to begin calculations again. 

If you do not wish to review the input 
data, press N and the computer will do the 
calculations. Sample results for the data 
given in Fig. 1 appear in Fig. 2. 

When you use the program to analyze 
your own Investments, rememtwr that the 
computer calculations are based on the 
data you provided. If those data are bad, so 
Is the calculated result. 

Finally, remember that no matter what 
the computer results say, you are the one 
that hastodecide if the Investment is good 
or bad. Also remember that this proflram 
only considers the time and money factors 
of the Investment. Consideration of risk 
and other factors is totally up to you. ■ 



this program only considers 

the time and money factors 

of the investment." 



Program continued 

7250 PRINT"MONTHLY COST, THE COMPUTER WILL CALCULATE THE YEARLY 

COST," 

7260 PRINT'WHFN YOU HAVE ENTERED ALL THE DATA, PRESS G AND THE" 

7270 PRINT"COMPUTER WILL BEGIN THE CALCULATIONS." 

7280 PRINT'AFTER ALL CALCULATIONS ARE COMPLETED, THE COMPUTER WI 

LL" 

7290 PRINT'DISPLAV A SUMMARY OF THE RESULTS AND ASK If YOU WANT" 

7300 PRINT"TO SEE DETAILS. A HARD COPY OPTION IS ALSO AVAILABLE. 



7310 

7320 

7330 

7340 

7350 

7360 

7370 

73B0 

7390 

7400 

7410 

7420 

7430 

7440 

7450 

7460 

7470 

7460 

7490 

7500 

7510 

7520 

7530 

7540 

7550 

7560 

7570 

7580 

7590 

7600 

7610 

7620 

7630 

7640 

7650 

7660 

7670 

7680 

7690 

7700 

7710 

7720 

7730 

7740 

7759 

7760 

7770 

7780 

7790 

7800 

7810 

7820 

7830 

7840 

7850 

7660 

7870 

7880 

7890 

7900 

7910 

7920 

7930 

7 940 

7950 



PRINT STRING$(63, "=■■) 

PRINT"**** PRESS ANY KEY TO BEGIN **** 
Y5-INKEYS:IF Y$=""THEN 7330 ELSE CLS 
RETURN 

REM INITIALIZE 
F(0)^"$»««,tll»»t.»»" 

F(1)«'PR0PERTV TAX 

F(2)-'INSURANCE 

F (3) -"LICENSE 

F{4) ="REPLACEMENT RESERVES 

F(5)='OTHER FIXED EXPENSES 



SM»,tM«tt.t*" 

$*«»,lt>*»«.tl" 

$»tt, »«*««!.«»" 
$ltt,t>tl*«.lt" 



F(6)="T0TAL FIXED EXPENSES ===-=====$»••, t ♦»«♦•.« f 



S»4t,tt(4.ll" 
$««!, t*«t.l*' 
$«tl,M«4.«t" 
SMI,«ltl.**" 
$«tl,*<<t.>*" 
S*<*,(»**.t«' 

$*ll, t««t 

;«•«, t«ii 

$«tl,t««4.lt" 

$llt,*ltl.«t" 



It' 

tf 



F(7)="JANIT0R 

F(8)="GARDNER 

F{9) = "S0C. SECURITY I. UNKMP 

F[10)-"GARBAGE COLLECTION 

F(11)="UTILITIES 

F(12) ="SUPPLIES 

F(13) -"MAINTENANCE 

F(14)-"ADVERTrSING 

FU5)-"HANAGEHENT 

F(16)="FREE RENT (MGR JANITOR)-- 
F{17)="OTHER OPERATING EXPENSES — 
F(18)="T0TAL OPERATING EXPENSES =»=====$• H ,•*•!»» . I I " 
REM LABELS FOB TYPE OF UNITS 

REM IF YOU HAVE DIFFERENT TYPES OF UINTS CHANGE THE 
REM DATA STATEMENTS BEGINNING AT LINE 7930 

REM BE SURE TO TYPE END FOR THE LAST ITEM IN THE DATA LIST 
REM THE DATA LIST WILL HANDLE UP TO 12 DIFFERENT TYPE 
REM OF UNITS 

REM A TYPE OF UNIT IS FOR EXAMPE 1 BEDROOM FURNISHED 
REM LISTED AS 1 BED FUR 
FOR J = 1 TO 12 
READ FT (J) 
IF FT(J) 
NEXT J 
NT •= J -1 
F(19) 
F[20) 
F(21) 



"END" THEN 7670 



"PURCHASE PRICE OF PROPERTY $ t t » , I t t t «« . *«' 

"AMOUNT OF DCWN PAYMENT S* 1 1 , *<tt 1 1 . ** ' 

"AMOUNT OF FIRST MORTGAGE S« *4 , « tl I** . «< ' 

F(22) - "INTEREST RATE FIRST MORTGAGE % PER YR l».»»S 

F{23) - "LIFE OF FIRST MORTGAGE YEARS «t' 

F(24) » "NUMBER OF PAYMENTS PER YEAR 11' 

F(25) = "AMOUNT OF SECOND MORTGAGE $*«« , *«««#l . I »' 

F{26) » "INTEREST RATE SECOND MORTGAGE % YR »«.»»( 

F(27) = "LIFE OF SECOND MORTGAGE YEARS »!' 

F(26) = "NUMBER OF PAYMENTS PER YEAR ♦*' 

F(29) = "CLOSING COSTS S 1 1 « , 1 1 *(*« . 1 1 ' 

F(30) = "OTHER COSTS OF BUYING $t «* , I **** t . 1 1 ' 

F(31) = "LIFE OF INVESTMENT YEARS !♦' 

F(32) » "LIFE OF PROP FOR DEPRECIATION YEARS #t' 

F(33)« "PER CENT OF VALUE DUE TO LAND »•.»»%' 

F(34) = "ESCLATION RATE FOR PROPERTY %/YR 4«.**%" 

F(35) - "ESCLATION RATE FOR RENT INCREASES ##.#»%" 

F(36) = "ESCLATION RATE FOR EXPENSE INCREASES il.lf%" 

F{37) = "COSTS OF SELLING PROPERTY % OF PRICE #I.H%" 

F(36) = "DISCOUNT RATE % H.#l%" 

F(39) - "MARGINAL INCOME TAX RATE % »«.l»%" 

F(40) ' "TAX RATE FOR CAPITAL GAINS % ##.!*% 

F{41) - "ALLOWANCE FOR VACANCIES AS % OF RENTS — l#.»»%" 

RETURN 

REM ***************** to*******************'* ********* 

REM DATA STATEMENTS FOR TYPE OF APARTMENTS 

DATA 1 BED FUR, 1 BED UNFUR, 2 BED FUR, 2 BED UNFUR 

DATA 3 BED FUR, 3 BED UNFUR, END 
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WINCHESTER 
HARD DISK 

for 

TRS-80™ 

Add 6.3 meg to 38 meg to ycxjr TRS-80 



Integral Winchester- 
Business System Includes: 
48K MODEL III, LDOS, 
DISK lir, 6.3 MEG 
HARD DISK (Internat). 

$4999 




$2895 

6.3 MEGABYTE 

WINCHESTER 

HARD DISK SUBSYSTEM 

With Chassis, PS, LDOS'^ 

9.5 MEG $3395.00 



VR Data Winchester HD 
Subsystem Features: 

• TRSDOS Compatible Operating System 

• State-oMhe-Art Circuitry 

• Full Calibration, Test and Burn-in 

• Up to 4 drive configuration 

• Heavy duty Power supplies 

• Warranty-120 days-parts & labor 

• 115/230 VAC, 50/60 Hz. 



Optional Mod III Conflguratlorw: 




Optional WInctietter Subsystem 




9.5 Meg HD (internal) 


add $500.00 


configurations: 




80tk1 side floppy 


add $120.00 


2x6.3 meg drives 


$4495.00 


80 tk 2 side floppy 


add $240.00 


2x9.5 meg drives 


$5495.00 



TRS-80 and TRSDOS «re trademarks of TANDY Corp. 
LOOS Is t irMlemark of Logical Systems. 
DISK III la a tradsmark of VR DATA. 
Prices Subl«ct to change without notice. 



Phone 800-345-8102 • in PA 215-461-5300 




VR Data Corporation 
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PISK III 



100% Compatible 



Model III Disks 



Complete Business 
System includes: 
48K TRS-SO'" Modei 
III, Disk lir^' 2 Drive 
System, TRSDOS 
and Manuai. 



$1882 




< DISKIIIsingledriweassembly includes one 40 track 
5''<" double density drive, power supply, controller, 
mounimg hardware. ar>d applicable cables. 



DISK III Single 

drive assy^ $599. 
DISK III Two 

drive assy 864. 
DISK III Assy 

w/out drives 435. 
TRSDOS - & 

Manual 21, 

External drives 

(3&4) 299 



00 
GO 
00 
90 
00 



IMMEDIATE DELIVERY - COMPARE AND SAVE 

VR Data's DISK III features: 

• Completely compatible with TRSDOS 

• State-of-the-art circuitry 

• Fully tested, calibrated & burned-in 

• Up to 4 drive configuration 

• Heavy duty linear power supply 

• Warranty 120 days - 100% parts and labor 

• Installation with simple hand tools 

• Optional 80 tk and 2 sided drives 

• READ 40 - Pgm. to read 40 tk. Diskettes 

on 80tk. Drives $25.00 



Peripherals 




Epson MX-80 


500.00 


Epson MX-80 FT 


615.00 


Epson MX-100 


800.00 


Centronics 739 


700.00 


Starwriter25(P) 


1395.00 


RS-232 


95.00 


Lexicon modem 


105.00 



MODEL I/Ill 
EXTERNAL DRIVE 
W/ PS & ENC 

Fully Compatible 
120 day warranty 
Easy installation 
80 tk or 2 sided 

80tk&2sided 



$275 



$419.00 

549.00 



IF YOU DONT SEE IT ADVERTISED CALL US AND ASK FOR IT 

PUBLISHED PRICES REFLECT CASH DISCOUNT 

ALL PRICES ARE SUBJECT TO CHANGE WITHOUT NOTICE. 

TRS-80 and TRSDOS are trademarks of Tandy Corp 

DISK III IS a trademark of VR Data Corp. Dealership available. 



CABLE "VRDATA" • TELEX 



OTHER PRODUCTS 

SUPERBRAIN 64K 
PARALLEL PORT — 

SUPERBRAIN 
DISK&MYSTERIES 
BASIC & MYSTERIES 
NECRibbons{min.6) 
Epson Ribbons 
NEW— 
LDOS Operating 

System 
COMING SOON!! 
Internal MODEM for MOD III 



2990.00 

99.95 
22.50 
29.95 

5.95 
12.50 



149.00 



777 Henderson Boulevard • Folcroft, PA 19032 
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BUSINESS 



A software real estate information library. 



The House Detective 



Program Listing 1 



«« CASSETTE VERSION «« 



10 "PROGRAM BY JOHN COMINIO 

20 'VERSION 1.5 JUNE 17,1981 

30 DEFINTA.C.E-O.Q-Z 

40 CLEAR6800 

30 X=100iDIMH*(X) ,P(X> ,W«<X) . P0» ( X ) . S* < X ) , B ( X) , BA (X ) . T (X) ; H1=X 

60 0NERR0RG0T01410 

70 B=l jL=liV=li X-O 

GO J=0iCLSiPRINTTAB(12) "REAL ESTATE INFORMATION LIBRARY" i PRINT 

90 PRINTTAB(5) '■ (I ) — CREATE FILES" i PRINTTAB (3) " <2t — SEARCH Fl 

LES"jPRINTTAB(5) " (3) — VIEW STORED F ILES" iPRINTTAB <3) " (4) — SA 

VE ON CASSETTE"iPRINTTAB(S) " (5) — LOAD FROM CASSETTE" i PRINTTAB ( 

5>"(6) — CHANGE FILE" i PRINTTAB (5) " (7) — DELETE FILE" 

100 PRINTTAB(5) " (6) — INSERT FILE" i PRINTTAB (S) " (9) — CLEAR FIL 

ES IN MEMORY" 

1 10 R«-""iPRINTa768, "") iPRINTCHR«(30> t iA=0[ INPUT"COMMAND" ; R«i A-V 

AL<R*> I IFA=0THEN110 

120 IFA<10RA>9THEN110 

130 0NAG0TD140, 890,300, 460, 540, 630, 820, 1310, 1590 

140 CLSiPRINTTAB( 10) "FILE NUMBER"jB(" == TO EXIT TYPE '««' "="iP 

RINT 

150 PRINT3128,""! iPRINTCHR* <30) )iH«(B>=""i INPUT "ADDRESS? "(H»(B) 

160 IFLEN(H*(B) ) >55THENH* (B) "LEFT* (H« (B) ,55> J PRINTS 128, " ■' | : PRINT 

CHR*(30) i iPRINT" — TO LONG — SHORTENED AS FOLLOWS ":FDRR-1T05 

00:NEXTRiPRINTai28, " ■' i i PRINTCHR* (30) t t PR I NT "ADDRESS" i :PRINTS136, 

HS(B) I 

170 IFH*(BJ="««"ANDFL=1THEN150 

ISO IFH»(B)=""THEN150 

190 IFH»<B)="«tfTHENH«(B)="":X=l i G0T080 

200 R«-""iPRINT3192. ""i : PRINTCHR« C30) | :P(B)"0t INPUT-PRICE" | R»iP ( 

e)=VAL<R*) ! 1FP(B)=0THEN200 

210 PRINT5256, "") : PRINTCHR* (30) ; iW*(B)'"": INPUT "WATERFRONT (0/R/ 

C/N) ";W»(B) 

220 IFW«(B)="D"ORW»(B)="R"ORW*(B)="C"ORW*(B)-"N"THEN23OELSe210 

230 PRINT3320, ""i i PR INTCHR* < 30) j |PQ*(B)- INPUT"POOL (Y/N>"|Pa« 

<B) 

240 IFPO»(B)="Y"ORP0«(B)="N"THEN25OELSE23O 

230 B«<B)=""i INPUT"LDT SIZE"iS«(B) 

260 R»=""iPRINT3448, ""; iPRINTCHR»(30) ; iB(B)=Oi INPUT"NUMBER OF BE 

DR0DMS"}R»:B<B)=-VAL1R«) : IFB (S) =0THEN260 

270 R«=""!PRINT3512, ""( [PRINTCHR*(30I t !BAIB)=0! INPUT"NUMBER OF B 

ATHROOMS" I R* I BA ( B ) =VAL (R* ) j IFBA ( Bl =0THEN270 

280 IFFL=1THENRETURNELSEFL=0 

290 B=B+liGDT0140 

IFX=0THEN80ELSEX=1 

IFH*(X)'='""THENX'X + 1 

IFX>B-1THEN430 
330 CLSjPRINTTAB( 10) "FILE NUMBER" s Xj "== TD EXIT TYPE '*■ =='-!PRI 
NTTAB<24)"== HIT 'ENTER' TO CONTINUE ==" 
340 PRINT"ADDRESS — ")H«(X) 
350 PRINT"PRICE — ";P(X) 

360 IFLEFT»<W«(X) , 1 ) ="D"THENY*-"OCEAN"ELSeiFLEFT« (W* (X ) , 1)^ 
ENY»«"CANAL"ELSEIFLEFT«(W»(X) , 1 ) ="R"THENY»-"RIVER"ELSEY»="NO" 
370 PRINT"WATERFRONT — "jV* 

380 IFLEFT«(PO»<X) , 1 ) =" Y"THENY«»"YES"ELSEY»="NO" 
390 PR I NT "POOL — " ; Y» 
400 PRlNT"LOT SIZE — "tS»(X) 
410 PRINT-NUMBER OF BEDROOMS — " j B ( X ) 
420 PRINT"NUMBER OF BATHROOMS — " j BA ( X ) 
430 A«-INKEY«i IFA«="«"THEN80 

440 IFA«=-CHR»(13)ANDX<B-ITHENX»X + 1 JG0T0310 

Program coMlnu»s 



300 
310 
320 



'C"TH 



John Comtnio 
626 Tortoise Way 
Satellite Beach, FL 32937 



If you work at a real estate office you 
probably know what a hassle It Is to dig 
through page after page of listings to find 
a house for a customer. I have written a 
program to store, edit and search files con- 
taining specific Information on houses. 

When you finish entering the program 
and run It, the computer will display a 
menu showing all options available to you: 

■ Create files. This allows you to enter 
Information about a house. You can store 
the address, price, waterfront (ocean, 
river, canal or not waterfront), pool (yes or 
no), lot size, number of bedrooms and the 
numt)er of bathrooms (see Table 1). Each 
block of information is considered one file 
and with 16K, 100 files can be maintained 
in memory. 

• Search flies. This allows you to enter 
the specifications of a house you want the 
computer to search for. The specifications 
are as general or specific as you care to 
make them. You are asked for a price 
range, waterfront (yes or no), pool (yes or 
no), number of bedrooms, and number of 
bathrooms. After you have entered the 
desired Information, the computer will 
search for all houses In memory which 
have those qualifications. And if you have 
a printer it will print them out (provided you 
tell it to). 

• View stored files. This option allows 
you to look at all the houses currently in 
memory. To advance the listing, press 
Enter, or to exit, press the # key. This op- 
tion is designed as a check to let you see If 
you have correctly entered the Informa- 
tion. 



160 • 80 Microcomputing. November 1981 



'A compress program removes all spaces so 
it uses less memory and it rur^s faster." 



P(x)— Prtc» 

W$(N)— WBtarfTonl (o/rfcAt) 

POS(x)— Pool (yfn) 

SIM— Lot sfzs 

B(x)— Numb«r ot bedrooms 

BA(x)— Number of bathrooms 

B— Cuffent ftl» number 

H1 — Maximum number of Wva 

0— Dlatrtcl numbar 

Tabia 1. Important Varlabfes. 



• Save on cassette. This wilt save all 
files onto a cassette. You are prompted to 
enter a district number corresponding to 
the houses you have stored tn memory. 

• Load from cassette. This will read In 
files from a cassette that were previously 
saved. It will print the district number for 
that tape on Its Initial read of data. 

• Change file. If you have made a 
mistake while entering Information, this 
option will let you correct It. You are asked 
for the file number you want to change and 
once this Is entered, you may begin to cor- 
rect It. 

• Delete file. It does just that: You enter 
a file number and It erases that file. 
However, If you are viewing files and It 
Jumps from file six to file eight. It la 
because you have deleted file seven. 

• Insert file. This will allow you to Insert 
a file only If you have previously deleted 
that file. This was designed to be used If 
you sell a house and erase Its file. Then 
you can Insert a new file tn its place. If any 
files are open the program will tell you. 

• Clear all flies In memory. This erases alt 
Information that is In memory. When you 
enter this command you will be asked If you 
are sure, a precaution against accidentally 
wiping out ali of your files. If you answer N 
you will return to the menu with all your files 
intact. 

The actual program Is about 7.5K of code, 
although it uses all 16K of memory. The ad- 
ditional 9.5K Is cleared and dimensioned 
for use as file space. If you own a 32K or 
48K system, change lines 30 and 50 to in- 
crease the number of files that can be 
handled In memory at one time. 

You may have noticed there are no 
spaces In the program. I used a compress 
program to remove them all. By doing this 
the program uses less memory and It runs 
taster. I would suggest that you type It in 
without any spaces also. 

There are many error trapping routines 
used throughout the program. If you try to 
view or search the flies while none are In 
memory, you will be returned to the 
menu. ■ 



Program continued 
450 DOTD430 
460 IFB-1THEN80 

470 R»-""i INPUT-DISTRICT NUt1BCR"|Q 
4SO PRINT"SftUING"| 
490 PRINT#-1,0,B 
300 FORT-1TOB+2STEP5 

310 PRINHI-1,H«(T) I ",-(M«(T*l>|", " |H»(T+2» t ", "|P(T) (","|P<T*1)|" 
, "|P<T+2> t",''iW«(Tli'","l*«<T+I>j", •■|H»(T+2)t","|PO»(T) | ", "iPOSCT 
+ l)(",-lPO»(T+2)i",''iB*(T)i","tS»(T+l)(-,"|S«(T+2)i","iB(T)|","| 
B(T+1) ) ", ■'(B(T*-2) I -, "iBACT) I ". "iBAtT*-!) I ", "iBA(T+2) 
320 NEXTT 
S3D GOTOSO 
340 

350 Al>Bi INPUTfl-l.D.B 
560 PRINT-DISK FOR DiaTRICT"|Q 

370 R«-""iPRINT3B96, ""| i PRINTCMR* <30) ii INPUT"CONTINUE" jR«i IFLEFT 
•<R«, 1>-"N"THENB-A1 I QOTOBOELSE IFLEFT* (R«, 1 ) -"V"THEN580ELSEa70 
580 PRINT"L0ADING"| 
590 FORT-ITQBSTEP3 

600 INPUT«-1,H»(T) ,H«(T + 1) ,H«(T + 2) ,P(T) ,P(T-H) ,P(T+2) ,lrt(T) ,W«<T 
+ 1 ) ,W*(T+2> ,PO«<T) ,P0«(T*1) ,PD«(T+2) ,S»(T) ,B« (T4-1 > ,S«(T'»2) ,B<T) , 
B(T+1» .B(T*2J ,BA(T) ,BA(T+1> ,BA(T*2) 
610 NEXTT 
620 X-liGOTDeO 

630 CLSiP«0iPRlNTTAB(Z3) "CHANt^ FILE"iPRINT 

t40 R«-""iPRINTai28, ""I iPRINTCHR»<30) ) I 1NPUT"WHICH FILE DO YOU H 
ANT CHANGED (-1 TO EX IT) " j R*i IFR»-"*'THEN640eLBEP-V«. (R») 
650 IFP<10RP>H1TMEN80 
660 IFH»(P)-""THENaO 
670 IFP>B-1THENB0 
680 BDT01520 

690 ONRG0T07O0, 730, 740, 760, 780, 790,800 

700 R«-""iPRINT3896,""| iPRINTCHR«(30) ) I INPUT"NEW ADDRESS? "(R*!! 
FR«=" "THEN700ELSEH* (P) -R« 

710 IFLEN<H» (P) ) >33THENH«<P)-LeFT«(H«(P) ,55) iPRlNT»B96, ""i i PRINT 
CHR«(30) ( iPRINT" — LINE TO LONG SHORTENED AS FOLLOWS — "iFORR- 
1 T05O0 1 NE XTR I GOTO 1 520 
720 F2"liGaT01520 

730 R*-""iPRINT3B96, " " | i PRINTCHR* (30) J J INPUT"NEW PRICE" | R*» P (P> - 
VflL(R») I IFP(P)=0THEN730ELSEF2-liQDTai520 

740 PRINTaa96, "") iPRINTCHR«(30) I 1 INPUT"WATERFRONT <D/R/C/N) " ( **• ( 
P) 

730 IFW*(P>-"0"DRW«(P)-"R"DRH«(P)-"G"DR««(P)-"N"THEf^F2-liG0T0l32 
0ELSE740 

760 PRINT3896, " " i i PRINTCHR* (30) ) i INPUT"POaL (V/N> "iPD«(P) 
770 IFP0*(P>-"V"DRPD*(P)-"N"THENF2=iiG0T01520ELSE760 
7B0 PRINTa896, ""1 iPRINTCHR«(30) I I 1NPUT"NEW LOT SI ZE" |S«(P> |F3«-1 ■ 
GOT0132O 

790 Rl»=""iPRINTaB96, ""|iPRlNTCHR»(30> I I 1IW»UT"NEW NUMBER OF BEDR 
OaMS"jRl«iB(P)»VAL(Rl«) i IFB(P>-0THEN79OELSEF2-l iBaT01520 
BOO R2«-""iPRINTaB96, •■■•( iPRINTCHR»(30> ; I 1NPUT"NEW NUMBER OF BATH 
ROmS")R2«iBA(P)-VAL(R2«} i IFBA (P) -0T>CN8OOELSEF2-l I BOT01520 
BIO BOTDBO 

S20 CLS(PRINTTAB(15) "DELETE A FILE" 

830 INPUT"UHICH FILE DO YDU WANT DELETED (TYPE -1 TO EXIT)"iP 
840 IFP<10RP>H1THEN80 

850 IFP>B-lTHENPRINT"NO SUCH FILE" J FQRS=lT01000i NEXTiQDTOSO 
860 IFP=B-1THENB-B-1 

870 H«(P>=""iP(P)-OiW«(P)-""iPO»(P)-""iS«(P)-'"'iB<P>-OiBA(P)-0 
880 PRINT"FILE"iPi "DELETED" i FORS-lTOlOOOiNEXTiGOTOBO 
B90 IFH«(U-""THEN80ELSEV-liL"liW-BiDH-0iDL=0iCLSiPRINT"SEARCH T 
HROUGH FILES"iPRINT 
900 FORK-lTOWiTCKl-OiNEXT 
910 PRINT"PRICE RANGE i " 

920 PRINTai92, ""i i PRINTCMR* (30) i i INPUT "FROM" i R»i DL-VAL (R«) I IFDL- 
0THEN920 

930 PRINTa25A, ""|iPRINTCHR«(30) I I INPUT" TO " j R«iDH»VAL (R«) i IFDH- 
0THEN930 

940 IFDL>DHTMEN920 

950 PRlNTa320, ""i i PRINTCHR* (30) j I INPUT" WATERFRONT (Y/N) "|Y« 
960 IFY»-"Y"0RY«-"N"THEN970ELBE930 

970 PRINTa384, ""| i PRINTCHR* (30) ( I INPUT"POOL (V/N) "|V1» 
980 :FY1»-"Y"ORY1«-"N"THEN990ELSE970 

990 PRINTa448. ""I iPRINTCHR*(30) I iPRINT"NUMBER OF BEDROOMSi "ilNP 
UT"FRDM")R«iBl-VAL(R») i 1FB1'-0THEN990 

1000 PRINT3576, " " | i PRINTCHR* (30) ) I INPUT" T0"| R*iB2-VAL (R») I IFB2 
-OTHENIOOO 
1010 IFB1>B2THEN990 
1020 PRINT3640, ""I iPRINTCHR*(30> J iPRINT"NUMBER OF BATHROOMSi " I IN 

Program contlntM 
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lowest prices 
onTRS-SO- 




Model II 64K$ 3298 




Mod9llll16K$$39 




Line Printer VII. $329 



OKIDATA 

EPSON MX-70 
EPSON MX-80 



Mtcroline 80 
Micfoline 82 



$394 

S499 

S369 
$4 79 



$ SAVE 

MOST ORDERS ^ 

SHIPPED WITHIN S 

ONE BUSINESS DAY ^ 

VERBATIM DATALIFETM DISKETTES 
5% inch (box 0*10) $25.95 

a-inch Double- Denstty, $43.95 

* Paymtm Mon«y OOw. Cattm ■ 
Owch. C«ftilMd Chack Paraonal 
Om*a rMura 3 <wMi to daw VISA. 
hIASTEMSiAnOE — Add IS 

WRTTE OR CALL FOR OUR COMPLETE PRICE UST. 

CALL (602) 458-2477 

^m All prices are mail ord*r only ^h 



RAND'S 

2185 E. FRY BLVD. 



^236 



^ SIERRA VISTA, AZ 85635 

. TRS-aO IS a tiadsmarti ol Tandy Coiporatlon 



Program conlinuetS 

PUT*'FROM")R»iBA=VAL(ft«) ; IFBA-0THEN1020 

1030 PRINT376S, ""( tPRINTCHR* (30) ) i INPUT" TO" (R»i BB-VAL (R«) i IFBB 

"0THEN1030 

1040 IFBA>BBTHEN1020 

1050 IFW«<L»-"D"THENZZ*-"V'ELSEIFW«<L)-"R"THENZZ«-"Y"ELBEIFW«<L) 

-"C"THENZZ«-"Y"ELSEZZ»='"N" 

1060 IFP(L) >=DLANDP(L)<-DHANDZZ»-y«ANDPQ»(L)-Vl«ANOB<L) >=-BlANDB< 

L)<-B2ANDBA(L) >-BAANDBA (LX-BBTHEN1080 

1070 L-L+li IFL>WTHEN1090ELSE1050 

1080 T(V)-LiV»V*liL-L+liGQT01050 

1O90 CLSt PRINT "SEARCH COMPLETED"! IF (V-1 ) =0THENI I»--'ARE" i IH»-"HOU 

SES" 

1 100 IF (V-1 ) >1THENI I«="ARE" i lH«="HOUSES" 

1110 IF<V-l)=lTHENII«="IS"i IH«- "HOUSE" 

1120 PRINT"THERE " i H«j (V-l ) ( IH*( " WITH THOSE SPECIFICATIONS" 

1 130 IFT ( 1 ) -OTHENFORM-lTQAOOOt NEXTi BOTOaOELSEl 140 

1140 R«-""i PRINTS 128. ""j i PRINTCHR* <30) j i INPUT"READY (Y/N) ")R»iR« 

-LEF T» ( R* , 1 ) I 1 FR«- " N " THEN80ELSE I FR«» " Y " THEN 1 1 50ELSE 1 1 40 

1150 CLS 

lltO FORU-lTQV-1 

1170 PRINT"HOUSE"lU) "OUT OF" t (V-1 ) i PRINT"PRESS 'ENTER' TO CONTIN 

UE"» PRINT 

IIBO PR1NT"ADDRESS — "jH»(TlU)) 

1190 PRINT"PRICE — "(PtTtUJ) 

1200 IFW«(T(U) )=-'0"THENY«="OCEAN"ELSEIFW»(T(U) ) ="R"THENY*-"R1VER 

"ELSEIFW«(T{U) )="C"THENV*-="CANAL"ELSEV*»"NO" 

1210 PRINT-WATERFRONT POPERTY — " 1 Y« 

1220 IFPO»(TtU) >="Y"THENY«""YES"ELSEY««"NO" 

1230 PRINT-POOL — " t Y« 

1240 PRINT'*LOT SIZE — ";S*(T(U)) 

1250 PRINT"NUMBER OF BEDROOMS — "jBCTIU)) 

12tO PRINT"NUMBER OF BATHROOMS — "(BA<T(U)) 

1270 A*"lNKEY«t IFA«-""THEN1270 

1280 IFA»=CHR*< 13) THENCLSi NEXTUELSE1270 

1290 PRINTaO, "" I iPRINTCHR*(30) ( : INPUT"DO YOU WANT A PRINTOUT (Y/ 



N) " 

1300 

290 

1310 

1320 

1330 

1340 

1350 



Pl« 
IFLEFTt(Pl», U^ 



'■N"THENeOELSEIFLEFT«<Pl*,l)-"Y"THENl420ELSEl 



IFB-l-0THEN8OELSECLSiPRINTTAB(15> "INSERT FlLE"iPRINT 

PR1NT"DPEN FILESi " ; i FDRC=1T0B-1 

IFH«(C)=""THENPRlNTCi i J=l 

NEXTC 

IFC«BANDJ=OTHENPRINT"N0NE OPEN" i F0RC=lT0l500iNEXTCi00T080 
1360 PRINT 

1370 INPUT"WHICH FILE NUMBER (-1 TO EXIT)"(P 
1380 IFP<10RP>H1THEN80 
1390 IFP>B-1THEN80 

1400 IFH«(P)-"'THENPRINTai92.CHR»(30) ( l FL-1 »D-Bi B=P; BOSUB150» B-Q 
I FL-Oi GOTOeOELSEBO 

1410 PRINT3B32,CHR«(30) I !F0RC"lTD5!PRINTa832, "«» ERROR «*"!FORCl 
=lT0150iNEXTCliPRINTaa32,CHR«(30) j i FORCl-lTOlSOiNEXTCl » NEXTCi RES 
UME80 

1420 IFPEEK(143I2) >127THENPRINT"PRINTER NOT READY" i B0T01290ELSEP 
RINTTAB<25) "PRINTING" 

1430 LPRI NT "FORMAT f (ADDRESS) (PRICE) (WATERFRONT) (POOL) (L 
OT SIZE) <» OF BEDROOMS) (tt OF BATHROOMS)" 
1440 LPRINTSTRING*(64, "-") 
1450 FQRU=1T0V-1 
1460 IFU«(T(U> )="0"THENY»= 
"EL3eiFW«(T(U) )="C"THENY»=- 
1470 IFPO»<T (U) )-"VTHENYl«-' 
1480 LPRINT" ("jH*(T(U) ) i ") 
",Y«)") "tiLPRINT" ("|Yl«5-t 
T" ('■(B(T(U) ) ) "> "! : LPRINT" C 
1490 LPRINT5TR1NG»(64, "-") 
1500 NEXTU 
1510 G0T080 

1520 CLSiPRINTTAB(20) "CHANGE FILE" ! PRINTi IFPO« (P> "■' VTHENai«=."YE 
S"ELSEai«-"NO" 

1530 IFW«(P)-"D"THENQ»-"OCEAN"ELSEIFW»(P) 
FW« ( P ) = " C " THEND«= " CANAL " ELSEO»= " NO " 

1540 R»=CHR«(94)+" "!PRINT"{1) ~ ADDRESS " j R»( H» (P) : PRINT" (2) - 
- PRICE "!R«(P(P) iPRINT" (3) — WATERFRONT " t R«; Q«i PRINT" <4) — P 
DDL ■■}R«}D1«:PRINT" (5) — LOT SIZE " , R*t S» tP) i PRINT" (6) — NUMBE 
R OF BEDROOMS " j B*i B (P) I PRINT" (7) ~ NUMBER DF BATHR0CM1S 'jRttBA 
(P) 

1330 IFF2-1THEN1370 

1560 A«-""iPRINT3896."")iPRINTCHR»(30>tilNPUT"WHICH NUMBER (l-7( 
"lA»i IFA*=""THEN1560eLSER=-VAL(A») i IFR< 10RR>7THEN1560ELSE690 
1570 F2=0:A*=" " i PRINT3B96. "";: PRINTCHR* (30) j i INPUT"nDRE CORRECT 
IONS (Y/N)"jA»:A»='LEFT«(A«, ni IFA»-" "THEN1570 
1 580 I FA*= " Y " THEN 1 560ELSE I FA«= " N" THENSOELSE 1 570 
1590 A»-'">PRINT3768,""uPRlNTCHR»(30)iiINPUT"ARE YOU SURE (Y/N) 

"tA»; AS-LEFT* (ft«. 1) 

1600 lFA«='N"THENaOELSEIFA«-"Y"TMEN1610ELSE1590 

1610 F0RR»1T0X 

1620 H*(R)=""!P<R)=OiW»(R)-""iPO«(R)=""iS»(R>-""iB<R)-OtBA(R)-0 

1630 NEXTRiB=l :L=i: V-l: X=0!GOTDBO 



■OCEAN"ELSEIFW»(T(U) ) ""R"THENY»-"RIVER 
' CANAL " ELSEY»- " NOT WATERFRONT " 
■YES POaL"ELSEYl»="NO POOL" 
'} ! LPRINT" <";P(T<U) ) ) ") "l i LPRINT" ( 
"I I LPRINT" <"jS*(T(U) ) t ") "; I LPRI N 
■;BA(T(U) ) I ") 



■ -R-THENQ*- ■RIVER"ELSEI 
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Scanned by Ira Goldklang - www.trs-80.CGm 



Tired of typing in all 
your programs? 




Save time 
and money! 



I) 



LuaD 80 



ALL THE 

MAJOR PROGRAM 
LISTINGS FROM 
80 MICROCOMPUTING 
ON CASSETTE 

EACH MONTH 

$9.95 



SAVE HOURS OF 
TYPING & AGGRAVATION 



'*Frankly, after hundreds of hours of fnistratton, I 
ttMori ever try to keyboard a published program 
inevitably, l mess it up when I keyboard it. Who needs Ihe 
aooravation? 

'TMs Is why I started a new sertea cl cassettes called 
LOAD-M Each cassette will haw program dumps of the 
Kstir^s m an issue of dO Microcomputing. These listings 
are direct from the auttiors and tested by the dO 
kUcfOComputing slal). All but Ihe very short program 
listings will be on the LOAD-SO cassettes Thus, you will be 
able to saw hours of inputting programs and even more of 
debuggir>g your Keyboard errors " 



Wayne Green 




The LOAD-60 casselle is simply the program lislmgs 

that appear m the articles m 80 Mtcrocompuung. It was 
created to sa/eyou the time involved in typmg the listings 
yourtell. Successful loading of the programs depends en 
reading the documentation m the articles if you have your 
current magazl'^eat hand when you load the casselle, you 
Should have no dtlllculty. If you still have protjiems. please 
return Ihe tape for replacement 

LOA040 began with the April 1981 issue. To order bacK 
issues, look for the back issue advertisement In this 
magazine or ask your local dealer. 

To order LOAD-M fill In the attached card and we aHI 
send you your LOAD-M casselle for the major orograms in 
this Issue II Ihe card is missing, liil m the coupon be'OA (a 
photocopy IS acceptable] and mail to. LOAD-M. BO Pine 
Sireet, Peterborough, NH 03458 



Yes, I want the November LOAD-80 

U Check/Money Order ($9.95 plus $1. 50 p&h) . I MasterCard G VISA J Am. Ex. 



M«ll 



Name: 



I 
I 

I Addra3S:_ 

I City: 

I Signature: 

I 



State:. 



Zip. 



Card» 



.Exp. Date: 



lO*0«'B^tumll4C1rirMBu>^««ntSof^Mre atlvlalonaiWAVHEOneMiHC atlP>rMSl(MLPtHrtlorovgrt.NHCM9S-Tbet«hinowatT8rii)t I 

•■cr*t**<) «' iT^oliM) I^a1 lOWaO w<ii do «fvl^WTg oirwi' \r\tn tint y<M CVPtr'S I 



INTERFACE 



Centronics . . . shake hands with the Shack. 



A Driven Printer 



Wayne Mueller 
130 Sunset Court 
Roswelt, GA 30075 



U ecently my Selectric printer was stolen. 
Since I need a letter-quality printer, I 
thought about another Selectric. But then I 
thought about how slow, noisy, and how 
much the old Selectric needed to be read- 
justed. I finally settled on an NEC 5530 Spin- 
writer. I knew it was faster, quieter and more 
reliable. And since It had a Centronics inter- 
face, I could "plug in and print," and forget 
about those nuisance driver routines I had 
to use with the Selectric. 

But after loading Basic and typing in a 
few lines of LPRINTs, all the lines printed on 
top of each other! When all else fails, read 
the manual. Sure enough, the manual says 
that when a carriage return Is received, the 
carriage returns. . . nothing about a trailing 



line feed. Well, so much for my belief that no 
drivers were needed. 

There are actually some advantages to a 
nonautomatic line feed following a carriage 
return. For example, Software Concepts 
has a slick mail processing system that 
supports both underscores and bold-face 
characters on such printers, and I was 
tempted to just leave well enough alone. 
But then I realized that Scripsit's line feed 
and paragraph spacing was off by one, that 
I could not get a printout from the editor/as- 
sembler, and that nearly all of my Basic pro- 
grams were going to have to be reworked. 

At this point, it started to look a lot easier 
to write a little driver routine to add a line 
feed after each carriage return. It did turn 
out that I needed more than one driver. This 
article may benefit a few others who find 
themselves in the same fix. 

Look at Program Listing 1. The TRS-80 
has several device control blocks (DCBs). 
The DCB which starts at 4025H is normally 







00190 


;GENERAL HI-MEM 


NEC SPINWRITER DRIVER 






00110 


;WITH 


SCREEN DISPLAY INCLUDED j 


4467 




03120 


DISPLA 


EQU 


44e7H 


;DOS DISPLAY CALL 


4025 




00130 




ORG 


4e25H 


;FIX PRINTER DCB TO: 


4025 


02 


00140 




DEFB 


2 


! -LOOK LIKE A PRINTER 


4026 


68FF 


00150 




DEFW 


BUSY 


; -HOLD NEW DRIVER ADDRESS 


4049 




00160 




ORG 


4049K 


J SET MEMORY PROTECT 


4049 


66FF 


00170 




DEFW 


BL)SY-2 


; TO JUST BELOW THIS DRIVER 


FF50 




001B0 
00190 
00200 




ORG 


aFF50H 


;*• OR USE WHATEVER OTHER START 

; LOCATION IS BIGHT 

J FOR YOUR SIZE MACHINE *• 


FF50 


E5 


00210 


START 


PUSH 


HL 


iSAVE HL 


FF51 


2159FF 


00220 




LD 


HL.HSG 


;POINT TO START OF MESSAGE 


FF54 


c:d6744 


00230 




CALL 


DISPLA 


;CALL DOS TO DISPLAY MESSAGE 


FF57 


El 


00240 




POP 


HL 


J RESTORE HL 


FF58 


C9 


00250 




BET 




;AND RETURN 






00260 


;0R JUMP TO DOS 


(4e2DH) 


IF YOU PREFER 


FF59 


4E 


00270 


MSG 


DEFM 


'NEC DRIVER ON' ; TEXT OF DISPLAY | 


FF66 


0D 


00280 




DEFB 


0DH 


iCARRIAGE RETUPN AFTER MSG 


FF67 


00 


00290 




□ EFB 





I END OF MESSAGE 


FF6e 


3AE837 


00300 


BUEV 


LD 


A,(37E8H) ;GET PRINTER STATUS | 


FF6B 


E6F0 


00310 




AND 


0F0H 


jGET UPPER 


FF6D 


FE30 


00320 




CP 


30K 


; PART OF STATUS WORD 


FF6F 


20F7 


00330 




JR 


NZ,BUSY 


J KEEP TRYING IF NOT READY 


FF71 


79 


00340 




U> 


A,C 


jGET CHARACTER TO PRINT 


FF72 


32E837 


00350 




LD 


(37EeH) 


A ! CHARACTER TO PRINTER 


FF75 


79 


00360 




LD 


A,C 


;TAKE ANOTHER LX)OK AT CHARACTER 


FF76 


FEeo 


00370 




CP 


0DH 


tIS IT CARRIAGE RETURN? 


FF78 


C0 


003B0 




RET 


NZ 


lIF NOT, WE'RE DONE 


FF79 


0£eA 


00390 




LD 


C,0AH 


; IF SO, LOAD LINE FEED, 


FF7B 


18EB 


00400 




JR 


BUSY 


; AND OUTPUT IT 


FF50 




00410 




END 


START 


;AUTO START 










Program Listing 


; 



used for the tine printer. So, what we are do- 
ing at lines 130-150 is telling the machine 
that we have a line printer (line 140), and the 
address of the driver routine Is labeled 
Busy. The assembler can determine the cor- 
rect numeric address from the label. At 
lines 160-170, we are protecting some high 
memory for this driver. The TRS-80 stores 
the end of unprotected memory in 4049H. 
What we told the assembler here was that 
we wanted unprotected memory to end two 
words less than Busy. Again, the assembler 
is smart enough to do the arithmetic to find 
the actual address. Notice that we have not 
moved any data yet. If just this part were 
loaded, that would be sufficient to tell the 
machine to expect a different printer -driver 
address, and to protect high memory. 

The Driver 

The ORG at line 180 says we want the 
driver to start at FF50H, or 65360 decimal. If 
you want it somewhere else, or have a 
smaller machine, use some other value. For 
example, 7F50H (32592 decimal) would 
work well on a 16K machine. The printer 
port on the TRS-80 is mapped to 37E8H- 
Line 300 gives us the printer status. The 
printer returns to its state of readiness to re- 
ceive characters to this address. Between 
lines 300-330, we are looking for a printer 
ready signal. If it is not ready, we keep loop- 
ing back to Busy at line 300. When we get to 
line 340, the printer is ready to accept a 
character. 

The next character comes to us in reg- 
ister C, just because that is where the 
machine puts it. So we load it into register A 
at 340, and send it to the printer port at 
line 350, 

Up to here we have not done anything dif- 
ferently from the standard ROM driver. But 
now is when we take care of the needed line 
feed. The last character is still in register C, 
so we load it again at line 360, and see if it 
was a carriage return at line 370, If not. we 
are done, and we return control to whatever 
routine called us. If it was a carriage return, 
we load a line feed into register C at line 
390, and jump back to the start of the driver 
(Busy) at line 400. This driver takes care of 
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"/ find it disquieting when 
I run a program, and nothing happens. . . " 



almost all of our printing needs. 

Program Listing 2 

This is a bare bones, minimum routine. 
Specifically, I find it somewhat disquieting 
when I run a program, and nothing happens 
on the screen to confirm that it is working. 
Program Listing 2, Is similar to Listing 1 and 
also displays a message to let us know it is 
working. The line numbers are the same as 
Listing 1, but we have added a few things In 
the empty spaces. 

Notice line 120. There is a label called 
Display, which refers to a DOS routine at 
4467H that displays text. Also notice that 
lines 210-290 are added. Lines 270-290 
define the message, white 210-250 do the 
work. The text of the message "NEC Driver 
On" is at line 270, a following carriage 
return is at line 280, and the zero at line 290 
simply tells DOS that this Is the end of the 
message. 

Now let's see how It Is displayed. The HL 
register pair must point to the start of the 
message text, but HL may be in use for 
something else. So, we save HL at line 210 
by Pushing it onto the stack, point it to the 
beginning of the message at line 220, and 
call Display at line 230 to display the text on 
the screen. Finally, we restore HL to its pre- 
vious condition by POPping it off the stack 
at line 240, and return to the calling routine. 
The only other change is at line 410. We 
have added the label Start after the end to 
tell the loader that we want to Jump to Start 
automatically after loading the routine. 
These changes do not affect the printer 
driver, but now I can see something happen- 
ing on the screen when I load the routine. 

Other Annoyances 

This takes care of almost all my printer 
driver needs but there are still a few annoy- 
ances that need attention. The first is Scrip- 
sit's behavior. Scripsit works fine until near- 
ly all of the text buffer is full. Then it pro- 
ceeds to overwrite my driver with text. 
Worse, it does not tell me until I try to print, 
which results in a spectacular crash, and a 
machine lockup. 

The second item is those Basic programs 
that already protect high memory, and use 
the protected space for some other ma- 
chine-language routine. Some of these 
other routines t>ehave nicely if you just load 
the printer driver first, and the other routine 
just atxive it. 8ut some of them use all of 
protected memory for their own purposes, 
and again overwrite my driver with unplea- 
sant results. 

Fortunately, Radio Shack offers some 
patch code that modifies Scripsit to work 
with a variety of non-Radio Shack printers. 

Program Listing 3 js mostly Radio 
Shack's, with my driver embedded. Not all 



of the Radio Shack code was used, because 
not all was needed. A few things in the 
patch code are worth noting. We see at 
lines 310-320, that Scripsit does not use the 
value stored at 4049H for memory protect. 
Rather, whatever you want to declare as 
protected memory must be stored In 5268H. 
This is why Scripsit used to overwrite my 
driver. 

My driver runs from lines 560-660, and it 
looks a bit different from what we have 
discussed so far. The first thing we do at 



line 560 is output a character from the A 
register. This is because Scripsit has 
already put the character in A, and checked 
to make sure the printer is ready. From here 
on, things start to look familiar. That is, we 
check to see if the last character was a car- 
riage return, and output a line feed if it was. 
At line 620, the printer status checks again 
for line feed, so that Scripsit knows we want 
to print an extra character, and will check to 
see If the printer is ready. 
Notice line 710. If you do not have lower- 







nm 


(GENERAL HI -MEM 


NEC SPINWRITER DRIVER 


4B25 




OBG 


4025H 


rFIX PRINTER DCB TO: 


4025 


02 


00140 


OEFB 


2 


; -LOOK LIKE A PRINTER 


4026 


50FF 


00150 


DEFW 


BUSY 


) -HOLD NEW DRIVER ADDRESS 


4049 




00160 


OBG 


4049H 


jSET MEMORY PROTECT 


4049 


4EFP 


00170 


DEFW 


BUSY-2 


• TO JUST BELOW THIS DRIVER 


PFSfl 




00190 
00190 
00200 


ORG 


0FF50H 


;*• OR USE WHATEVER OTHER START 

; LOCATION IS RIGHT 

; FOR YOUR SIZE MACHINE •• 


FFSfl 


3AE837 


00300 


BUSY LD 


A,(37E8H) IGET PRINTER STATUS | 


FF53 


E6Fe 


0«310 


AND 


0FaH 


;GET UPPER 


FF55 


FE30 


00320 


CP 


30H 


J PART OF STATUS WORD 


FF57 


20F7 


00338 


JB 


NZ,BUSY 


; KEEP TRYING IF NOT READY 


FF59 


79 


00340 


LO 


A,C 


;GET CHARACTER TO PRINT 


PF5A 


32Ee37 


00350 


LD 


(37E8H) 


A ; CHARACTER TO PRINTER 


FF5D 


79 


00360 


LD 


A,C 


I TAKE ANOTHER LOOK AT CHARACTER 


FF5E 


FEflD 


00370 


CP 


0DH 


;IS IT CARRIAGE RETURN? 


PF60 


C0 


00380 


BET 


NZ 


;IF NOT, WE'RE DONE 


FF61 


eC0A 


00390 


LD 


C,0AH 


; IF SO, LOAD LINE FEED, 


FF63 


ISEB 


00400 


JR 


BUSY 


; AND OUTPUT IT 


0000 




00410 


END 












Program Listing 2 



Program Listing 3 







fltlOB 






00110 






00120 






00130 






00140 






00150 


FF60 




00160 


FF60 




00170 


FP60 


ES 


001B0 


FF61 


21E3FF 


00190 


FF64 


34 


00200 


FP65 


35 


00210 


PF66 


El 


00220 


FF67 


2038 


00230 


FF69 


11E4PF 


00240 


FF6C 


CD3044 


00250 


FF6F 


CD2844 


00260 


FF72 


3E01 


00270 


PP74 


32E3FF 


00260 


PF77 


3E21 


00290 


PP79 


326752 


00300 


FP7C 


215FFF 


00310 


FF7F 


226 852 


00320 


FFBl 


323F66 


00340 


FP84 


3ECD 


00350 


FF86 


329E7A 


00360 


FFe9 


32977A 


00370 


FFBC 


21DFPF 


00380 


FF8F 


224066 


00390 


FF92 


216BFF 


00400 


FF95 


229F7A 


00410 


FP98 


229B7A 


00420 


FF9B 


C30052 


00430 


PP9E 


ED43EDFF 00440 


FFA2 


ED53EFFF 00450 


FFA6 


22F1FF 


00460 


FFA9 


ED73F3FF 00470 


FFAD 


32F5FP 


00480 



ITHIS ROUTINE LOADS AND MODIFIES SCRIPSIT TO PERMIT 
[USE OF YOUR OWN PRINTER DRIVER 

I IT SHOULD BE LOCATED IN HIGH RAM. THIS EXAMPLE IS 
jLDCATED AT 0FF60H FOR A 65 K MACHINE 



ORG 

EQU 

PUSH 

LD 

INC 

DEC 

POP 

JB 

LD 

CALL 

CALL 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

JP 

LD 

LD 

LD 

LD 

LD 



9FP60H 

0FF60H 

HL 

HL, SWITCH 

(BL) 

(HL) 

HL 

NZ, PATCH 

DE,DCBADR 

LOAD 

CLOSE 

A,1 

(SWITCH) ,A 

A,21H 
[5267HJ ,A 

HL,PARLEL-1 
(S26eK) ,HL 
1663FH) ,A 
A,0CDH 
(7A9EH) ,A 
(7A97H) ,A 
HL,INIT 
(6640H) ,HL 
HL.PARLEL 
[7A9FH) ,RL 
(7A9BH) ,UL 
5200H 
(SAVl) ,BC 
[5AV2) ,DE 
(SAV3) ,HL 
(SAV4) ,SP 
(SAV5) .A 



J ENTRY ADDRESS 

J TEST FOR 1ST CALL 



jGO IF NOT 1ST CALL 
tDE-> PILE SPEC 
jOPEN AND LOAD SCRIPSIT 
J CLOSE COMMAND FILE 
,SET SWITCH TO SKIP THIS 
jCODE ON FUTURE CALLS 
iPATCH SCRIPSIT 
r TO PROTECT 
I THIS DRIVER 

;YDUR INIT. ROUTINE 
fPATCH SCRIPSIT TO BUN 
; YOUR DRIVER ROUTINE 

jADD OF INITIALIZATION 
; ROUTINE 

J ADDRESS OF YOUR DRIVER 
J ROUTINE 

; ENTER SCRIPSIT 

I SAVE THE REGISTERS 



P'ogran conunuecf 



80 Microcomputing, November 1981 • 165 



*'This means that we have to 

change a few pointers so 

List and Edit know where to look 



ft 



Program continued 










FFBe 


CDC6FF 


90490 




CALL 


OUTPUT 


FFB3 


ED4BEDFF 


00500 




LD 


liC,(SAVl) ; REPLACE THE REGISTERS 


FFB7 


ED5BEFFF 


90510 




LD 


DE, (SAV2) 


FPBB 


2AF1FF 


00520 




LD 


HL, (SAV3) 


FFBE 


ED7BF3FF 


00530 




LD 


SP, (SAV4) 


FFC2 


3AP5PF 


00540 




LD 


A, ISAV5} 


FPC5 


C9 


00550 




RET 




FFC6 


32E837 


00560 


OUTPUT 


LD 


(37E8H) ,A fOOTPUT CHARACTER 






00570 


; PRINTER STATUS 


IS OK — SCRIPSIT CHECKED FIRST 


FFC9 


3AF5FF 


00580 




LD 


A,(SAV5) jTAKE ANOTHER LOOK 


FFCC 


FE0D 


00590 




CP 


0DH ;I£ IT CARRIAGE RETURN? 


FFCE 


C0 


00600 




RET 


NZ ;IF NOT WE'RE DONE 


FFCF 


BEBA 


00610 




LD 


C,0AH jPUT LINE FEED IN C, 


FFDl 


3AEB37 


00620 


BUSYl 


LD 


A,(37EBH) ;GET PRINTER STATUS 


FFD4 


E6Fa 


00630 




AND 


0F0H ;CHECK UPPER 


FFD6 


FE30 


00640 




CP 


30H [ PART OF STATUS BYTE 


FFD8 


20F7 


00650 




JR 


NZ, BUSYl ;IF BUSY KEEP TRYING 


FPDA 


79 


00660 




LD 


A,C jPRINTER READY-GET LF IN A, 


FFDB 


32E837 


00670 




LD 


(37EBH),A ;AND OUTPUT IT. 


FFDE 


C9 


00680 




RET 


;ALL DONE — BACK TO SCRIPSIT 


FFDF 


C9 


00690 


INIT 


RET 


I RETURN 


FFE0 


00 


00700 


SWITCH 


DEFB 


; BUCKET TO STASH SWITCH 


FFEl 


53 


0B710 


DCBADR 


DEFM 


'SCRIPSIT/LC J OR USE 'SCRIPSIT/UC ' 


FFEC 


03 


00720 
00730 


I 


DEFB 


3 jMARK END OF FILESPEC 


4430 




00740 


LOAD 


EQU 


4430H ;CALL DOS TO LOAD FILE 


442S 




00750 

00760 


CLOSE 


EQU 


4428H (CALL DOS TO CLOSE FILE 


FEED 


0000 


00770 


SAVl 


DEFW 


0000 ;REG1STER SAVE AREA 


FFEF 


0000 


00780 


SAV2 


DEFW 


0000 


FFFl 


0B00 


00790 


SAV3 


DEFW 


0000 


FFF3 


0000 


00600 


SAV4 


DEFW 


0000 


FFF5 


00 


00810 


EAVS 


DEFB 


00 


FF60 




00620 




END 


PARLEL 



case, you would substitute Scripsit/UC. 
Also notice lines 250-260 and 740-750. 
These refer to DOS calls which bring Scrip- 
sit into memory, and close the file. This pro- 
gram loads Scripsit; you don't have to. 

The Last Problem Solved 

There are some machine language rou- 
tines you might want to use from Basic that 
treat all of protected memory as their ex- 
clusive domain. Sometimes another routine 
in high memory works, sometimes not. My 
approach was to relocate the Basic pro- 
gram text area upwards, and run the driver 
from where the Basic text used to be. This 
means that we have to change a few point- 
ers, so routines like List and Edit know 
where to start locking, and CLOAD knows 
where to put what it is reading. The hardest 
part was finding the right pointers. 

Program Listing 4 is similar to Listing 2. 
At iines 160-170, the assembler was in- 
structed to determine the address two 
bytes beyond the label Last, and store that 
in 40A4H, which is where Load and CLOAD 
can determine where to start putting the 



Hien^lQDIrTRANSlOOO 



A completely refurbished 
IBM Selectric Terminal with 
built-in ASCn Interface. 



•FOR YOUR TRS-80 WITH OR WITHOUT 
EXPANSION INTERFACE. AVAILABLE WITH 
CENTRONICS TYPE PARALLEL PORT. 



Features: 

• 300 Baud Serial 

• 14.9 characters per second 
printout 

• Reliable heavy duly Selectric 
mechanism 

• RS-232C Interface 

• Documentation included 

• 60 day warranty — parts and 
labor 

• High quality Selectric print- 
ing Off-line use as typewriter 

• Optional tractor feed 
available 

• 15 inch carriage width 



Also works with Exa- 

tron's Stringy floppy, 
for fast loading of pro- 
grams. (Has RS232 
built in stringy) 

HOW TO ORDER 
DATA-TRAXS 1000 

1. We accept Visa, Master 
Charge. Make cashiers checks or 
personal check payable to: 

OATA-TRAXS 

2. All orders are shipped 
F.O.B. San Jose, CA 

3. Deliveries are immediate 




I 



Desk and table top models also available. 



For orders and information 

DATA-TRANS 

45277 Fremont Blvd., #7 ^zu 
Fremont CA 94538 

Phone: (408) 263-9246 
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ZIP UP YOUR 
MOOEL I 



SPEED-UP UNIT - an easy to install electronic device that enables programs 
to run 2 to 3 times taster It's the fastest and finest quality spsed-up unit 
on the market. 

' guaranteed to double processing speed- no additional 
purchases requirBt). 

• programs will run up to 3 times taster (5,3 mh;) by adding 
a ZSOB microprocessor and delay Una ■ not supplied. 

• returns automatically to normal speed during disk and 
cassette operation - no software patches required. 

• keyboard power-on light changes color to indicate operating 



S45.00 



VIDEO I. Reverses the video display to provide black cbaracters and 
graphics on an alt white screen for a much easier to read presentation. 
Software conirotled. Cures pulling and distortion problems commonly ex- 
perienced with TRS-80 monitors. For use with TRS-BO monitors only. 
Assembled 

$24.00 



"SATISFACTION GUARANTEED ' 



Add S2.00 postage S handling - California residents add 6% sales lax 
-Foreign orders add 15%. 



ARCHBOLD ELECTRONICS 

10708 Segovia Way Rancho Cordova, CA 95670 

(916) 635-5408 

Dealer inquiries invited 




TRS-80 
CASE 



ATTACHE STYLE CASES FOR CARRYING AND PROTECTING A COM 
PLETE COMPUTER SET-UP CONSTRUCTED OF THE HIGHEST QUALITY 
LUGGAGE MATERIAL WITH SADDLE STITCHING WILL ACCOMMODATE 
EQUIPMENT IN A FULLY OPERATIONAL CONFIGURATION ALONG WITH 
MANUALS, WORKING PAPERS AND DISKS NEVER A NEED TO REMOVE 
EQUIPMENT FROM CASE SIMPLY REMOVE LID, CONNECT POWER AND 
OPERATE LID CAN BE REPLACED AND LOCKED FOR SECURITY AND 
PROTECTION WITHOUT DISCONNECTING CABLES FULLY TESTED 

• AP101S Apple and Single Disk Drive $109 

• AP102D Apple and Double Disk Drive 119 

• AP103M Apple, 9 inch Monitor and Double Drive 129 

• RS201 TRS-80, Expansion Unit and Dcuble Drive 109 

• RS202 TRS-SO Monitor and Accessories 84 

• P401 Paper Tiger Printer 99 

• P402 Line Printer ll-Centronics 730 S9 

• CC90 Matching Attache Case 75 



^199 canpuTEfi CASE canpfliNv 

i>6',0 iNDiftNfl MOUND Cr COluMBUS O-.O a32'3 

(6i4i aea 9464 





Make 
More 




midkijestScientirhc Instruments 

PrOTltdDllity, when selecting a 
business computer, means buying a system 
that will save you enough money to pay for 
itself In a reasonable amount of time. 
Midwest Scientific Instruments has the 
most advanced microcomputer in the mar- 
ketplace, excelling in hardware design and 
software support. Our computers will handle 
a larger business, faster, yielding you more 
results for your Investment. 

Let Midwest Scientific Instruments help 
you make more money. We have systems for 
your business, scientific, educational, pro- 
fessional, industrial control, or personal 
applications. Inquire today. 

For more information about MSI systems, 
products, and OEM components, fill out the 
coupon below (a photocopy is acceptable} 
and mail to: ^^^ 

midkuesl Scientific knstajments 

220(A) W. Cedar, Olathe, Kansas 66061 

YES, I want to make more money! 

Name 

Address 

City 



.State. 



Zip- 



My appi ication is: D Personal D Business 
DScientific D Educational D Professional 
D Industrial Control DOther (specify) 



^Sbb List ot Ac/ve'lisers on page 402 
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' We are not protecting memory here 
because this routine is already protected." 



text. At tines 180-190, we are changing the 
next available byte pointer to contain the 
address four bytes beyond Last. Una 200 In- 
structs this routine to start where Disk 
Basic text used to start. If you want to use 
this for Level II Basic, set the ORG at 42E9H 
(17129 decimal). About the only other differ- 
ences are the jump to Basic at line 250, and 
the zeros at Lines 400-420. Basic text is 
always terminated by a series of zeros, so 
that List and LLIST know where to stop. 

There is one omission from Listing 2. We 
are not protecting memory here. That Is be- 
cause this routine is already protected by 
being in a place where other routines are 
not likety to interfere. You can protect high 
memory when you enter Basic and use all of 
it for whatever other machine language 
routines you might need. 

The Spinwrlter Is a nice piece of equip- 
ment, and I'm thoroughly pleased with It, 
now that I have the software to drive it 
properly. ■ 

Cassette and disk versions of the listings In 
ttiis article are available from the author. 







00100 


fBOUTINE RELOCATES START OF BASIC PROGRAM TEXT, SO 






00110 


fNEC SPINWRITER 


DRIVER 


:aN RESIDE IN LOW MEMORY. 


4*67 




00120 


DISPLA 


EQU 


4467H 


[DOS DISPLAY ROUTINE 


4B25 




00130 




ORG 


4025H 


; PRINTER DEVICE CONTROL BLOCK 


4025 


02 


00140 




DEFB 


2 


; DESCRIBE AS PRINTER 


4026 


6e6A 


00150 




DEFW 


BUSY 


! ADDR OF DRIVER">4026 


40A4 




00160 




ORG 


40A4H 


;CLOAD START POINTER 


40A4 


776A 


00170 




DEFW 


LAST+2 


1 STASH END DRIVER +2 


40F9 




00100 




ORG 


40F9H 


;NEXT FREE TEXT BYTE POINTER 


40F9 


796A 


00190 




DEFW 


LAST+4 


; STASH END DRIVER +4 


6A4e 




00200 




ORG 


eA4eH 


;WHERE BASIC TEXT USED TO BE 


6A4e 


E5 


00210 


START 


PUSH 


aL 


J SAVE HL 


6A47 


21516A 


00220 




LD 


HL.HSG 


; POINT TO MESSAGE 


6A4A 


CD6744 


00230 




CALL 


DISPLA 


;CALL DOS TO DISPLAY MESSAGE 


eA4D 


El 


00240 




POP 


HL 


; RESTORE HL 


eA4E 


C3191A 


00250 




JP 


1A19H 


jJUMP TO BASIC 


6A51 


4E 


00260 


KSG 


DEFM 


'NEC DRIVER ON' iMSG FOR DISPLAY | 


GA5E 


BD 


00270 




DEFB 


0DH 


; CARRIAGE RETURN AFTER MSG 


6A5F 


00 


0e2£0 




DEFB 





;END OF MESSAGE 


SAee 


3AEe37 


00290 


BUSY 


LD 


A,(37E8H) [GET PRINTER STATUS | 


6A63 


E6FB 


00300 




AND 


0F0H 


F AND SEE 


6A65 


FE30 


00310 




CP 


30H 


; IF READY BIT IS OK 


&A67 


20F7 


00320 




JR 


NZfBUSY 


lIF NOT, KEEP CHECKING 


6A69 


79 


00330 




LD 


A,C 


I ELSE GET CHARACTER TO PRINT 


eA6A 


32EB37 


00340 




LD 


(37E8H) 


A [AND OUTPUT TO PRINTER 


6A6D 


79 


00350 




LD 


A,C 


jTAKE ANOTHER LOOK AT CHARACTER 


6A6E 


FE0D 


003«0 




CP 


SDH 


; IS IT CARRIAGE RETURN? 


6A70 


C0 


00370 




RET 


NZ 


I IF NOT, WE'RE DONE 


6A71 


BEBA 


00380 




LD 


C,0AH 


; IF SO, PUT LINE FEED IN C, 


6A73 


IBEB 


00390 




JR 


BUSY 


r AND KEEP GOING, 


6A75 


0000 


00400 


LAST 


DEFW 


0000 


[TELL LIST, ETC WHERE TO QUIT 


6A77 


0000 


00410 




DEFW 


0000 


; LOOKING FOR MORE 


6A7 9 


0000 


00420 




DEFW 


0000 




6A46 




00430 




END 


STAKT 


;AUTO START 










Program Listing 


4 



Really, what can you do with a dual sided 
disk drive on a Model 1? Nothing - without 
the Dual Sided Disk Kit. Using it you can 
put up to 3 of them on your system. You 
don't have 3 dual sided drives? Now you can 
add them ~ painlessly. This kit lets you mix 
dual and single head drives, in any 
combination. That's not all, 35-, 40-, 77-, 
and 80-track drives can he combined in any 
order. 

The good news geu better. The Dual Sided 
Disk Kit isn't a new operating system, it's a 
set of fully tested patches applied to 
TRSDOS 2.3 or NEWDOS 2.1. and a special 
3 drive disk cable. You can continue using 
your system exactly the way you always 
have. You'll have more disk storage 
potential (1228 thousand bytes instead of 
358 thousand), and incredible flexibility. 

The Dual Sided Disk Kit is 100 % 
compatible with your existing system, you 
can read your old diskettes and ones you 
create can be read on any other system. 
There are no new commands to team. It will 
automatically detect your drive 
configuration. FORMAT, COPY, 
BACKUP, and SUPERZAP have been 
modified to prompt you for the the drive 
characteristics. The kit is so smart that if 
you copy a big disk to a small one (say an 
80-track dual sided to a 35-track single 
sided), it lists any files that weren't fully 
copied. Also, dual sided drives are treated as 
single drives with twice as many tracks. Files 
can overflow from one side to the other and, 
naturally, there's only one directory per 
diskette. 



The only thing easier than using the Dual 
Sided Disk Kit is installing it. No tools are 
required. Just connect the new drive cable 
and press RESET - that's all. By the way, 
the same is true for any dual headed drives 
you add to your system - no drive 
modifications are needed - plug 'em in and 
go. 

But of course we've saved the best news for 
last. The price is just $79.95 (plus $2.50 
shipping, Ca. residents add 69c sales tax). 
Now, two heads really are better than one. 

• Mil and match single and double headed diives 

• Mil and match drive sizM (35 lo HO tracks per side) 

• 100% upward and downward compatabilily with 
diskettes created under TRSDOS 2.3 or NEWDOS 2 1 

• No drive modification! needed lo run dual sided drives 

• No computer modificalioru required 

• Uses a single directory per diskette (up to 330 
granules/diskette) 

• Supports up lo 3 drives 

• COPY, BACKUP, and FORMAT prompt driven 

• Copies 80 track onto 35 track and lists excluded files 

• Dual headed drives treated as single drivel 

• Includes special 3 drive cable 

• Complete hardware and software documenlation 

• Easy installalior - cable change only (supplied) 

^584 
NAIL DOWN YOUR ORDER TODAY!- 




State Zip 

size: D35 D40 D77 080 
'RSDOS 2.3 DNEWDOS 2.1 
I Please charge my: MC D Visa D 



• Sys 
' DOS 



Accountnumher 

Expires Bank No 

Signature 







ARE 



HEARS - 
BETTER 
THANl? 



COMPUTER DESIGN LABS 

P.O. Box 219 

C.ardpn Grove, CA. 92642-0219 

(7)l)5;t9-1211 



UIH4T DOES 

80 micRocompuTmc 



DO FOR YOU? 



IT 



provides you with more information on your TRS-80" than any other single source 
gives you 20-30 new programs to use each month 

• reviews equipment and software so you know what or what not to buy 

• gives you the truth about the TRS-80— its good points and its limitations 
{80 Microcomputing is not affiliated with Tandy) 

• lets you save money— lots of it— by comparison shopping within the ad pages 

• clues you in on how other TRS-80 owners are using and updating their systems 

• lets you in on what is really happening in the industry 

• brings you Wayne Green's outspoken 
and often controversial editorials every 
month 

• and best of all it gives you a no risk 
subscription offer - 



Subscribe today — if you are not satisfied with 
the first issue— write "cancel" across your 
invoice and send it back. 
The 80 Microcomputing is yours to keep. 




Canadian 1 year only/US funds $27.00 Foreign 1 year only/US funds $35.00 

80 Microcomputing • PO Box 981 • Farmingdale, N.Y. 11737 

'TRS-80 is a trademark of Tandy 
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TRS-80* Computer Owners. 

Great New Access 




Coimios' Corner . . . 






, Fully Tested 
AFD Mini-Disk Drives 

from 

• Every Access Floppy Disk drive is electrically tested, mechan- 
ically tested and burned-in 48 hours under operating condi- 
tions. Look for the signed test list in the shipping carton. 

• AFD dhves are capable ot either single- or double-density op- 
eration. AFD-IOO'" drives store 102-Kbytes in single-density, 
180 Kbytes in double density, AFD-200'"' drives store 205 
Kbytes in single-density, 364 Kbytes in double density. And 
these are formatted file storage capacities. Moreover, you can 
store twice these amounts on a single diskette using AFD 
"flippy" drives {AFD-100F'" or AFD-200F" drives). 

• 15-day free trial offer . . . comprehensive 90-day limited war- 
ranty . . . unbeatable prices . . . AFD-IOO (a $275.00, -100F 
(a $329.00, -200 (a $429.95, -200F (?i $449.95. 




Percom Drives for Your Model III ! 



Internally mounted drives that feature "flippy" capability, double- or single- 
density storage, comprehensive pre-delivery testing, 48-hour burn-in and, best 
of all, Percom's widely acclaimed disk controller. A First-Drive System includes 
the four-drive disk controller, one or two drives, cables and a fully illustrated 
owners manual. Use Model III TRSDOS*, Percom OS-BO t and other Model III 
compatible DOSs. 

Prices: Complete First-Drive System w/1 drive only $560.00 

w/2 drives only $860.00 

Note: If you prefer not to make the First-Drive System Installation, we will 
do it for only $29.95 plus shipping (if shipped). This Includes a 48-hour 
operating burn-In of your Model III computer, Installation of the drive sys- 
tem and final checkout of the expanded system. 



How to order OfOe'by caling Access Uniimtledloll-Ifce on 1-800-5Z7-3475. OrorOeiBy mail 
OrOefS rnay be chargeO IQ a VISA o' Masler Card accourl. or paid by casfiier s chedi, cerlifiea 
check w money ordei COU oiders require 25% deposil. SOfry, we cannol accept personal 
rhectis We pay shipping arid insurance charges on ofders ai/er S1 ,000 00. Add apprommale in- 
surance and shipping charges (or orders under SI .000 00 It in douht aCout these charges, ask 
when you can in your order Teos residonis include 5°= sales ta< Minimum mail order S20 00. 
Allow 2 10 4 weeks for delivery 

Technical K Te>as (214) 590-0206. 

Save! Ask about quantity discounts for 'TRUGs. 

Save! VISA and Master Card charges are not deposited 

until the day your order Is shipped. 



PRICES AND SPECIFICATKDNS SUBJECT TO CHANGE WITHOUT NOTICE 



Unlimllcd Access! 
Easy i» q«>t <o Thai s our new waik-tn computer 
center on Central Expressway in suburban Dallas 




RICHARDSON 



UTO 



»CCE55 

U«^UiVILU 



LI 



Same Old Savings Galore 





;!!!i!ili 



Upgrade Your Model I to Double Density 

only M 59'-^ 

And not with some unproven hacker's kit. either. But with an assembled and fully 
tested Percom DOUBLER-in. The DOUBLER-llt simply plugs into the disk dhve 
controller socket of your Expansion Interface. Then it lets you store over four 
times more on one side of a diskette, depending on the drive, than you can store on 
standard Tandy Model I dnves. Other features: • Reads, writes and formats either 
single- or double-density • Includes DBLDOS'", a TRSDOS' compatible disk- 
operating system -Runs TRSDOS*, NEWDOStt, Percom OS-80t and other 
single-density software immediately. Change to double-density operation when con- 
venient • Lets Model III software be read on your Model I • Includes on-card high- 
performance data separation and write precompensation circuitry. 




Microline-80 Printer 
Grand-Opening Special $399.95 (regular $446 oo 

Compare the Microline-80 feature-for-feature with any other competi- 
tively priced printer. • Uses standard roll paper, fan-fold forms or 
individual sheets. • Prints expanded characters and graphics. • Prints 
96 ASCII characters (9x6 dot format), 64 graphic characters (12x6 dot 
format). •Throughput is 80-characters per second, standard-width 
characters. • Print head is rated at 200 million characters. • Compact, 
lightweight, quiet. 





Low-Cost System Furniture 

Desks from Printer Stand 

$115. only $144. 

Modular design accommodates customized arrange- 
ments • Furniture quality styling and construction 
• TRS-80* compatible colors • Units knockdown for 
easy transportation. 




Save! Make ACCESS your one-call shopping center for TRS-80* 
hardware and software. Call our toll-free order number for free 
product literature and latest prices. 

AUTHORIZED 
PERCOM SALES AND SERVICE CENTER 



Toll-Free 
Order No. 



1-800-527-3475 



(orders & literature only) 



ACCESS UNLIMITED 






401 N. CAntral Expressway ««00 
Richardson. Toicas 750G0 
(2I4> 690 02O6 



UTILITY 



Now for some fancy schmancy printing. . 



Scripsit— Sans Serif 



Qary D. Cochrett 
1617 Sagebrush Ct. SE 
Albuquerque, NM 87123 



How many times have you had troubles 
using the "special print" functions on 
your line printer from Scripsit? If you have 
ever experienced difficulties, I think you will 
appreciate the following modification to 
Scripsit. With this patch in place all you do 
when you are ready to print is press two 
keys. The first key is the print command 
"P". The second key will be for the special 
print feature you want. There's no need to 
reserve high memory and no special pro- 
gram to load except Scripsit. 

Before you start this project, however, 
make sure you have the following: 

• A backup copy of Scripsit in its origi- 
nal form. A copy with a block move rou- 
tine appended to it will not work. 

• A utility program that can access disk 
sectors and modify them like Apparat's 
Superzap or Small Software Systems' 
RSM-2D. 

• An ability to write 280 machine lan- 
guage instructions. 

1 am assuming that a backup of the origi- 
nal Scripsit disk will be the same regardless 
of when or where the program was pur- 
chased. Radio Shack should not have 
moved the program around on the disk from 
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one production run to the next. So the first 
precaution to take before you make any 
changes is to check your sector dumps with 
the ones I show and make sure they match. 

Printer Commands 

Before you make any modifications to 
the disk, customize the Program Listing to 
fit your printer characteristics. That is why 
you must be familiar with the Z80 instruc- 
tion set. The listing is the program that I use 
with my printer, the Epson MX-80. The fol- 
lowing information will help you modify the 
program to accommodate your printer. 

First decide what features in your printer 
you would like to access from Scripsit. I had 
four types of printing I wanted to use, but I 
was only able to incorporate two. Here is 
why: When the Epson printer is pro- 
grammed for expanded printing, 40 charac- 
ters per line, it will default to Its normal 80 
characters per line every time a line 
feed/carriage return is sent to the printer. To 
continue printing in the expanded mode the 
appropriate command must be sent preced- 
ing every line. This trick was a little more 
than I could handle inside a machine lan- 
guage program like Scripsit, so I dropped 
this mode from my list. Once you have 
decided on the commands you want, check 
to make sure they will not default when a 
line feed/carriage return Is transmitted to 
the printer. 

Program Modlltcatlons 

Having made the decision about which 
printer commands you want, convert their 
decimal values to hex numbers (all refer- 
ences to hex numbers in this article wilt be 
followed by a capital H). For instance, if you 
want to print in the compressed mode, 132 
characters per line, send a CHH$<15) to the 
printer. Decimal 15 converts to OFH. If you 



look at line 7AD0H of the listing, you will see 
that OFH has been loaded into register C. 
The other mode included in the program is 
the double pass mode which causes the 
print head to print a line twice for a much 
darker appearance. This is accomplished 
by sending two commands to the printer, 
1BH and 47H. Lines 7AD7H and 7ADCH are 
where these commands are loaded. 

It you have a one-command feature in 
your printer that you want to use, then in- 
sert that command in line 7AC)0H, Likewise, 
any two-command modes can be placed in- 
to lines 7AD7H and 7ADCH. If you have 
more commands to add, then you will have 
to modify the program. You can add up to 
100 bytes before you run out of room. 

You should be aware of the following 
steps if you decide to modify the program. 
Load all printer commands into register C 
before calling the subroutine which sends 
the command to the printer. When you add 
lines to the program, most if not all of the 
relative jumps will change. At the end of the 
program be sure to include the lines: 



CD C9 70 CALL 70C9 

C3 64 70 JP 7064 



You may also want to change the 
prompts that the program places on your 
monitor. The program as it stands will place 
the letters C, D and N on the lower right side 
of the monitor. These letters stand for com- 
pressed, dark and normal. Lines 7AADH, 
7AB2H and 7AB7H change these letters. 

Disk Modifications 

There will be four sectors on the disk that 
will be altered: two for Scrlpsit/UC and two 
for Scripsit/LC. I will start with the modifica- 
tions on Scripsit/LC. If you are using Super- 



"Now if this explanation fias made 

any sense at all, 
the instructions to follow will be a snap," 



zap, display track OBH, sector 0. If you are 
using RSM-2D, load sector 110 to a conve- 
nient place in memory like 6000H. This Is a 
Qood time for me to explain a term I will be 
using frequently— relative byte. 

For F1SM-2D users I am referring to the 
last two digits of a memory address. For in- 
stance, if you have just loaded the sector to 
location 6000H, and I mention retative byte 
DDH. you will be looking at 60DDH. If you 
have loaded the sector to another location, 
such as 4300H as an example, then you 
would be looking at 43DDH. In either case, 
relative byte DDIH contains the same Infor- 
mation. 

With a Superzap dump, relative rows CX}H 
through FOH are shown In the last two dig- 
Its of the first column. For example, the first 
column of relative row DOH from Fig. 1 looks 
like this: OOBODO. 

To find relative byte DDH drop down to 
relative row DOI-t and count over, In hex, 14 
places. Now If this explanation has made 
any sense at all, the instructions to follow 
will be a snap. 

If track OBH, sector is displayed, com- 
pare your display with Fig. 1. Except for 
relative bytes DDH, DEH, and DFH, the un- 
derlined bytes, your display should look like 
Fig. 1. Relative bytes DDH, DEH, and DFH 
Should be: CD C9 70. Modify these three 
bytes to read: C3 A5 7A. 

This change causes Scripsit to jump to 
location 7AA5H— the location for our "Pro- 
gram the Printer" routine. The changes to 
this sector are complete. Save the sector 
back at its original location on the disk. 

Next load track OCH, sector 1 . This Is sec- 
tor 121 for users of RSM-2D. Compare your 
dump with Fig. 2. Be very careful— a lot of 
changes take place in this sector. In Fig. 2 
relative bytes 4gH, 4AH, 4BH, and 4CH are 
underlined. All the hex code that follows 
relative byte 4CH to the end of the sector Is 
just filler, it is not part of Scripsit. The 
underlined bytes tell the disk program load- 
er that the end of Scripsit/LC has been 
reached (0202) and the next two bytes are 
the start of the program (0052), which Is 
5200H. These four bytes wilt be moved to 
the end of the sector. Modify the four bytes 
at relative positions FCH, FDH, FEH and 
FFH to read: 02 02 00 52. The lower right cor- 
ner of Fig. 3 shows this change. 

Next we want to tell the disk program 
loader that the end of the Scripsit program 
has been moved to the end of the sector. If 
you look at Fig. 3 you will see that relative 
bytes 49H, 4AH, 4BH and 4CH are under- 
lined again but they contain a new code. 
The 01 tells the disk loader that there is 
more program to be loaded. The B1 tells the 
loader that there are 177 more bytes to be 
loaded, and AS 7A will direct these bytes to 
memory location 7AA5H. Insert the follow- 



ing bytes at relative positions 49H, 4AH, 
4BH and 4CH: 01 B1 A5 7A. 

An additional 177 bytes within Scripsit is 
now available in which to Insert our own 
program. Don't worry; the disk directory has 
always had this entire sector reserved for 
Scripsit. The additional 177 bytes at the end 
of Scripsit are protected when loaded into 
memory because the program scratch pad 



memory starts at 7C00H. 

All that remains now is to modify (or edit) 
the relative bytes beginning with 4DH with 
the program listing or one you have devel- 
oped for your printer. After I inserted my 
program, I went ahead and zeroed out the 
remainder of the sector to make it easier to 
see the changes made to the sector. Once 
you have inserted your program, you can 



00B000 


C3C8 


6BCD 


E96B 


ED5B 


437C 


AF32 


3A60 


3256 




00B010 


603A 


327C 


B728 


07FD 


3603 


0CD 


966D 


D5CD 


.:2,.(,.6 


00B02B 


3A6E 


CD7C 


53D1 


FDCB 


348E 


CDA2 


61C3 


C052 




00B030 


1054 


4142 


2043 


4F4D 


4D41 


4E44 


204D 


4F44 


.TAB. COMMAND. MOD 


00B040 


4513 


5749 


4E44 


4FS7 


2043 


4F4D 


4D41 


4E44 


E. WINDOW. COMMAND 


00B05B 


204D 


4F44 


4514 


454E 


5445 


5220 


5245 


5045 


.MODE, ENTER. REPE 


00B0e0 


4154 


2043 


4F4D 


4D41 


4E44 


1752 


4550 


4541 


AT. COMMAND. REPEA 


00B070 


5420 


484F 


5720 


4D41 


0102 


0070 


4E59 


2054 


T. HOW. MA. . . .NY.T 


00B080 


494D 


4 553 


3F20 


1B44 


454C 


4554 


4520 


5041 


IMES?. .DELETE. PA 


00B090 


5241 


4752 


4150 


4820 


2859 


204F 


5220 


4E29 


RAGRAPH. (Y.OR.N) 


00B0A0 


3F20 


2044 


454C 


4554 


4520 


544F 


2045 


4E44 


?. .DELETE. TO. END 


00B0B0 


204F 


4620 


5445 


5854 


202B 


5920 


4F52 


204E 


.OF. TEXT. {Y.OR.N 


00B0C0 


293F 


2021 


5274 


CDC8 


6BFD 


3634 


C0CD 


8B70 


)?. IR 64 


00B0D0 


CDC9 


70FD 


CB34 


B6CD 


E96B 


CD8B 


70C3 


A57A 




00B0E0 


1B0E 


FD21 


2F7C 


ED53 


437C 


CD7C 


6F31 


FA41 


... 1/. .SC. . . .i.A 


00B0F0 


FD36 


3400 


218B 


6F22 


297C 


3A39 


7C32 


647C 


.64. I..") .:9.2.. 












Fig. 1 









i0Cl00 
)0C110 
J0C120 
30C130 
30C140 
30C150 
a0C160 
30C170 
30C180 
30C190 
30C1A0 
30C1B0 
a0ClC0 
00C1D0 
00C1E0 
00C1F0 



CD24 
8000 
C9FE 
FE0D 
7 4 5F 
6E5F 
5583 
6426 
0618 
0601 
01A7 
lllA 
5959 
FD3 6 
7A22 
6BED 



6ED1 
3AB9 
8 CCA 
2B0E 
32E8 
6B50 
5878 
6F18 
031C 
9C9B 
007A 
034D 
0106 
07 8F 
297C 
5B43 



CDFA 
7CB7 
8371 
FE0A 
37C3 
6E18 
56FB 
55FB 
1A6E 
9E9D 
6DE5 
590E 
3C4E 
C9CD 
C93I 
7CFD 



52C3 
2801 
FE8D 
280A 
745F 
6E64 
5442 
545D 
6D1D 
1B8E 
6D11 
59D2 
4280 
E96B 
FA41 
CB3 4 



706E 
05C9 
C289 
083E 
3B02 
7937 
6FB5 
6E24 
6055 
8D0E 
5463 
5A3C 
8034 
C35D 
21BB 
C6D5 



EB09 
71C3 
2032 
0200 



6FF3 
586A 
6EB9 
6D2F 
6EFE 
54E5 
0C4a 
127 8 
5ACD 
6F22 
CD24 



0000 0000 .S R 

79B7 C825 ..:...{ % 

8371 2812 [ . 

E837 08C3 ..{...(. .>.2. 7.. 

525D 6E24 . . 2 . 7 . . . ; . . -R. . S 

6E26 6F18 .. .P 7 . . . f. . , 

58AD 6D46 U .X .V.TB. .X .X . . F 

542D 5505 . & . . U.T. . S- -T-U. 

6D96 6D09 U./ 

6D56 6EC7 V. . 

6DC7 6D03 T.T 

0159 4E4E . . .MY.Y.Z<.H.YNN 

5621 ED5C YY. . 'INB. .4. .VI . . 

FA52 2141 .6 Z. .RIA 

297C CDE9 . " ) . .l.AI . .") ... 

6ECD 846E . . . C. . . 4 . . . S . . . . 



Fig. 2 



)0C100 
50C110 
30C120 
30C130 
30C140 
30C158 
a0C160 
000170 
a0C180 
00C190 
00C1A0 
00C1B0 
00C1C0 
00C1D0 
00C1E0 
00C1F0 



CD24 6ED1 CDFA 52C3 706E 0000 0000 0800 .S....R 

0000 3AB9 7CB7 2801 05C9 EB09 79B7 0825 ..:...( % 

C9FE 80CA 8371 FE8D C289 71C3 8371 2812 (. 

FE0D 280E FE0A 280A 083E 2032 E837 06C3 ..(...(..>. 2 ,7 . . 

745F 32E8 3703 745F 3 B01 BlA5 7A DD E5FD ..2.7...; 

E5E5 C5D5 F53E 4332 E23F 3E44 32E5 3F3E >C2.?>D2.?> 

4E32 E83F CD2B 00B7 28FA FE43 280A FE44 N2 .?.-*-..(. -C (. .0 

2800 FE4E 2813 ISEC 0E0F CD8D 0518 0A0E {..N( 

IBCD 8005 0E47 008D 05F1 DlCl EIFO EIDD G 

ElOO C970 0364 7000 0000 0000 0000 0000 

0000 0000 0000 0000 0000 0000 0000 0000 

0000 0000 0000 0000 0000 0000 0000 0000 

0000 0000 0000 0000 0000 0000 0000 0000 

0000 0000 0000 0000 0000 0000 0000 0000 

0000 0000 0000 0000 0000 0000 0000 0000 

0000 0000 0000 0000 0000 0000 0202 0052 R 

Fig. 3 
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A/DD/A LAB 80 

A Real World Interface 
for your TRS-80 
MOD l&lll. Control 
motor speed & direc- 
tion, measure voltages 
— any analog to digital 
or digital to analog 
operation. 

$149.95 

SPECIALS: 

16K add on memory 

prime NEC 200 nsec $18.50/8 

"Shades" green filter $18.00 

ATHANA quality SV* floppy disk- 
ettes with hubrings in plastic 
library case 

(soft, 10, 16 sector) 

10/34.25 

100/321.85 

BOOKS 
6809 assembly language prog. 

$16.99 
Learning Level 1 1 $1 5.95 

The Basic Handbook $19.95 

Microsoft Basic decoded & 

other mysteries $29.95 

TR5-80 disk & 

other mysteries $22.50 



H.I.S. -=" 

COMPUTERMATION, INC 




roger wilson 
vice president 
1295 Cypress avenue 
melbourne, florida 32935 
(3051 254 9399 

Fix tsit delivciy. wnd certified checks, money Ofden o( 
cdll to Ittange bank wire 
tramfen Pefvmal of com- 
panv checks wquire two to 
Ihret w««ks lo t leaf Add 12 
lot ihippins cKargn 



*7/ you ever change printers, 
hang on to thJs article, . . " 



save this sector to disk. Make sure you dou- 
ble check everything before you save it, 
though. 

Check the operation of Scrlpslt/LC with 
the new modification. After loading Scrip- 
sit/LC, either load text that you have already 
written or write something into the text buf- 
fer. Hit Break, then P for print. The message 
"Testing for Errors" will appear and then 
clear from the screen. Your prompts will 
now display. Select one of the letters and 
press the corresponding key. Your text 
should start printing immediately in the 
form you have programmed. Check each of 
the special commands if you have more 
than one. Do not forget to turn off the 
printer to cancel your last command before 
you check the next one. 

Scripsit/UC modifications will be easy 
since the work in the lowercase version is 
already complete. All that is necessary is to 
copy the lowercase sectors to the appropri- 
ate uppercase sectors. If you are using 
Superzap, copy track OBH, sector 0, to track 
OCH, sector 5 and track OCH, sector 1, to 



track ODH, sector 6. If you are using RSr^-2D, 
load sector 110 and save it on sector 125. 
Also load sector 1 21 to save on sector 1 36. 
It would be a good idea to check track 
OCH sector 5 with Fig. 1 and track ODH sec- 
tore with Fig. 2 before you make any modifi- 
cations to make sure they are the correct 
sectors. 

Some Final Thoughts 

Depending on how your printer handles 
its programming commands, it may be pos- 
sible to obtain some additional commands 
without having to include them in the patch. 
For instance, if I send the Compress com- 
mand and hit the Clear to escape the print 
routine, I can again enter the print routine 
and respond with the Darken Print mode. If 
you want to switch printing modes, you will 
have to turn the printer off and then back on 
to cancel the last command. 

One final word: It you ever change print- 
ers, hang on to this article so you will be 
able to modify Scripsit to accommodate 
your new printer.B 



7AA5 


DD 


E5 




PUSH 


IX 




7AA7 


FD 


E5 




PUSH 


lY 




7AA9 


E5 






PUSH 


HL 


SAVE ALL OF THE 


7AAA 


C5 






PUSH 


BC 


REGISTERS. 


7AAB 


D5 






PUSH 


DE 




7AAC 


F5 






PUSH 


AF 




7AAD 


3E 


43 




LD 


A, 43 




7AAF 


32 


E2 


3F 


LD 


(3FE2) ,A 


DISPLAY THE LETTERS 


7AB2 


3E 


44 




LD 


A, 44 


C, D, AND M ON THE 


7AB4 


32 


EB 


3F 


LD 


(3FE5) ,A 


VIDEO MONITOR. 


7AB7 


3E 


4E 




LD 


A,4E 




7AB9 


32 


Ea 


3F 


LD 


(3FE8) ,A 




7ABC 


CD 


2B 


ee 


CALL 


002B 


SCAN THE KEYBOARD 


7ABF 


B7 






OR 


A 


FOR AN INPUT 


7AC0 


28 


FA 




JB 


2,7ABC 




7 AC 6 


FE 


43 




CP 


43 


IS IT A "C"? 


7ACB 


2B 


BA 




JR 


Z,7AD0 


IF YES, JUMP FWD 11 


7ACA 


FE 


44 




CP 


44 


IS IT A "D"? 


7ACa 


28 


eo 




JR 


Z,7AD7 


IF YES, JUMP FWD 14 


7ACA 


FE 


4E 




CP 


4E 


IS IT AN "N"? 


7ACC 


28 


13 




JR 


Z,7AE1 


IF YES, JUMP FWO 20 


7ACE 


le 


EC 




JR 


7ABC 


GO BACK TO KEYED 


7AD0 


0E 


0F 




LD 


C,0F 


COMPRESSED PRINT 


7AD2 


CD 


8D 


05 


CALL 


05BD 


- SEND "0?" TO PRINTER 


7AD5 


18 


flA 




JR 


7AE1 


; JUMP AHEAD 11 


7AD7 


0E 


IB 




LD 


C,1B 


■ DARKEN PRINT, SEND 


7AD9 


CD 


8D 


05 


CALL 


0560 


- "IB" AND '47" TO 


7ADC 


BE 


47 




LD 


C,47 


; THE PRINTER 


7ADE 


CD 


80 


05 


CALL 


580 




7AE1 


Fl 






POP 


AF 


; 


7AB2 


01 






POP 


DE 




7AE3 


CI 






POP 


BC 


• RESTORE ALL THE 


7AE4 


El 






POP 


HL 


■ REGISTERS 


7AE5 


FD 


El 




POP 


lY 




7AE7 


DD 


El 




POP 


IX 




7AE9 


CD 


C9 


70 


CALL 


7flC9 


; A SCRIPSIT ROUTINE 


7AEC 


C3 


64 


70 


JP 


7064 


; JHP BACK TO SCRIPSIT 










Program Listing 
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GRAPHICS 



See if you can follow the plot of this article. 



The Ups and Downs of Graphs 



Richard Foley 
14629 N. 61st Drive 
Phoenix. AZ 85306 



Ilne and bar graphs are, in most cases, 
the best method of interpreting statisti- 
cal or numerical data. With just one glance 
at a graph you get an overall picture of the 



data presented and can easily spot dips, 
peaks and trends. In the business world 
graphs are used in such areas as sates, pro- 
fits, earnings, production and others. On a 
graph you can see an upward trend In sales 
or a downward trend In earnings. Instead of 
deducing It from a list of figures. 

At home, graphs can also be used In 
many areas. People Interested in the 
weather can graph high and low temper- 
atures, rainfall and barometric pressure. 
Those on a diet can watch the up and down 



VALUE 
RANGE 



YI4 - 



Y5 - 
Y4 - 
Y3- 
Y2 - 
Yl - 



PLOTTED 
VALUES 



BAR 




XI X2 X3 X4 X5 ■ • •■ 
-• VALUE LABELS 



X14 



LINE 



GENERAL LAYOUT OF GRAPHS 
FIGURE I 



trends of their weight. Monthly utility bills, 
miles jogged, and a child's growth are a few 
of the many other applications that gener- 
ate Informative graphs. 

However, actually sitting down with 
graph paper, rulers, pencils, and so forth to 
draw a graph is not a task many of us like to 
undertake. The TRS-80, with Its built-in 
graphics and Level 11 Basic. Is ideally suited 
to computerize graph building and storing. 
The program described In this arllcie makes 
It possible to build and maintain line and 
bar graphs using the TRS^. 

Graph D«Bcdptlon 

The general layout of the graphs this pro- 
gram generates Is shown In Fig. 1. it is a 
standard X, Y graph with the value range 
running up the Y axis, and the value labels 
along the X axis. The actual values are plot- 
ted as points In the area defined by the X 
and Y axis. There Is room for 14 values to be 
plotted along the X axis and for 14 values of 
the value range to be displayed on the Y 
axis. The actual number of Y values that can 
be plotted Is 40. The plotted points either 
can be connected together by a line, or con- 
nected to the X axis by bars. Photos 1 and 2 
show how these graphs appear on the 
TRS-80's screen. The program can store 
and retrieve up to 50 different graphs in 
memory. 

Program Functions 

The four major functions the program 
performs are: 

• Read Data Tape— previously saved 
graphs are read from tape and loaded in- 
to memory. 

• Build a New Graph— the program asks 
for the information needed to plot a new 
graph, and draws it on the screen. 
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"With just one glance at a graph 
you get an overall picture of the data presented. . . " 




Photo 1 



Phofo 2 



• Retrieve a Graph— a list of all the 
graphs in memory is displayed and a 
selection is asked for; the selected graph 
is retrieved and drawn on the screen. 

• Write Data Tape— all graphs in mem- 
ory are written to tape. The above func- 
tions are selected from the menu screen 
by pressing the corresponding numeric 
key. 

Once a graph is fully displayed on the 
screen, either a new graph or one retrieved 
from memory, there are six additional func- 
tions available: 

• Return to Menu— the screen Is cleared 
and the menu screen is displayed; if the 
displayed graph had not been previousiy 
saved It wiii be lost. 

• Save Graph— if the graph is new the 
program asks for a one-to-eight character 
name and inserts the graph data sequen- 
tially into memory; if the graph is old it is 
replaced in memory. 

• Switch Type— if the graph is a line 
graph it wili be redrawn as a bar graph 
and vice versa. 

• Add a Value— the label and value for 
the next open spot on the X axis are 
asked for and then plotted. 

• Change a Value— the program asks for 
the label of the value to be changed and 
then asks for the new value; the graph is 
redrawn with the new value. 

• Delete— if the graph is in memory, it is 
deleted. 

All of the above functions are selected by 
pressing the corresponding numeric key, 
when the asterisk is displayed in the bottom 
right corner of the graph screen. 

Drawing a Graph 

The primary function of the program is, of 



course, to draw graphs. After pressing key 
two from the menu screen, the program 
asks for the following information to label 
and plot a graph (Fig. 2 shows how this in- 
formation is used in the graph): 
• Start Value Y— this is the integer value 
with which the Y axis starts. It can range 



from minus-999 to approximately 
plus-950. 

• Increment Y (1-99)— this is the integer 
value by which the Y value will be incre- 
mented, going up the Y axis. 

• Label Y (one-eight characters) — this is 
the name of what the values represent. 
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Dough'flo (do'flo) n. [Colloq] a highly inter- 
active business or home finance program, 
designed to instantly analyze where the hell 
all that money went. 

Doughflo. ir's ■ buiiniss ptogram. Ill a home tinance program. Doushllo Is (now hold 
yout breaih). "an eipendirure oriented data base managemani syitam. " (Whsw.) Bui 
batt olali, il'saaty toufis. 

What the heck does Doughllodo? Lots. 

• Allows instani analysis ol business at home cash Now. (Flo?) 

• Keepsiabsolexpenses with up to 26 user defined categories. 

• Allows separalion ol home and business expenses lot lax. Social 
Security, deductions, etc 

• Ideal tor piepating income atfd stale taxes. 

• Is able to search, soti. attd pioQuce hard copy ol any number ol items and 
checks, ovei any range ol dales, categories, amounts, vendors, or 
desctiptions 

Be your own butirwes analyst! Vlflually obMleies a boofcheeper, b«cauM youi com- 
puler does the work for you. Use Ooughllo to... 

• Insiantiy tettieve up to dSO records at a time wllhoul time consuffting disk 
access. 

• Easily geneiate detailed tapotisot aiiexpendiiutes 

• Satisly yout boss, wile, Ihusbsrxl?). or yourself that you know how wisely 
lor foolishly) morwy is being spent. 

Exceedingly simple to use (iwe (esled it on simple people!), now (here Is no excuse 
not to know where (he hell you lost all that money, whether it was last year o< last 
month. Best ol all. maybe now you'll be able to save some ol (hat dough lor the 
future! Hequirai 32K and one or more disk drives. Specify Model I or III. At only 
S39^S^a>lf>aid, il't a st eil su r e to »a¥e you tnone y l '~ 



P.O. BOX 597 FORESTVILLE, CA 95436 
24 hr. phone (707) 887-7237 [^ 



'Aft oainnH 



PERFECT 
CLOAD 



DraoK^i 



TIME 




ALPHANETICS TRS-SO TAPE DIGITIZER 

■ FiDniii«vi«i>inin*S>»t>mbaiOclaii*i lUOEiemtnidi Elaclionki Ripiinit - -■--■- - 

At last itiere Is a cure lor TRS-SO lape cloading blues. For over three years, Alphanelics 
has been selling the TRS-60 Tape Oigiliier, a proven hardware solution for your software 
problems. No longer need you juggle Ihe recorder's volume control endlessly, irying for 
a perfect cioaa ol a pre-recorded ptogram. Just pop the tape into the cassette recorder, 
process the signal through our dlgillzer, and you're ready to RUN a perfect load! 

Just check out ttie Tape Digitizer's features... 

• Makes lape program loading virtually independent ol volume control 
setting 

■ Allows copying system and normal tapes without using computer. 

• Makes a perfect digital copy ol any tape, witfiout using compuier, 
removing hum, noise, and cure9 minor dropouts. 

• Cassette switch allows tnanual conttoi of cassette recorder, independent 
of computer control. 

• 'Good Data " indicator easily enables setting proper volume doubles as 
a tape monitor. 

■ A. C powered — nobatleriesioteplace. 

• Housed in a sturdy, attractive metal case 

• Completely compatible with level I & It. also LOW speed Model III. 

Feed your cassette to Ihe Alphanetics Tape Digitizer and teed your computer Ihe exact 
digital waveform the TRS-BO gave your tape. Gel rid ol your tape bugs today — S64.95 
postpaid or leluin within 10 days lor a lull refund! 



Program Listing 



* GRAPH-IT •••": 

BY RICHABD FOLE 

WIIJIISGTON D 



>"liCI-9B6;G0SU81 



IB BEH '*• SET UP '■• 

15 CLEAH«75e!DEFlNTC,V,YiDEfSTBI,S,H,L,P,T,N,B:DEFSMGF,DiDIM«; ^B 
) ,LV(H) ,V[U) :BL-STRlNGS(i5,- ■) 
5fl BEH '•• TITLE PAGE '•■ 
55 CLSrPRINTCHBS(33) : PRl NT: PHI NT; PBIOT- 
PRINT: PBINT: PRl NT: PHINT; PRINT : PRlNTi PHIKT" 
YVPHItH'" U PKRKINS AVE.-iPBINT" 

E 198B9'iF0BCT-lTO3flBB:NEXT 
IBB REM *'• MENU *•* 

15B CLS:PRINTse8,-*** GRAPH-IT •*•■ c PBim'?21B , "PRESS NUMBER TO 
SELECT -"j:PRlNTy3*5."l - LOAD DATA TAPE" j i PRINTB4e9 , "I - BUILD 
MEW GRAPH*! :PHlNT?<73,-3 - RETRIEVE GRAPH' i r PHINTe557 , '4 - WRITE 

DATA TAPE"] :PBINTg6Bl,*5 - ENE'i 
2aB I-INKeVS:IFl ^"THENJBe 
2 50 IFI>"5"ORI-,"l"TUBN2BBELSEC-VAL(n 
iea IFC=5THEN45B 

3S8 ONCGOSI;B1BBB,I4BB,258B,4BB0 
4BB GOTOlSe 
4SB irSW<>"l"THEN65B 
475 IFC«-BTHEN65B 

589 PRINTg71 7, "GRAPHS IN MEMORY HAVE BEEN UPDATED. " | ; PBINTP777 , " 
DO YOU WANT TO SAVE MEMOHV ON TAPE (Y OB H)?"i 
519 I-INKEVSi IF1-"'THEN51B 
515 IFI--N'THEN65fl 
5 5B IF'I-"Y'THENliOSUB4BBB!GOT015II 
6B8 GOTOSie 
(^5B END 

10BB BEM ••• LOAD DATA TAPE ■■• 

leSB CLS!PBlNT?:i3.-l. MOGNT TAPE* J 1 PBINTP141 , "2. SET TO PUVV;; 
i'»lNTe469,*3. PRESS ENTER WHEN BEADY" ): CI -495 tCOSUBUBBB 
I1B0 PRINT#602,"' LOADING ■" | : INPUTI-1 ,C :CH-C :CT-B 
1150 INPUTt-l,IlCT=CT-l!M(CT)-LEPTS(I,l22) : IFCT-CMTH1.N125B 
12 90 CT-CT+l!K(CTI-mDSH ,123,122) : I FCTOCMTHEK1150 
1250 PRIHTefi02,-* DONE •';: paiNTS725 , "PRESS ENTER TO CONTlhUE 
.. .■)!CI = 7 5 2iCOSIIB14BBB:HETURN 
14B0 BEM •*• BUILD NEW GRAPH ■•* 
1450 G0SUB7eBB 

ISHe PRlNTe96B,BL; :PHINTe96B, "START VALUE Y =" , i CI '9B3 iG0SUB14BB 
fl;VY-l>iT[VAL(I)| 

151B IFVY<-999THENPBINTe96B.BLj iPBINTP968,"Y MUST BE CBEATEH THA 
N -999, KEEKTERI'|iFORCT=lTO15ea!HEXTTGOrO15B0 

1S5B PRlNT?968,BLiiPRI»TB9fi8,'ISCBEKEHT (1-99) -" j ; CI -986 :G0SUB1 
4aeB:C=INTfVAL(I) ] I IFC<10BC>9 9THEN155B 

16BB CN-'CiIFKCN'n) tVY) >999THENPHINTS96H,BL; ;PRiNT896B,"Y Oft IN 
C TOO LABGE, REENTER! " j : FOBCT-ITOISBB : NEXT-.GOTO1S90 
165B PPlNTS96a,BLi!FRINT8968, "LABEL Y (1-B CHB) ; ' i iCI =987 iGOSUS 
14Bafl:!FLEN(I] >8THEN165B 

1783 irLEN(I) <8THEm-lt3TRISGS( (8-LEN(I) ) ,* " ) 
175fl LY-I 

IBBB PHINTe968,BL,-:PRIWTi968,'Y MULTIPLIER (1-5 CHH) OP -SOKE- > 
"; :CI-18«2:GOSUB14eeB;IFLEK(I)>5THEKiaae 
185B IFLENII)<5THENI = I+STRIN<;S( (5-LENIIM .' ") 
19ea HY-I:GOSUBJ050B:PW-"B"!CT=1 
2B00 GOSUB113BB:IFPW-"l'TaEN21B8 
2B50 CT-CT-H:IFCT^15THEN290B 

2108 PRlKTe96a,BLjiPRINT#968, 'TITLE (1-24 CHBI 
4B0B;IFLEN(II >24THBN21BB 

2158 IFLENII) ■.24THBN1 -I tSTBINGSl (;4-LEN(ni 
2209 TI-I 

2258 PRINTe968,BI.; !PBINT#96e,"TYPE (LORB) >' : :CI -983 iCOSUBUHB 
e!lFI(>"L"ANDI<>*B"THEN225B 

23 08 TY-l!lFTY-"L"THENGOSUB5eBBELSEGOSUBllBBB 
2358 NS-"1- :OOSUB75BB 
2408 RETURN 

2508 REK •** RETRIEVE GRAPH •" 
2510 IFCM^0GOSUB138BB!COTO35BB 

2558 CLSiPRINTgl7,-**«"|CMj' GRAPHS IN MEMOBV •• •" i : CP-6S !C2-1 :C 
T-e 

26 BB PRINT§CP,IEFTS[M(C21 ,8) :C2-C2*1 ; IFC2>C«THE»265B 
26 25 CP-CPtlB:CT-t'T'ltIFCT-6CP-CP+4:CT-B 
2630 GOT026BB 
2650 PPINT?982, "ENTER CHOICE >" ; : CI'996 : JOSUBUBBB 

2 700 IFLENII) >BTIiENl=I.EFTS(I,ei 

2750 lFLEN(I)i8THEHl»^I+STBINGS( (e-LE»(I;) ,■ ") 

2aflB NA-I:D'INT( . 5'CMl iDl-l!D2=CM 

2859 lF(D2-Dl)<3THEN31Ba 

2900 IFHA<LEFTS(M(D) ,e)THEH3e5B 

3 8 80 D1-DiD-INT(.5'[d2-D) )*D:G0T02B5I 
jaSB D2-DiD=INT(.5'(D-D1) )+Dl!COT0285B 
J1B0 CL=BiCT-D1 

3110 IFNA-LEFTS1M(CT1 , 8) CL-CT;GOT032Be 

3125 CT-CT*1: IFCT>D2THEN315BELSE3UB 

3158 PPINT§96a,"MOT POUND, BtiTER CHOICE OR SPACE TO EXIT ■"jiCI- 

lBfl9:G05UB14BBB:lFI = ' "THEH3 5BBELSEPRmT?96 8 ,BLi !GOTO27fl0 

3 208 NG=«lDS(M(Ct.l ,9,1) i VY-VAL(MIDS (M (CD ,18,31] : CN-VAL IMIDJ (f^ (C 

L) ,13,21 I iLY-MIDS(H[CL) , 15 , 8) !HY=MIDS{M(CL) , 23 , 5) i CP=2a ! IFNC-"-" 

','Y-VY»-1 

J2 5B F0BCT-lTO14iLV(CT)-HIDS(M(CL) ,CP,3) ! Y (CT) -VAL (MinS (n(CL) ,CP 

■t3,2) ) :CP-CP»5:KEXT 

33B0 TI-MIDS(M(CL) ,98,24) :TY-BIGHTS(M(CL) ,1) 

3 3 50 GCSUB7BBB:GOSUBlB50B:FORCT-lTO14!GOSUBlfl7BeiNEXT 
3409 lFTY-"L"TH£NGOSUB5BBBELSEGOSUBllBa0 

3450 NS-"0"iGOSUB7bB8 

3508 RETURN 

400B REM •'* WRITE DATA TAPE **• 

4B1B irCH-BG0SUB138eB:COTO446B 

4858 CLS!PBI(4Tg213,*l. MOUNT TAPE" i i PP1NTP341 , "2 . SET TO RECORD" 

I iPRINT^469,"3. PRESS ENTER WHEN READY" ; iCl -595lGOSUB14B»B 

4188 PBINT§602,"' WRITING • " ; : PRINTf-1 ,C« iCT-» 

4 158 CT-CT»1; I-H{CT) : IFCT-CMTHEH42 5B 

4288 CT-CT + 1:I-I-'M(CT) 

4258 PBINTt-1,1 

4300 IFCT';>CMTHEN415B 

4350 SW-"e":PRINTI!6B2,"' DONE •" t : PRINT?725 , "PRESS ENTER TO C 

ONTINUE., ."; : CI -752:GOSDB14BBB 

4 408 RETURN 

5B0e REM •'* DRAW LINE BETWEEN POINTS •'* 

5B10 YI-liIFLV(YI*ll." ■THEN64BB 

5015 CX-9+(YI*a) rCY-YIYI) 

502B IFY(YI) >Y(YI*1)DI — 1 

5058 IFYIVI) <Y(YH1)D1-1 

51 BB IFV(YI)-Y(YI*1)DI-0:GOTO53BB 

5158 DF-(Y(YI)-Y(Y1»1)) :DF=ABS IDF) -1 

Pfog'sm conUnues 



•) 



Program contmuBd 

5298 IFDF-lCV-CV»Dl![>r-e!GOT053Bi 

52 25 IFDF=8GOSCB65flfl:CY=CY*Dl!GOSUB6 5e9;GOT06JeB 
525B IF'DF>6THEK56BB 

5J75 IFDF<6THEN535e 

53BB F0BCT=1T06:CX-CX*1iCY-CY*DI:SET:CX,CV) ; NEXTiGOTOfilBa 

53 SB IFDF-2CY-CY+DIiG0SUB65BB:CV-CV<-DnGOSUB65ei!G0TO63eB 
5 4eB D2-6-DFiD3-DF-D2iD4=03;lFD3tlTHEN&5BB 

5*5 » G03UB66BB:D3^D3-l!lF[)3--i.5'D4)THEN545e 

55BB FORCT»lTOD2:GOSUB6 6BfliC3l-CX.liSET(CX,CY) sNEXT 

555B IFD3-flTHEN63dB 

55TB GOSUB66BD:D3-D3-ljGOT0555e 

5668 D2«DF/6:D;-C1[;T;D2) tD3>6*D2!D3-DF-D3 ; D4-d;:D2-D2'1 :D5-6-D3 ■ 

D6=DS;IFD5-BTH£N5 90fl 

57BB CX-CX-l 

S7 5fl FCRCT-1T0D4;CY-CY*DI:SET(CX,CY) iNEXT 

SBBfl D5=D5-liIFD5>(.5*D6)THEN579B 

5858 IFD3=BTHEN6e5B 

59Ba CX=CX*1 

5 95 8 F0RCT = lT0D2:Cr-CV*Dl!SET(CX,CYl ;HEXT 

6flflB D3-D3-liIFD3<BTHEN6a'!e 

6B1B IFD3-aTHEK6B5BELSE59B0 

6fl5B CT-fl:lFD5-flTHEN63BB 

618B CX-CX*1 

615B r¥-CY«DI :SET1CX,CY) iCT-CT+1 : IFCT=D<THEK62BflELSE615e 

628B D5-D5-l:GO".'06B5B 

6389 Yl-yi'l:IFYl-UTHEN64Bfl 

6359 IFLV(YI-l)-* ■THEN64flBELSE5B15 

64BB RETURN 

b5flB P0RCT=lTO3!CX-CX-liSET(CX,CYl : NEXTi RETURN 

668 8 CX'CX + liCY-CY+DIiSETlCX.CYl i RETURN 

79Bfl REK ••• LAYOUT X AND Y ftXIE *'• 

70 28 CLS:F0BCy = BT04l!SET|lB,Cy) iSETHl.CY) iNEXT 

7B5B CY-41;F0RCX=13tO127!SET(CX,CY) ;NEXT 

71B0 CX'12;F0HCY-1TO37STEP3iSET(CX,CY) i NEXT 

715fl CY'4B:F0BCX-16TO12aSTEPBiSET[CX,CY) ; SET(CX«1 ,CY1 iltBKT 

72Bfl RETURN 

75Bfl REM •*• GRAPH FUNCTIONS ••' 

755B PRIKTP96B,BL;iPRINTS9flB,TIj : PRI(IT*1B22 , " ■' j 

76B0 I'lNKEYS: IFI <'1"0RI >"fi"THEN76BB 

7625 IFI--1"THBN7675 

765B PRINTglB22," *; :C-VAL[ 1 ) lOKCGOSUB, 7798, 8798, 91flB , 95flfl , IBBBB 

7655 GOT075BB 
7675 RETURN 

77BB REM *•■ SAVE •*• 
7725 Sh'="l" 
7759 IFNS-"B"THEN7925 

776B TFCM-5BPRINT?96B.BL;:HBINT3968, "MEMORY FULL, CAHOOT ADD!';-. 
F0HCT-1T02BBB1 NEXT: GOTO? 558 

7898 PRINT§96a,BLj :PR1HT?968, "ENTER NAME (1-8 CHRJ >"l jCl-99e!GO 
StiB140BB: IFLENU) >eTHEN7aBB 

7859 1FLEN(I)<8THENI-1'-STBINGS( (8-LBN(l)) -" "1 
7980 NA-I 

7925 1-HA:I3=' ' : IFVY<BTHENNG=*-* iVY-VY*-lBLSE»G=' ' 
7 958 l=I+NG:CI-VYiC3-3iGOSUBB5 59!Cl-CN:C3-2!GOSUBB5 5fliI-I*LY!l-I 
♦MY:trr.ltC3-3 

8B90 IFLVtCT)-" 'l-I'" BB'iGOTOfll99 
8850 1-I + LViCT) iCl-YfCT) !G061!BB55B 
BIBB CT-CT+1:1FCT<1STKEN8(BB 

815 8 I-:*TI :I-i+TY; IFNS-"0'B ICL) -1 :GOTOe489 
817 5 IFCM-flCL-l!BlCL)-I:CT-B;GOTOa35B 
8298 CT'CH 

8218 JFHA-LEFTSfUlCT) ■8IPR1NT8968,BL; !PRIKTg96B, -NAME ALREADY IN 
MEMORY, REENTERl-; iCT-CT*2 : IFCTtCKTHENFORCl-CTTOCM iH ICl ) -M {CI *! 
1 !NEXT!F0RCl=lTO158B!NEXT:GOTO7BBBELSEFORCl=lT015BBiNEXT:G0T07eB 
B 

82 58 IFNA>LEFTS(«(CT) , 8) THEKM ( CT*1I =1 i GOTOB350 
S3B0 r|CT«l)-M[CTI iCT=CT-llIFCT-BTBESK(l) =1 :GOTOBJ5BELSEa21B 
B35B CM-CM tl 

B4BB PRINTP968,BL) iPRINTg968,-' SAVED • •■ i : FORCl -ITOISBB : NEXT 
8458 IFNS-"l'NS-"B"iCL-CT»l 
8508 RETURN 

8550 REM ••* ENCODE N'l-'MERICS •■• 

BS75 I2-STHS(C1) :IFLEH(12) JC3TREN1 2-RlGHTS (12 ,C3) :GOTOa6 5B 
B6BB IFLE(ia2l-C3TKE(iB65BELSEI2-13 + I2iGOT086ea 
8658 1-I*I2:RETL'RN 
8708 REK •** SWITCH *" 

67 5 8 G0SnHB9aB:lFTY-"B'THENTY-"L"ELSETY-"B* 
SBBB IFTY-"L"TaENGDSUB5BBBELSEGOSUB110 00 
8a5B RETURN 

8988 HEM *•• CLEAR GRAPH AREA ■" 
8925 B2-HTR1NGS156," ") : FOHCT-7T077 5STEP64 iPRINTPCT.Ba; ; NEXT 

8 95 8 FOBCX-16TOl25:RESETlCX,39! : RESET |CX , 481 i NEXT:CV=ia : FORCX-16 
T012BSTEP8!SET[CX,CV1 ! SETICX*! ,CY) :HEXTtCT-1 

98 B0 GOSUBlfl7B0iCT''CT*l:IFCT>14THBII9959 

9825 IFLVICTIO" "THEKSBBB 

9B5B RETURN 

910B REK ••• ADD VALUE •■• 

915B IFLV{:41';>" ■PRINTg96e,BLj :PB1NT396B,"N0 ROOM LEFT TO ftDD 

■j !FORCT'lT015B9iNEXT!GOT094BB 

92B0 CT-B 

9258 CT-CT-lilFLVlCTlO' "THEN9258 

9308 PW-' ■!GOSUB11399iirPW'"l"THEN940B 

9 3 50 lFTY-*L"THENGOEUB5Be9EL£EGOSUBllBBB 
94BB RETURN 

958a REM '•• CHANGE VALUE •" 

9559 PRINT|96B,BLj :PRINT§968, 'ENTER NAME OP VM. >" i iCI =988:G0SUB 

14B0fliCT-9 

9569 IFLENdl >3TBENI-LEFTf (1,3) 

9565 IFLENUI <3THEN1-I*STRINGS( (3-LEN(I)) ." "1 

9688 CT-CT-tl:lFCT>HTllEK99BB 

9658 IFI.V(CT) <HTHEN969e 

9790 PRINTe968,BLj !PHIKT9968,'NEW VALUE ■" i lCI = 9eB ;G0SL'ai4BBB jF- 

VALdl 

9758 IFFtVYORFX (CN*13UVYlTHENPRINTB96fl,BLr:PRINTe968,"VAL OUT 

OF RANGE, REENTER]") :FORC1=1T015BB;NEXT:GOT097BB 

980 B GOSUB128BB;COSUB89BBiIFTY="L"THENGOSUB50BBELSEGOBUBllB9B 

985B RETURN 

99BB PRlNTe96B,BL)!PRINTP96e,"NAME NOT FOUND, REENTER 1 ';: FORCT-l 

T015BB:NEXT:GOTO955fl 

1B0BB REM ••• DELETE •" 

iaB5B IFNS="1"PRINT§968,BL; :PRIMT*96B, "UNABLE TO DELETE, HOT SAV 

ED"j :FOBCT-lT015aB:NEXT:GOT01B3BB 

1B10B IFCL-CnGOTOia29B 

lB15fl M(CL1 -K(CLfl) i CL-CL*1 ; IFCL<>CHTHEN1915a 

Program confjnuffs 



Programs and 
Books For Beginners 

Everything you need to know to get started 
programming your own computer. Nine brand-new 
books, each jam-packed with easy-to-understand info 
for beginners, laymen, novices, general consumers 
who want to know how to make a computer work tor 
them. Good for advanced novices and programmers 
too. These handy manuals, guides and program 
sourcebooks are crammed with hundreds of tips, 
tricks, secrets, insights, shortcuts and techniques, 
plus hundreds of tested, readyto-run programs. 

Color & Pocket 

TRS-80 Color Computer. TRS-80 Pocket Computer. 
Sharp PC-1211 Packet Computer. Three of the most- 
popular computers for beginners. Among our 9 freshly- 
written books are scores of programs, tips, tricks and 
learn-by-doing Instructions for beginners. 

BASIC- language 

BASIC Made Easy, easiest way yet to learn the 
worlds most popular computer language, 
140 pages. $S.9S 

Universal BASIC Coding Form, programming 
worksheets make writing software a breeze, 
40-sheet pad. $2.95 

Pocket Computer 

so Programs in BASIC for ttie Home, School & Of- 
fice— 2nd Edition, useful piug-in-and-run software, 
for the Pocket Computer. 96 pages. $9.95 

SO MORE Programs in BASIC for the Home, School & 
Office, sourcebook of tested ready-lo-run software. 
for the Pocket Computer. 96 pages. $9-95 

101 Pocket Computer Programming Tips & Tricks, 
secrets, shortcuts, techniques from a master pro- 
grammer. 128 pages. $7.95 
Murder In The Mansion and Other Computer Adven- 
tures— 2nd Edition, murder mystery, space, 
adventures, loads of fun. 34 programs. 
96 pages. $6.95 
Pocket Computer Programming Made Easy, new fast- 
and-easy way to make the worlds smallest computer 
work for you, 140 pages $8.95 
Pocket-BASIC Coding Form, programming 
worksheets make writing pocket computer software 
easy and fun, 40sheet pad. $2.95 

Color Computer 

101 Color Computer Programming Tips & Tricks, 
tearnby-doing instructions, techniques, shortcuts, 
insights, 128pages. $7.95 

55 Color Computer Programs for the Home, School & 
Office, practical ready-to-fun software with graphics, 
96 pages. $9.95 

55 MORE Color Computer Programs for the Home, 
School & Office, sourcebook of useful plug-in-and- 
run software with graphics, 96 pages $9.95 

Order direct from this ad. Send check or money order. 
Include $1 shipping for each item ordered. Or write 
for our free catalog. Mail orders to: 

ARCsoft Publishers 

Post Office Box 132 L 
Woodsboro, Maryland 21798 

telephone (301) 663-4444 



-See Lisi ol Advertisers on page 402 
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"After you enter each value, 

its point is plotter' --- *'-" screen. 




Photo 3 



enter .1. This shows that the values repre- 
sent 8.0 to 14.5 miles. All the Y axis informa- 
tion would then be displayed on the screen 
and the first value label would be asked for. 

You could then enter labels and values 
such as WK1 and 106 (for 10.6 miles). If you 
had been jogging for six weeks you would 
enter six latwls and values and when asked 
for the seventh label, you would enter a 
space to stop entering values. After you 
enter each value, its point is plotted on the 
screen. You would then enter a title such as 
Miles Jogged 3/2-6/7. 

Finally you enter L for line graph and the 
line is drawn on the screen. You could then 
save the graph and write it to tape with the 
rest of the graphs in memory. At a later 
date, you could load the tape, retrieve the 
graph and add values to it. Photo 3 shows 
the graph our running example would 
generate. 

Program Deacriptlon 

The program is written in Level II Basic 
for 16K memory. It takes 9K to load and run, 
leaving 7K to store up to 50 graphs. It is writ- 
ten In a structured or modular manner, 
meaning that each routine or module is a 



such as dollars, pounds, temperature, 
miles, and so forth. 

• Y Multiplier (one-five characters)— this 
is what the Y values are to be multiplied 
by to handle decimal numbers and large 
and small Y values. Examples are. 1, .001, 
1000, 100, MIL and so on. If no multiplier 
is needed, NONE is entered. 

• Label Value n (one-three characters)— n 
= 1 to 14; this is the name of the value 
you are going to enter, such as WKl , Sun, 
May, USA, Bob and so on. A space is en- 
tered to stop inputting values. 

• Value n - n = 1 to 14— this is the ac- 
tual value to be plotted; it has to be within 
the range displayed on the Y axis, but it 
does not have to be an integer. 

• Title (one-24 characters)— this is the 
title of the graph. 

• Type (L or B)— L to select a line graph 
or B to select a bar graph. 

For example, if you wanted to graph how 
many miles you jog each week, you could 
proceed as follows: When the menu screen 
is displayed, you press two. The X and Y 
axes are drawn and the program asks for the 
start Y value. We'll assume you jog between 
eight and 15 miles a week. You know you 
can display 14 numbers on the Y axis, so 
this means you can display every mile and 
half-mile between eight and 14.5. Only inte- 
gers are allowed on the Y axis so you enter 
80. The program then asks for the incre- 
ment and you enter five. For the Y label you 
enter Miles and then for the Y multiplier you 
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"Each graph is stored in memory and on tape 

as one 122-character string." 
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GOSUB from a higher level. The top level, 
the menu, is the only routine that is not a 
GOSUB. Fig. 3 shows how the levels are ar- 
ranged in the program. For example, the 
calculated Y coordinate routine (level 4) Is a 
GOSUB from the assign value routine (level 
3), which is a GOSUB from the new graph 
routine (level 2) that is a GOSUB from the 
menu routine (level 1). 

All of the routines in the program are in- 
dependent modules. A GOSUB is the onty 
way into the module and the Return state- 
ment is the only way out. All GOTOs in a 
module are to statements within that 
module or to the Return statement. The vari- 
ables used by the program are listed in Fig. 4. 

Each graph is stored in memory and on 
tape as one 122-character string. When a 
graph is saved, all numeric information is 
converted to string values and is combined 
with the graph string information and the 
name string assigned to the graph. When 
retrieving a graph, the numeric string infor- 
mation is converted back to numeric. To 
save time when reading and writing to tape, 
each read/write is of two graphs combined 
into one 244-character string. The layout of 
the 122-character graph string Is shown in 
FIfl. 5. 

The menu routine starts on line 100. This 
is the main driver of the program. It displays 
the menu and then, depending on the Key 
pressed, issues a GOSUB to perform one of 
the four main functions. If the End option is 
selected, it checks to see if the graphs in 



memory have been updated, and if they 
have. It gives you a chance to save memory 
on tape twfore ending. 

The load data tape routine starts on line 
1000. The first record read Is the number of 
graphs on the tape. The data Is then read in 
as 244-Gharacter strings, two graphs to a 
string, and stored in memory. 

The write data tape routine starts on line 
4000. It does the opposite of the read tape 
routine, writing out the number of graphs 
and then writing out the contents of the 
graph table, combining every two graphs in- 
to one 244-character string. 

The build new graph routine starts on line 
1400. It prints the graph-building questions 
and accepts the information entered. Be- 
cause the questions are printed on the bot- 
tom line and inputting data on the bottom 
line causes line feed, the input statement 
cannot be used. All the data is entered us- 
ing the INKEYS subroutine that starts on 
line 14000. It is described beloW. All of the 
graph drawing is done by GOSUBs to graph 
drawing routines. The Inputting of values is 
also done by subroutine. 

The retrieve graph routine starts on Hne 
2500. tt first displays the names of all the 
graphs in memory and then, using the IN- 
KEYS routine, accepts the name chosen. 
Lines 2800-3100 are a binary search of the 
graph table for the chosen name. If the 
name Is not found, an error message is 
displayed and another choice Is asked for. 
When the graph data is found. It Is decoded 



and the graph variables are set up. GOSUBs 
are issued to draw the graph. 

At the end of both the new graph and re- 
trieve graph routines is a GOSUB 7500. 
Starting in line 7500 Is the graph function 
routine. It displays the graph title and an 
asterisk and then goes into an INKEYS loop 
to accept commands. Depending on the key 
hit, it issues GOSUBs to perform the 
various graph functions or returns to the 
calling routine. When it is about to issue a 
GOSUB, it blanks out the asterisk. 

The save routine starts on line 7700. If the 
graph Is new, it asKs for a name for the 
graph and uses the INKEYS routine to ac- 
cept the input. For both old and new graphs, 
the graph data is then encoded and stored 
in memory. An old graph is stored in the 
same location it was retrieved from. For a 
new graph the graph table Is stepped 
through, each entry being shifted down one 
position, and the new graph is inserted right 
before the entry It is greater than. If the new 
name Is already in memory, all the down- 
shifted table entries are shifted back and an 
error message is displayed. 

The switch routine starts on line 8700. It 
first issues a GOSUB to the clear graph rou- 
tine to blank out the graph area and replot 
the points. It then switches the graph type 
and Issues the GOSUBs to draw the new 
typed graph. 

The add value routine starts on line 9100. 
It checks the value latwl table and finds the 
first empty value. It then issues a GOSUB to 
the enter label and value routine to accept 
the value and label being added and then is- 
sues a GOSUB to draw the graph with the 
added value. 

The change value routine starts on line 
9500. It asks for the label of the value to be 
changed and then searches the label table 
for It. If the label is not found, an error 
message Is displayed. When the label is 
found. It Issues a GOSUB to the Enter value 
routine, replaces the value in the value 
table, and then issues GOSUBs to (he clear 
graph routine and the graph drawing rou- 
tines to draw the graph with the new value. 

The delete routine starts on line 10000. It 
checks the new graph switch and If it is a 
new graph, it displays an error message. If it 
is an old graph, it is deleted by shifting all 
the table entries below it up one position. 

The draw line graph routine starts on line 
5000. This routine determines the length 
and number of small line segments needed 
to draw a balanced, proportional tine tie- 
tween two points on the graph, and then 
draws It. The routine is divided into three 
separate areas. Line 5300 handles point dif- 
ferences of zero, one, two and six. Lines 
5350-5550 handle differences of three, four 
and five and tines 5600-6200 handle differ- 
ences over six. The six and under differ- 
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ences are drawn as unique situations. The 
over six differences are each calculated 
separately. The over six routine calculates 
how many middle line segments are needed 
and how long they will be. Any leftover 
amounts are divided tMtween the top and 
bottom of the line. Line 5600 performs the 
calculations that result in the following 
variables: 

D2 z Length of middle line segments: 

D3 = Number ot middle line segments: 

04 = Length ol end line segments; 

D5 = Number of end segments (to be decremented); 

D6 = Number of end segments (not to be decremented). 

The routine then uses these variables to 
draw the line, splitting the end segments 
between the top and bottom of the line. In 
all cases D' is the direction of the line, 
minus one for up or plus one for down. 

The bar graph routine starts on line 
11000. It is a St raightf onward Set loop, Set- 
ling all coordinates between the point and 
the X axis. The layout X and Y axis routine 
starts on line 7000. It draws the X and Y axis 
on the screen with Set loops. The Y axis rou- 
tine starts on line 10500. It displays the Y 
range numbers, the Y label and the Y multi- 
plier on the screen. The label and plot value 
routine starts on line 10700. It displays the 
value label and performs the Sets to plot the 
point on the screen. 

The assign label and value routine starts 
on line 11300. It asks for the value label and 
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the value. It issues a GOSUB to the Y calcu- 
late routine and then stores the label and 
value coordinate in their respective tables. 
It then issues a GOSUB to the label and plot 
routine. 

The Y calculate routine starts on line 
12000. It calculates the Y coordinate value 
that is closest to the Y range value that was 
entered. 

The clear graph routine starts on line 
8900. It prints long space strings to blank 
out the graph area, and does Sets and 
Resets to clean up the X axis. It then issues 
GOSUBs to replot the points. 

The encode numerics routine starts on 
line 8550. It converts a numeric graph vari- 
able into a specified length string and then 
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combines the string with the total graph 
data string. C3 is the length of the string, 
which is set up by the calling routine. 

The iNKEY$ routine starts on line 14000. 
It is an INKEYS loop that builds a string of 
characters of the keys hit. It also prints 
each character as its key is hit. CI is the 
print location, which is initialized by the 
calling routine, if a backspace (ASC 8) is 
detected, the last character is deleted from 
the string, the last character printed on the 
screen is spaced out and Ci Is decremented 
by one. If an Enter (ASC 13) is detected, the 
subroutine stops and returns to the calling 
routine. 

Final Comments 

This program has been designed as a 
general-purpose graph utility program able 
to draw and maintain a wide variety of dif- 
ferent graphs. However, if you want to in- 
corporate graphing into an existing pro- 
gram or one you are writing, you can also 
use this program. Because each routine is a 
separate module, you can just add the 
modules you need to your program to 
generate your specific graph. If your pro- 
gram generates the values to be graphed, 
you can have it load the value table and 
then issue the GOSUBs to draw the graph. 

The program should also be very useful in 
helping to leach children about graphs. For 
example, the change value function lets 
them see how different values change the 
appearance of the graph and the switch 
function shows them how a bar and line 
graph show the same information in dif- 
ferent ways. 

If you want to store your graphs on disk, 
just rewrite the load data and write data 
routines to read and write to disk. No other 
changes should be needed. 

A final note: Don't use Break to end the 
program. Option five on the menu will end 
the program normally and If you have saved 
graphs in memory, it will remind you to save 
them on tape. If you use Break, you could 
lose the graphs you've stored In memory.! 
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CONVERT YOUR TRS 80 MODELI INTO A 

DEVELOPMENT SYSTEM 
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CERTRDniCS 

ADD lowercase with our 
PLUG-IN piggyback board! 

9WX7H Dot Matrix $135 
5WX7M Dot Matrix $ 95 

TWO complete character sets on board: 
96 character ASCII PLUS choice of 
128 character APL, TRS-80/H-19 Graphics or 
Scientific. (Customer defined: add $50/se1). 
Most printers convertible: specify logic board # 
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Untangle with the Organizer! 



Now you can place your TRS-80 Model 1 compo- 
nents into one convenient desk top package. Ttie 
ORGANIZER puts everything within reach, with 
room for Monitor, Expansion Interface, four Disk 
Drives, Diskettes, Cassettes and tape recorder. 
The ORGANIZER eliminates messy wires, re- 
duces eye and body strain, provides room for ven- 
tilation, and works as a dust shield. 

The ORGANIZER consists of two cabinets: 

CABINET ONE holds Monitor, Expansion Inter- 
face, Power Supplies, Line filters, Cables, Power 
strip, Fan and has an easily removable front panel 
for re-booting. 

CABINET TWO can hold up to four Disk Dnves, 
Tape Recorder, Fan, Diskettes and cassettes. This 
cabinet is usable with any manufacturer's 5V4" 
disk drives. 

BUY BOTH— $87.50 + $8.75 ship & handle 

CABINET 1— $64.00 + $5.75 

_„ ship& handle 
(JH: 

CABINET 2— $44.00 + $4.50 
ship & handle 

For VISA, MASTERCARD, orC.O.D 




CALL NOW TOLL FREE 

Continental U.S.... 800-824-7888 ask for operator 617 

California . . 800-852-7777 ask for operator 617 

Alaska and Hawaii . . . 800-824-7919 ask for operator 617 

Or send check or money order to: 



DESIGNATRON 



2794 Hume Rd, Malibu, California 90265 
For information call (213) 456-9023 



•See List ol Aa^erlisers on flage 402 
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GENERAL 



Corral the features you want 

before you put your brand on a word processing system. 



A Fast Round-Up 



Gordon McComb 

410 Escondido Avenue 

Vista. CA 92083 



lAf ord processing programs for the 
■ ■ TRS-80 Models I and III are about a 
dime a dozen. Well, actually, they cost up 
to a hundred dollars apiece and that's 
where the problem begins. Word Process- 
ing is one of the most versatile, worthwhile 
and time saving programs you can run on 
your computer, but there are so many to 
choose from! How do you go about looking 
for a good word processing package and 
not go broke In the process? Read on! 

Good Versus Good 

It is difficult to define a good or bad 
word processing program. Many will agree 
that when a program is full of bugs, 
doesn't live up to Its advertising and is an 
all-around letdown— yes, that's a bad pro- 
gram. But, like a lot of software, good is in 
the application of the beholder. A word 
processing program may be perfect for one 
user and lousy for another. 

Here are five simple steps that can help 
you choose a better word processing 
package: 

• Always select a word processing pro- 
gram that will fit your needs— both 
present and future. You may not always be 
able to find an off-the-shelf program that 
will do everything you want it to do, but you 
should be able to come close. The bottom 
line: Choose a word processing program 
that will get all of your jobs done. 

• Your program should be flexible 
enough so that it can grow as your applica- 
tions grow. If you think that In the future 
you'll need to create more than just form 
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letters with your system, make sure your 
software can complement your needs. 

• The word processing program you 
choose should fit the capabilities of your 
present inventory of hardware. Ideally, 
your program should grow as you Improve 
your system. If the software Includes 
fancy graphics, along with underlining, 
boldface and Justified margins, it won't do 
you much good if you own a modified IBM 
Selectric. 

Incidentally, your printer is an integral 
part of your word processing system, but 
many people fall to give it the attention it 
deserves. The best printers for word pro- 
cessors are the daisy-wheel or a high- 
quality dot matrix. 

• The main purpose of a word process- 
ing package Is to save you time and 
money. Word processing is particularly 
useful when repetitive typing is necessary; 
for example, letters, reports and docu- 
ments. Word processing software is also 
good for preparing original manuscripts (no 
more Liquid Paperl), sending out bills and a 
host of other applications. It's important 
^hat your program doesn't slow you down. If 
it takes less time to type it out manually, 
then you're defeating the purpose of word 
processing. 

• Finally, the program should be easy to 
use. A complicated program may be fine 
for someone well versed In computers, but 
it's out of place for the average user. Some 
programs require a certain knowledge of 
computers to operate properly. Make sure 
you (and your operator) can use the pro- 
gram to Its fullest. 

However, a complicated program doesn't 
always mean a complicated operation. 
Many programs jammed with goodies are 
far simpler to use than some that do 
nothing more than print out form letters. 



The documentation supplied with the 
software Is another Important considera- 
tion. Some are written with technical 
jargon understood only by computer 
engineers; others are written for the rest of 
us. Tutorial aids, such as audio cassettes, 
can also be a real help when learning to 
use the program. 

Inside a Word Procsssor 

In order to choose the best word 
processing program for your particular 
needs, it is important that you understand 
the features common to most word 
processing software. You may find you 
don't need some features; others you 
might not be able to do without. Following 
are several important features that you 
should consider In your quest for the 
perfect word processor. 

User-defined Video and Printing 

You should be able to change the way a 
document will appear on the page when It 
Is printed. In addition, altering the ap- 
pearance of the text in the video monitor 
helps In preparing and editing non- 
standard documents. 

Normally, the computer will set up all 
screen and printer formats when you start 
up the system. It will assume you want to 
use the program In the normal fashion. 
These are called defaults, and unless you 
tell the computer otherwise, It will perform 
all of the functions as originally designed. 

A word processing program capable of 
printing documents only on standard 8Vi 
by 11 paper will be of little use to an at- 
torney or others who use a larger paper 
size. 

Cursor Control 

The ease with which you can position 
the cursor for writing and editing the docu- 

Reader Service tor facing page ^3J&* 



DBS... 

true data base management 
for your TRS-80 " 

Yoiu- Model II is not a toy... and neither is MDBS. 
MDBS is the serious tool for applications development. 



Harvey M. Weiss, 

an independent 

software reviewer: 



ONLY MDBS has 
all these features! 



"MDBS is truly a data base management system not a file management system. " 

"MDBS. . . offers the data manipulation, query, and report-writer capabilities of a DBMS 
found on much larger and more complex computer systems." 

"MDBS has come to the rescue with. . .products whose ability to reduce development time 
and implement processes not available elsewhere make Ihem invaluable to integrators and 
developers of ^c-based systems. [With MDBS,]. . .program development and data base 
description is simple." 

For the complete Weiss review, see "Downscating DBMS to the Microworld, ' Mini-Micro 
Systems. April, 1981, pp. 187-195. 

Flexible, powerful data structuring capabilities: network and hierarchical data structures, 
including direct many-to-many relationships (not available elsewhere) 

Genuine data base management capabilities: far surpasses file management in data 
independence, automatic maintenance of relationships, and control over data redundancy. 

English-like, nonprocedural query language interface: ad hoc queries result in theautomatic 
generation ot desired reports, tables, files, and relations. 

Host language interfaces, including various BASICS. COBOLs, PASCALS. FORTRAN, PL/I. 
C. and several assemblers. 

Extensive built-in data access security (256 levels). 

Automatic transaction logging and data base recovery. 

Dynamic data base restructuring. ..and many other advanced data base management 
features. 

Is MDBS right MDBS is written in Z-80 machine language and runs under TRSDOS or NEWDOS with TRS 

for your system? DISK BASIC; under CP/M® (and similar derivatives) with C8ASIC2, PL/1, PASCAL Z, 

PASCAL M, PASCAL MT+, 8DS C. CIS COBOL, and Microsoft COBOL. FORTRAN, or BASIC. 

MDBS code size is only 18K to 20K bytes for Models I and II 

MDBS is independent of the types and sizes of disk drives. Supports data base spread over as 
many as eight disk drives. 



To learn more 



Free pampniet 



» For free literature about serious data base management on Models I and 1 1, call, write, or TWX 
us. We'll include a pamphlet on features to consider when choosing a software tool for 
application system development. 

' For a practical introduction to true data base management for small computers, please send 
$20 {Indiana residents, add 80C tax) for PRIMER/GUIDE booklets. 

' For a comprehensive DOCUMENTATtON PACKAGE consisting of THE PRIMER plus user 
manuals covering the MDBS. ORS, RTL, and DRS, please forward $60 (+ $2.40 Ind. tax) 



Setting standards of excellence for data base 
software. . .worldwide 



iUicrr 
Dotn Base 
Sustems, inc. 

Bo^ ..« 

Lafayette, Indiana 47902 

317-448-1616/TWX 810-342-1881 

Dealer/distrlbutor/OEM inquiries invited. 




D Please send me free literature on the MDBS. 

a$20 (Ind. tax SOC) enclosed for MDBS PRIMER 
and GUIDE (total 97 pages). 

n$60 (Ind. tax $2.40) enclosed for Complete 
MDBS DOCUMENTATION PACKAGE. 



Name 



(Please print) 



Title 



Company 
Address _ 



City 



(State) 



(Zip) 



MAIL TO: Micro Data Base Systems, Inc. .^315 

Box a48-M 
Lafayette, IN 47903 



-'See Lisf o' Advertisers on page 402 
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"Global editing is a boon 

for indexing, form letter preparation, 

specification typing and many other documents. 



ment is a feature often overlooked. The 
longer the document, the more tedious it 
will be to position the cursor. Some pro- 
grams move the cursor only one character 
and one tine at a time. Others flip through 
the document from beginning to end, go 
back and forth from the start to the end of a 
line, and so forth. If you need to work with 
lengthy documents, it might be a wise idea 
to stay away from a program that has limit- 
ed cursor control. 

Wrap-around 

You may notice that on most word 
processing programs you don't need to 
push Enter when you finish a line. If a word 



exceeds the maximum screen width, it will 
wrap around onto the next line. 

Local Edit 

Local editing refers to one-at-a-time 
changes. The simplest form of editing is 
the strikeover. If you make a typo, you 
merely position the cursor over the wrong 
letter and retype the word correctly. 

Other local editing features include 
single word delete or insert and line delete 
and insert. If you need to take out a word, 
position the cursor on the first character 
and push the Delete key. The word is 
erased and all of the text closes up to fill 
the gap. The words re-wrap as needed to 



Underlining 



Boldface 



Charactef l/D 




Line l/D 



Global Replace 



Global Search 



Global De\e\e 



Headers & Foolers 



Auto Pagination 



H/phenalion 



Selectable Tabs 



Block Manipulation 



Flush Right Margin 



Justification 



Centering 



Vertical Cer\terlng 



Merging 



Menu Dnven 



Tutorial Aides 



Free Updates 



Modification Req'd. 



Table 1 



make It tidy and neat. 

Global Editing 

Let's say you must change a person's 
name throughout a lengthy document. In- 
stead of tediously looking tor each occur- 
rence and making the changes manually 
one at a time, you can instruct the com- 
puter to perform a global replace function. 
You tell the computer what name to find 
and what to exchange it with. 

Other global functions are search (or 
find) and delete. Global editing is a boon 
for indexing, form letter preparation, 
specification typing and many other 
documents. 

Header and Footer 

There may be times when you need to in- 
clude a title or your name on each page. A 
header will place this information on the 
top of the page; a footer on the bottom. 
You can also select this function to occur 
only on odd or even-numbered pages 
(when a document Is printed on both sides 
of the paper, for example). 

Auto Pagination 

Since it is often difficult to determine 
when one page will stop and another will 
begin, a program that automatically 
numbers the pages can be very handy. 
Many programs enable you to begin 
numbering at any point in the document 
and place it anywhere you wish in the top 
or bottom margin. 

Margins 

In addition to tieing able to select the 
amount of margin space on the top, bot- 
tom, left and right sides of the paper, your 
word processing program might also be 
capable of: 

• Flush right margins— where the stan- 
dard even margin Is on the right side, 
not the left. 

• Justified— both side margins are 
even. Space is added between words 
to spread out the lines when 
necessary. 

• Centered— each line is centered on 
the page. 

• Vertical centered — where the entire 
document is placed neatly in the mid- 
dle of the page. No more top-heavy 
letters! 

Page Scroll and Line Scroll 

Depending on how your program "sees" 
the text, you'll be able to go through the 
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'Merging, in this case, has nothing to do 
with Wall Street or big business. " 



document either one line at a time, or en- 
tire pages at once (screen pages; usually 
only one third or one fourth the amount of 

copy of a printed page). 

Tabs and Indenting 

Many programs enable you to select a 
tab stop at every character position. 
Others have pre-selected tabs, usually at 
five or 10 spaces apart. Many programs 
will indent at the beginning of each new 
paragraph. Few programs will allow you to 
have each line indented, as when prepar- 
ing outlines and specs. 

Block Manipulation and Merging 

A block is any large amount of text. 
Whenever you need to alter entire seg- 
ments, block manipulation will come in 
handy because you won't have to retype 
the text. If you need to change the position 
of a particular paragraph from the begin- 
ning to the end of a document, you begin 
by placing block markers around the para- 
graph, then tell the computer where you 
want the text to be moved. 

Merging, in this case, has nothing to do 
with Wall Street or big business. It is a 
highly useful feature that enables the 
operator to send out items such as per- 
sonally addressed form letters In a mini- 
mum amount of time. 

First, you create a primary document 
and Insert variable commands wherever in- 



formation is to be changed. On the secon- 
dary document, you include names, ad- 
dresses, account numbers and balances 
(or whatever). When you merge the two, the 
information from the second tile will be in- 
serted into the proper slots in the text of 
the primary document. 

Merging is a feature many programs 
don't have, but it is something you can buy 
as an add-on to your present word process- 
ing program. 

Modification Requirements 

A few of the programs recommend cer- 
tain hardware modifications (in addition to 
the standard upper/lowercase modifica- 
tion for the Model I). You'll need to con- 
sider this very carefully, especially if you 
have a new machine which is still under 
warranty. Opening up the keyboard and 
adding hardware will definitely void the 
warranty. 

Priorltifls 

How do you go about deciding what 
you'll need in a word processing program? 
First, examine the type of documents 
you'll be preparing. Cross reference these 
with features that you must have to ac- 
complish the work. If you want, put a point 
value on the importance of each feature. 

Then compile a similar list, this time jot- 
ting down features you'd like to have, but 
which are not absolutely necessary to 



carry out what you need. Assign a point 
value to these also. 

Compare your lists with the programs 
available on the market. Those most needed 
features will be on the top of the list, and soft- 
ware that fails to pass should be dropped 
from the race. 

After this process of elimination, you 
should have one or two programs that will 
suit your needs. Contact the nearest sup- 
plier of the program and see if you can ar- 
range a demonstration. Since software is 
something you usually can't return, it's a 
good idea to be absolutely sure you know 
what you're getting. 

To make your search a little easier, 
we've compiled a list of several word 
processing programs available for the 
Models I and III. We sent out a detailed 
questionnaire to about two dozen soft- 
ware houses and those that responded 
have been included here. Undoubtedly, 
there are many other programs available, 
but this cross-reference chart should steer 
you In the right direction m determining 
which software will be best for your par- 
ticular application. 

To some, word processing seems like a 
luxurious fad. People have been banging 
out letters on typewriters for almost 100 
years. Why not 100 more? But we 
guarantee, if you try out a good word 
processing program, you'll wonder how 
you ever got along without it! ■ 



ONINITERNI 

WtiitbOKNITEHM? 

OMNITERM t! 3 professional commuiiiuliwts padagt tor ttK TRS-SO that allows 
you to easily rommumcalt and ItansfK file or pfograms witti almost any otiwr 
compilr Wt'vtiwvefcmwlaawtpultf thai OMMITERM can't wort wilMt's a 
oimplttt wckagt tiecaust it indudes no! only ttie tHminal fliogtam ilstif, twl also 
convsnlon utliltitL a teit editor, speaal conflguritlon llln. tirtoui 
docufnntatioii ami lerlout supgol 

Why do I ntRd It7 

Voa mi OMNITERM if yM Mtd to aynmunicatE (tfnattty irtti mwy drtlunt 
OHninters. m il yn want to oistomizt ynir TRS-SO to( ssi with mt particulai 
cofflputtr Yoi ml OMNITERM to SOLVE your comflWiicatiDn problBiu onci 
anlfHll 

WTiit do I git? 

TIK OMNITERM padagt ifldude tk OMNITERM lErmnal progtam, touf 
mnvtrMon utilities, a ttit riiloi, and sflting filts lot ira wifli (Dpulai computtrs 
sudi as ConouScfvt. tta Sourct and Dow tones — i«st as sampies of what yni can 

llndhQrgh SyBtams 



The ULTIMATE TRS-80 Terminal Package 



do tor tbt sxnputtr yx want to worii with The package indudes ai programs, seven 
lata files, an) real documentation a 7S-(tage manual thai has been caDed "ttie bctt In 
the Induitry." And OMNITERM csmes Willi real user support. Kc can be reach td 
via CompuServe. Soufct, phone, or mail to promptly answer youi qsestions Aoil isirtg 
OMRITtRM. 

mn do 1 rtesd to uie OMNITERM? 

A Model I 01 Model III TRS-80 at least 32K of memofy one disk, and the RS 232 
inteffact OMNITERM works with a|i ROMs and DOSes and vrlll work witli your 
speaal l^eytioard drivers 

What will il do? 

OMNITERM allows yog to translate any character going lo any devw pnnlet sum 
disk teytioarfl or communications line giving you wmplete control and allowing you to 
reddine the character «1s ot *l Oevices It W'll lit you Iransler [lata and m your 
pcifitei white connected tor a record o1 evtrything that happens. OMNITERM can 
reformat your sciew so that 80. 32 or 40 ralumn lines are easy to read and look neat on 
your THS-80 screen It evw lets yoi gel Dfl remoK corrputtfs with jusl one tFysKote' 
the pioqram lets yow send special characters ectw characters cou^t UART er'ots 
corfpgwe your U*RI snd True Breaks and use lower case ll acrepis VlOEOTtX codes 
grYingyDL lull cursor control. II wiNefHilBt you review let that has sciolleb oil 
the screen' Best nl all OMNITERM *ill save a special file with all your changes so you 



can quickly ust OMNITERM tor any 
one of many ditleint computers try 
loading ttie proper file It's easy to use 
since it's mem drhren. and gives you a 
full status display so you can ejamir\e 
and diangi evtrything 

"OMNITERM has my vote as the top_ 
TRS-flO tsmnal progrvn available today" 
KiloOaud Micfocompuling, June 1961. 
pages 16-19. 

OMNITERM is 195 (plus shipping if 
CODi Call tor 24 hovr shipment Marual 
alone S15. applied Imanl coflipiett pact- 
age ^u M/C an] COO acupted MA 
residents add 5% tai Dealer inquiries 
invited 

Contact LitdMrgh Systems fur your 
custom programming nods We are 
eipert at wriitig sofTwart tn wort with 
YOUR hanJwan. in assmbltf. Ingh-level 
language or Forth. 



41 Fatrhiil Read rtolden. MA D1520 (61T| 852-0233 ^r^iosi! camp^MTCiosT rns«,i -ji ij^cncoj 
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fuMPUTEX 



321 El Dorado • Webster Texas 77598 • (713) 486-8022 >-392 



...for the most satisfying gifts all year 



FROM COMPUTEX 



MODEL III SYSTEMS 



COMPLETE BUSINESS SYSTEMS 



• Astec switching power supply for cooler, more efficient operation • goldplated edge card 
connections for improved reliability • floppy disk storage to 2 Mbytes • disk controller handles 
40/80-track single and double-headed drives • fully compatible with TRSDOS, LDOS, DOS+ and 
NEWDOS 80 • fully tested and burned in • 90-day warranty on parts and labor. 

Model 321 - 350 Kbyte $1 ,895.00 

■ 46K Model III with two Tandon 40-track single-headed double 
density disk drives • system includes TRSDOS, dust cover and one box 
of Verbatim diskettes ^_ . _^ 

Model 322/ 3 - 700 Kbyte $2,295.00 

• 48K Model HI with your choice of either two Tandon double-headed 
40-track disk drives, or two single-headed 80-track drives • system 
Includes LDOS. dust cover, and one box Verbatim diskettes 
Model 324 - over 1 .4 Mbyte $2,595.00 

• Our largest all-in-one Moaei III provides over 1 ,4 Mbytes ot floppy 
disk storage with two Tandon double-headed 80-lrack drives • 48K 
Model III system includes LDOS. dust cover, box Verbatim diskettes 

We now carry complate buslnus tottwira from SBSQ, Qalactle, PROSOFT. Ridio Shick, many ottian 




TANOON 8" THINLINE DISK DRIVES 

• Exactly halt the tielght of any 
other model 

• Proprietary, high-resolution, 
read-write heads 

• DC operation - no AC required 

• Industry standard interlace 

• Same as Shugarl SA901, pinout 

• 3-ms irack-to-track access time 

• Single or double headed 

• Single or double density 

TM 848-1 

Single-sided 77-track - Storage: 600K 
density. 1.2 Mbyte double density 

TM848-2 $595.00 

Double-sided 77-track - Storage: 1 .2 Mbyte 
single density, 2.4 Mbyte double density 

Complete Model II expansion bay system will be 
announced soon. 




$495.00 

single 



TANDON TM600 SERIES 
5%" MINI-WINCHESTER 
DISK DRIVES 

• Highest storage capacity of any 
5'/»" high-speed random access 
drive 

• Up to 46 Mbytes online storage 

• Up to four TM600's can De 
daisy-chained on single bus 

• S-version compatible - Shugurt 
SAIOOO and Seagate ST506 

TM602S $1,195.00 

3-ms access time- 612 tracks - 5 M bytes /s data transfer 
rate - 6,38 Mbyte RPM capacity (unformatted) 
TM603S $1,295.00 

3-ms access time - 918 tracks - Mbytes/s data transfer 
rate - 9. 57 Mbyte RPM capacity (unformatted) 

Complete Model I and III systems will be announced 

soon. 




TRS 80 MDX-2 SYSTEM EXPANSION 

The new MDX-2 from Cofnputex provides more 
capabilities than any other system expansion currently 
available. • build only what you need • sili(-screenea 
and solder-masl<ed PCB • dip switch instead of 
hardware jumpers • no messy vertically-mounted 
termination resistors. 



tm M 




complete kit 

$269.00 



MDX02 printed circuit Board .$74.95 

Onboard direct connect modem kit 3995 

2K/4KEpromklt 17 95 

RS232mAserialintertac8 17.95 

Real-time clock kit 17.95 

Floppy disk controller kit 31.95 

32K RAM expansion kit {less RAM) 11.95 

Cassette port 3.95 

Analog power supply 29.95 

Hardware and socicet kit 19.95 

Centronic line printer port a.« 

16K Ram memory 14.95 



COMPUTEX 
Comprehensive Test Program $21.95 

As a leading supplier of disk drives and TRS80 systems, we had to have 
a system test program • and one that we could trust. Since none existed 
we wrote our own. Now we make It available to you. A must for disk 
drive users - no library should be wittiout one. 

disk drive speed test • disk drive alignment program 

requires alignment disk - Dysan Alignment Disk 
9.95} • expansion intertace RAM test • keyboard 
RAM TEST • video RAM test • keyboard bounce test • 
ROM checksum program • full screen RAM display 
program 



$3 



TANDON DISK DRIVES 



• Fast 3-5-ms track-to-track access time 

• Single or double density operation 

• Total connpatibllity with Model I or III 

• Pre/post testing during 48-hour burn-in 

• 90-day limited warranty 



S299 95 TM100-1 - singte-slded 40-track drive - 102 Kbytes single density 180 $035 00 
Kbytes double density 








$399 95 TM100-2 - double-sided 40-track drive - 204 Kbytes single density - 360 €335 nn 
5^ ' Kbytes double density 



2£ $399 95 TM100-3 - single-sided BO-track drive - 204 Kbytes single density - 360 $335.00 

o«e " Kbytes double density 

$499 95 TM100-4 - double-sided SO-track drive - 408 Kbytes single density - 735 C43C nO 

' Kbytes double density ♦hoo.w 






2-drlve cable - $24.95 



• 4'drlva cibi* - $34.95 



• driva extandar $14.95 



iVIODEL ill DISK DRIVE EXPANSION KITS 



• Switching power supply • storage to 2 Mbytes • supports TRSDOS, LDOS, DOS + , and new DOS80 

• 32K RAM expansion • double density disk controller • goldplated edge card connections • includes 
TRSDOS and manual, all cables and necessary hardware, installation manual • fully tested and 
burned in • 90-day warranty 

M3DK0 - Drive kit with one Tandon single-sided 
40-track drive $550.00 

M3KD1 - Drive kit with two Tandon single-sided 
40-track drives $765.00 

M3DK2 - Drive kit with two Tandon double-sided 
40-track drives $995.00 

'/ M3DK4- Drive kit with two Tandon double-sided 

80-track drives $1,195.00 




^ 



LNW Color $499.94 

Computer Kit 

All components to assemble LNW color 
computer - high resolution video HAM and 16K 
user l^AM - keyboard - level II compatible 

ROM's, (does not Inclufle PCB) 

LNW Expansion $219.95 
Interface Kit 

All componenTs to assemble LNW expansion 
ifilerlace, plus 32K of RAM. Does not include 
PCB. dual cassette relay or cabinet. 



Save now on 
EPSON PRINTERS 



Prices do not 
Include shipping 



VISA & MASTERCARD 
ACCEPTED 



ATTENTION: OEMS, QOVERNMENT, 
SCHOOLS, CORPORATIONS: We can now 
handle net-30 termi for D&B-rated 
companies. All products will carry an 
additional 7 percent handling feo. 



DMPUTE/: 



a subsidiary of World Wide Data Systems, Inc 



321 El Dorado • Webster Texas 77598 



►^392 



(713)488-8022 



BUSINESS 



Check the menu for the business program you voant. 



Investment du Jour 



C. Brian Honess 
22 Shaftesbury Lane 
Columbia, SC 29209 



^ roups of programs are often com- 
bined into one larger program using 
the menu technique. The individual pro- 
grams can be of (airly diverse applications, 
but usually have a central theme. For exam- 
ple, In a statistics package you might find 
programs ranging from simple descriptive 
statistics to the most complex multi-varlate 
analysis programs. 

Menu 

Let's assume a brief package of three 
financial routines. First, clear the screen. 



Then a series of statements print the menu 
(See Table 1). Put the name and number of 
more routines starting in line 19 of Program 
Listing 1. 

Number the three routines at lines 1X, 
200, and 300 of Program Listing 2. Use 
On . . . Goto for routine selection. 

Compound Interest 

When only the principal earns Interest for 
the entire life of a deposit or loan, the In- 
terest due at the end of the time Is simple in- 
terest. Invest $100.00 at five percent per 
year simple Interest. At the end of the year 
you have $105.00. At the end of the second 
year you have $110.00; the $5.00 interest in 
the first year is not added to the principal, 
and draws no interest. Minor problems are 
caused by different numbers of days in the 
months and years, but the principal earning 
interest remains unchanged throughout the 
life of the loan or deposit. 



Compounding (interest due is added to 
the principal) results In different interest 
payments. Different principal amounts are 
used to calculate the interest. 

The formula for finding the value of a 
deposit of P dollars at an interest rate of i 
percent (expressed as a decimal) for n 
periods is fairly simple: 

V = P(1 + i)" 

With compound Interest, the value of the 
$100.00 invested for one period at six per- 
cent is the same as when using simple inter- 
est— $106.00. During the next period the en- 
tire $106.00 earns interest at six percent, 
making the amount at the end of two peri- 
ods $112.36 instead of the $1 12.00 with sim- 
ple interest. 

Our simple formula does not apply to 
quarterly or daily compounding. The for- 
mula for this type of problem is: 



10 


PRINT 






11 


PRINT 


' * ' HONESS FINANCIAL PACKAGE ] 


12 


PRINT 






13 PRINT 


PROGRAM 


ENTER •■ 


14 


PRINT 






15 


PRINT 






16 


PRINT 


■COMPOUND INTEREST 


1 


17 


PRINT 


DISCOUNTED PRESENT VALUE 


2 


18 


PRINT 


■DEPRECIATION 


3 


30 


PRINT 






31 


INPUT 


■WHICH DO YOU WANT-; N 

Program Listing 1 





V=P(1 +-L) 



I inc 



• • ■ HONESS FINANCIAL PACKAGE 
PROGRAM ENTER 



COMPOUND INTEREST 
DISCOUNTED PRESENT VALUE 
DEPRECIATION 
WHICH DO YOU WANT? 

Table 1 
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Computer experts 
(the pros) usuaUy have big 
computer experience. 
That's why when they shop 
system software for Z80 
micros, they look for 
the big system features 
they're used to. And that's 
why they like Mu/(/-L/sef 
OASIS. You will too. 



(THEN COMPARE.) 



DATA INTEGRITY: FILE & 
AUTOMATIC RECORD LOCKING 



The biggest challenge 
for any multi-user system 
is co-ordinating requests 
from several user 
to change Iha.sal^i'eBjrd 
at the. 



Without this control, 
unauthorized users could 
access your programs and 
data and do what they like. 
A frightening prospect 
Isn't It? 

And multi-users 
can multiply the problem. 

But with the Loc 
Password 



memory is needed. Even 
if you have more than 64K, 
your pay-off is cost savl] 
and more efficient use' 
of all the memgr^ou h; 
avallabl 

SBj 



OASIS IS AVAILABLE FOR 

SYSTEMS Alios Co'^ipucoto Cfomemcq, 

Delia Producis Digital Gfoup D>gita^ 

Micfosystems DyfiaOyle 

IrWen. Intersyslems. N<"i, 

SDSyslL'ftis; 

Graphic VOfi 



Manual 
OtHf 




J res 
jS^OTT^ms, 
sample; normally 
iserscan viewa 
particular record at the 
same time. But, if that 
record is being updated 
by one user, automatic 
record locking will deny all 
other users access to the 
record until the up-date is 
completed. So records 
are always accurate, 
up-to-date and Integrity 
is assured. 

Pros demand file & 
automatic record locking. 
OASIS has 11. 



leefmnwrory 
jser nas been 
when and 
ir how long. 
Pros insist on these 
security features. 
OASIS has them. 



EFFICIENCY: 
RE-ENTRANT BASK 



SYSnM SECURITY: 
LOGON, PASSWORD 
& USER ACCOUNTING 



A multi-user system 
is often not even practical 
on computers limited 
to 64K memory. 

OASIS Re-entrant 
BASIC makes it practical. 

How? 

Because all users use a 
single run-time BASIC 
module, to execute their 
compiled programs, less 



upports 
nals 

inws little as 
ry. Or, with 
itching, as much 

784K. 

Multi-Taski ng lets each 
user run more than one 
job at the same time. 

And there's our BASIC- 
a compiler, interpreter and 
debugger all m one. 
An OASIS exclusive. 

Still more: Editor: Hard 
& _F I oppy D isk Support: 
Keyed (ISAM), Direct & 
Sequen tial Files: Mail-Box; 
Scheduler; Spooler: 
all from OASIS. 

Our documentation is 
recognized as some of the 
best, most extensive, in the 
industry. And, of course, 
there's plenty of 
application software. 

Put it all together and it's 
easy to see why the real 
pros like OASIS. Join them. 
Send your order today. 



Controlling who gets on 
your system and what they 
do once they're on it is the 
essence of system security. 




OPCRATINQ SrSTEM 

(IrduiJet 
EXEC Languaoe. 
File Mansgemcni; 
Ltiei Accounllno. 

P'lni Spooler. 
Gcnerji T»t 

Ell, 10' eic 1 

SINGLE USER 
MLII.THJ3ER 



BASIC COMPILCR/ 
INTERPRETEn/OEBUaOER 



RE-ENTRANT BASIC 

COMPILER/INTERPRETER/ 

DEBUGCER 



DEVELOPMENT PACKAOE 

Jp EOiio-. 
Debuggt:) 



TEXT EDITOR 1 

SCRIPT PROCESSOR 



DIAQHOSTIC a 
CONVERSION UTILITIES 

ftiifTiniv larg.asc 



R*co*t'y. Disk Test. 
Filo Cooy 'rorri 
oir-p- OS, eic > 



COMMUNICATIONS 
PACKAGE 

iTeim.nai tmuialor. 
File SeiO a Receive) 



PACKAOE PRICE 

*l| -' ADOVO) 

SINGLE jsen 

vu;T u^ER 



FILE SORT 



COBOL-ANSI 74 



soo 

B50 



sir.M 

17 ftO 



eooo 

60 00 



O'dc OASIS 'rorr-- 

Phase One Systems. Inc. 

7700 Edgewaler Drive, Suite 830 

Oakland. CA 94621 

Tr crr-s'^e Ml5i 562-6085 
TWX 310-366-7139 

NAME 



STREET (NO BOX 
CITY 


=) 


STATE 
AMOUNTS 


ZIP 



i.A!:acn s/slem Gescripi.on: 

add S3 lof shipping, 

CaiiforriLa resider^ts add sales tax) 

a Check enclosed □ VISA 

□ UPS C.O.D. D Wastercharge 

Card Number 

Fxpiration Date 

Signature 



MAKES MICROS RUN LIKE MINIS 



"When only the principal earns interest 
for the entire life of a deposit or loan, 
the interest due. . . is simple interest/' 



wt>«ra: c (a tna number ol ttmss compounding 
is to lake placa In a parkxl 
n ja tha number ol periods 
I la tha intereat rate per period^ 
P Is tha Principal, and 
V )a the value al the end of HlM 
penods 

Return to the $100.00 at six percent for 12 
years problem and assume quarterly com- 
pounding: 



V. 100,00(1.0=6:56 )(*■ 12) 



Quarterly compounding yields $204.33 com- 
pared with $201 .22 under yearly compound- 
ing. 

Use an Input statement with a literal 
prompt for each of tha values needed: 

10 INPUT ■WHAT IS THE PBINCIPAL-;P 

or combine them all like Program Listing 3. 

Run the program for the same principal at 
the same interest rate, with differing rates 
of compoundings. 

The value of principal subjected to con- 
tinuous compounding is given by: 



where: V is the vaKw 

P ia the principal 

e Is the base of tha common log 

ayatem and is equal to 2.71S2B 

I Ib the Intefest rale 

n la tha number of periods 

The value of $100.00 compounded con- 
tinuously at six percent for 12 years is 
$205,443, compared to $204.33 for quarterly 
compounding and $201.22 for yearly. 

Use the EXP function supplied with most 
Basic versions to code a program: 



10 INPUT P,I,N 

20 V « P ' EXP {! ■ N) 

» PRINT V 



AGE 


DEPR-CHG. 


ACCUMULATION 


BOOK VALUE AT 






oePRECIATION 


END OF YEAR 





0.00 


0.00 


36X.X 


1 


W5.00 


525.x 


3075.x 


2 


525.00 


1050.00 


2550.x 


3 


525.00 


1575.OT 


202S.X 


4 


525,00 


2100.00 


15X.X 


5 


525,00 


2625.x 


975.TO 


6 


525.00 


3150.x 

Table 2 


450.x 



The effective annual rate compares the 
Interest you get at different rates, com- 
pounded a different numt}er of times per 
period. For example, suppose you Invest 
$100.00 at six percent compounded quarter- 
ly for 1 yean 

V3l0O(1->-O-O&i4)t(1 ■ 4| = S106.136 



and also suppose you invest $100 at 6.136 
percent compounded annually: 



V= 100(1 +0.06136) = 106,138 

Six percent is the annual rate and 6.136 is 
the effective annual rate. 
This type of calculation is easily coded: 

10 INPUT -WHAT IS THE NOMINAL INTEREST RATE"; H 
20 INPUT -HOW MANY TIMES IS IT COMPOUNDED/YR"; N 
30 I = (1 ♦ R/N)tN - 1 
40 PRINT I 

Present Valua 

Present value is the value of a debt on a 



10 



30 



headings, menu, etc. 



31 INPUT ''WHICH DO YOU WANT"; N 
40 ON N GOTO 100, 200, 300 
50 GOTO 31 
100 



compound interest routine 



199 GOTO 900 
200 

discounted present value routine 

299 GOTO 900 
300 

depreciation routine 

399 GOTO 900 



any other routines you add go here, (add to line 40 also) 



900 INPUT "WANT TO RUN AGAIN— (1 = YES, = NO)"; X 
910 IFX = 1 GOTO 10 
920 IFX = 0.GOTO999 
930 GOTO 900 
,999 END 



Program Listing 2 



10 PRINT 

11 PRINT 

12 PRINT 

13 PRINT 

14 PRINT 
1 SPRINT 

16 PRINT 

17 PRINT 

18 PRINT 

19 PRINT 

20 INPUT 



ENTER PRINCIPAL, INTEREST (DECIMAL), 
NO. OF COMPOUNDINGS PER PERIOD, AND 
NO. OF PERIODS" 

EXAMPLE:" 
$100.00 INVESTED FOR 12 YEARS AT 
6% PER YEAR, COMPOUNDED QUARTERLY, 
WOULD BE ENTERED AS:" 

100.00,0.06,4,12 



P,I,C,N 



Program Listing 3 
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This Months Special 

Okidata 



At a New 
Ujw, Low, Pncel 




Microline 
80 



A great buy 

- List Price is $449. 

The Microline 80 

is a quiet 

small printer 

with field proven 

reliability. 



Featun 

* Friction V pin paper feed, roll or fan fold 

* Prints e^fanded characters and block graphics 

* Print speed 80 characters per second 
•Printhead fated at 200 million characters continuous 

cycle I 
•132-columl compressed print 

* Available (S-232C Serial Interfaces: 

\ ORS-256 (256 Character Memory) . .$109.00 
iMSP-lOOIUnbuffered, Switch 

I Select Data Rates) $120.00 

-^1(\/!SP-200X (200 Character Memory) $215.00 
MSP-2000X (2000 Character 
Memofv) $300.00 



LIST 




Ither available options: 



Ijustable Tractor Feed - 

ilodel 54100201 $ 50.00 

Tfl&80 Parallel Output, 

ceble to printer $ 35.00 

ons $ 3.00 



ASK FOR OUR 

INSTANT DISCOUNT 

From Roy Hawthorne 

Talk To BillTokarOn 

Applications 



CALL TOLL FREE 
U.S.A. 

1-800-521-2764 

MICHIGAN 

1-800-482-8393 




into a Word Processing or 
Data Processing System 
by adding one of the NEW 
Okidata Printers 




Microline Microline 

83A 82A 

If you require a system printer, the new Okidata 
Microline 82A, 83A, 64 should be your choice. 

These printers feature: 
•9x9 Dot Matrix heads rated at 200 miMon 
characters continuous duty - true lower descenders 
•FuH forms control - vertical tab, top of form 
•Block GrapNcs 

•Bidirectional, Short Line Seeking 
•Dual Interface - Parallel b RS-232C Serial 

Microine 82A - 80-columa *-'^^ 

120 characters per second $ 649. 

Tractor Optional $ 50. 

MicrolJne 83A - 13&column, 

120 cps, built-in tractor $ 995. 

Mkiroline 84 - 13&column, 

200 cps, built-in tractor $1395. 

Option^ Serial Interfaces - RS-232C: 

HS-RS232 - 256 Character Buffer $ 150. 

HS-RS232 - 2K Character Buffer $ 180. 




ttiltii 




Remember: 
We are open 
8:30 AM to 
6:00 PM EST 
Monday - Friday 



No Credit 
Card Penalty 



"The Stocking Source" 
24069 Research Driwe 
FarmingCon Hills, Ml 
48024 
313-474-6708 ^*^^ 



'See List ol Actverlisars on page 402 
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Software of tfie Month Club' -A revolutionary new way 
to buy name brand software. Available only through 
Microcon SoftwareCenters, the "Unhardware" Store. 



Choose from dozens of front-line products at a 33% 
discount and purchase two more over the next six 
months at discounts of up to 30%. 



SOFTWARE OF THE MONTH FEATURE PRODUCTS FOR NOVEMBER 



■NTER'niHHCIfT 

THE PRISONER Based on televi 
Sion show Eicilmg Wilhsouna 
APPLE48KDisK ■ J1995 

TERRORIST Manage nfe and 
death st'utjgle *ilti (e'fO'isls 
APPLE 48»t Oisli Game paooies 
required . S19M 

ADVENTURES 17,3 Thiee 
adveniuie pack Voodoo Caslle 
Trie Count, Strange Odyssey 
TRS 80 MOD I & III Tape 113.35 
APPLE OiskMK . . .J2675 



POOL 1.6 Otie o1 tr>e (inesi 
HIRES graphic games available 
With sour>d. APPLE 4SK Disk 
Game paddles required .S23 40 

LASER WARS Altacking aliens 
in 30. Ten levels or O.lticolly 
With soond APPLE 48K Disk 
Atari PET, TRS-M. J1995 

WORLD WAR III HIHESoraphic 
strategy wttn sound Three 
scenarios. Animated battles. 
APPLE. Alan, PFT, TRS- 
80 J1995 



•USIMKSt 

MAXI MANAGER Data &ase 
mar>ager Unbelievable tunc 
lionality for youi TRS-BO 48K 1 
disk mm MOD I & III 153 55 

WORDSTAR'" Best word pro 

cessing system on the 

maikei S330 X 

APPLE version 1250 00 

SPELLSTAr'" 20,000 base viOfO 

diclionary tot Wordslai.™ User 
expandabfo .S167 50 

BASKETBALL HANDICAPPFH 



Protect point spreads, ana>y2e 
statistics, accumulative. TRS -60 
MOD III $67.00 

■OUCATIOMAL 

THE LEARNING SYSTEM. Inter- 
active teaching system for any 
subiect. Prepare OAn training 
courses Dt subiecis Full test- 
ing capabOiiies apple *8K 
Disk $99 95 

Elem math package I. Place 
value, nbr slnngs, math drills, 
speed drills. APPLE II 48K 
Disk $16.75 



Mult I plica I ion, division, addi- 
tion, subtraction TRS-80 Color 
Computer $16 75 

Place value, nbr strings, math 
drill. division PET . $16 75 

GRAMMAR PACKAGE I Ad|ec- 
lives. advert>s, nouns, ptooouris, 
etc APPlEllOisk J16 75 

HISTORY 4 GEOGRAPHY 
Revolutionary War, U.S regions. 
Presidenls, etc. TRS 80 Color. 
APPLE Disk, PET(pleasespocity 
onai $16.75 



Hundreds of additional products available in our free catalog. 



NOTE: Pficoa liBtad ua J3% oti mi nulac tubers iisl price. Buy any number ol proOucis Irom 
current liil arxJ rwOe' 1*0 rnore wrlfvn the neil sm months it special Club memt)e' prices 
_. , . T.M. Members will be mtormefl each nwnlh 01 new products and prices Guaranteed repiacemenl ol 

To join the Software Ot the Month Club or receive further infOr- detectrve products tw so days SubsmulxxiS not permiUM PncBSvamJUi December 15 laai 



mation and our free catalog, simply fill out the coupon below 
or call toll free 1 -800-343-6214, except in Mass. call 
1-617-924-3333. .^ 




SoftwareCenters, Inc. 

?^ Fl U QTQCET • VAJA-TEDmLUKl UA noi7? ^ 



25 ELM STREET • WATERTOWN. MA 02172 



NAME; 

ADDRESS: 



OTY: 



_AQE:. 



STATE: 



-ZIP.. 



SK5 NATURE. 



TYPE OF COMPUTER: 
G 5WDISK 



_OPSYS: 



a 8" DISK 



D TAPE 



n I wish 10 join lt>e Software ol Ihe Month Club.' " Ptease send me the following 
products at Ihe discount prices listed atwve I agree to buy 2 rrwfe from your 
Software o< ir>e Month Catalog within the r>exl 12 months (Buy as many as you like 

Simply attach list of additional items.) 

ri Pieasesendmeyoorfreecatatog.lampariicuiatlyintBfestediri 

<type ot soltware). 



■■"I 



PRODUCT 



PRICE 



D VISA Account #_ 



rj MasterCardAccountt. 



Expiration Date:. 



Sub-Total S 

sMpptng ar>d 

handling * 2.00 

5% sales tax for 

Mass. residents + 



Inter Bank * 

(MasterCard only) 

Mail to: Software of the Month Club • 25 Elm Street ■ Walertowr>, MA 02172 



Total Enclosed 
check or money order S 



"The amount of depreciation each year 

reduces the taxable income, 

as you recover your cost. . . " 



date earlier than the due date. 

Suppose I agree to pay you $1000.00 a 
year from now. Money Is now earning six 
percent. What Is the present value of the 
debt? You should settle for less than the 
$1000.00 you will get a year from now. You 
can Invest the amount today at six percent 
and have your $1000.00 at the end of the 
year. This Is almost the same problem as 
compound interest; now we know V and 
solve for P. 

The formula: 



P-V(l + f)- 



10 INPUT 'WHAT IS THE COST OF THE ASSET "; C 

20 INPUT "WHAT IS THE SALVAGE VALUE ": SV 

30 INPUT "HOW MANY YEARS OEPRECIATION"; H 

40 PRINT 

50 PRINT " print your haadlngs hara 

eO PRINT 

70 A = 

aO DC = 

SO OF>0 

100 BV-C 

110 PRINT A, DC,DF. BV 

120 DC-{C-SVVN 

130 FOR A =1T0N 

140 [>F = DF + DC 

150 BV-BV-DC 

160 PftlNTA.DC. DF, BV 

170 NEXT A 



Program Listing 4 



Is only slightly different than the compound 
Interest formula. Recall that: 



present value program follows: 



,-3 



)s ih« SAms u-i- 



When you compound at more than one time 
per period, the formula reflects this: 



c 



where c Is the numtwr of times compound- 
ing takes place per period. 

What amount must t>e Invested now to 
yield $1000.00 at six percent compounded 
quarterly, 12 years from now? 



P-1000.M(1+0^-«*121 



< 1000.00 ( 



(1+0^)(<"12) 



= 1000 00 { — 1— ) 
1.015*8 

-1000.00' (ltt.04348) 

= $489 36 



Check this result with the compound in- 
terest program and formula. The value 
469.36 invested for 12 years at six percent 
compounded quarterly yields $1000.00. The 



20 INPUT V,l.C,N 
30P-V(1*((1tUQf(C'N» 
40 PRINT V 



Depreciation 

As an asset Is used It loses value. The 
asset has to be replaced at the end of Its 
useful life. Consider a company setting 
aside a portion of Its earnings in a deprecia- 
tion fund. Actually, the amount of depreci- 
ation each year reduces the taxable in- 
come, as you recover your cost during the 
asset's useful life. The straight-line method 
for depreciating an asset is simplest. Sup- 
pose a machine costs $3600.00 and has a 
useful life of six years. At the end of the six 



10 INPUT "SCRAP VALUE OF ASKT 

20 INPUT "COST OF ASSET 

» INPUT "NO. OF YEARS TO DEPRECIATE 

40 A-SV/C 

» D 110.001 

BO T-1 - D 

70 B»T1 N 

80 IF A > -B THEN 110 

SO D-O + OXXll 

100 QOTO SO 

1 10 PRINT "RATE OF DEPRECIATION - "- D 



- "^SV 

-";C 
-"; N 



Program Listing 5 



MORSE CODE, BAU DOT and ASCII RTTY 
FOR THE TRS-80 MODELS I and III 

DISASSEMBLED HANDBOOK -VOLUME 4 



Chapi. 
Chap! 
Chapl 
Chapt 
Chapl 
Criapi 
Chapt 
Chapt 
Chapt 
Chapl 



no RS-232C IntstlactiB rMiulrvd 

1 . 8 to 800 WPM Mofse transmit pgm. 
2: Adding type ahead capabililies 
3. Morse receive decoding program 
4: Merging + 12 prepared messages 

5 Baudot Iransmil 60-66-75-100 WPM 

6 Baudot receive lor above speeds 

7 Merging ♦ 22 prepared messages 
8: ASCII uansmil progfam 110 Baud 
9: ASCII receive decoding program 

10 Merging + 22 prepared messages 

S18 [ US] per copy add S2 shipping 
|S4.Kov«rsMsairmill] 



— GefiMAN i FRENCH LANGUAGE EDITIONS- 

Morse. Baudot A ASCII on d)lhtS49 
[Vot. 4 r*quir«d tor Instnidlons] 

RICHCRAFT ENGINEERING LTD. 
»1B Wahmeda Industrial Park 
Chiulauqua, New York 14722 t^zra 

CODordCfBlUSonly] [7181753-2654 



IME\A/ 



PROGRAM WRITES 
PROGRAMS FOR YOU 

Education • Business • Hobbyist 

Now anyone can create BASIC Programs 
in minutes with QUtKPRO. You don't 
have to be a computer programmer to 
produce filing programt, data manage- 
ment & entry. QUIKPRO gives you a sep- 
erate BASIC Program everytime that you 
can Lilt, examine, or even modify. QUIK- 
PRO wtti pay for itself the first time you 

use it. Order from this ad for the 
Introductory price of $89. 

MICROSOUTH, Dept. F, P.O. Boi 144t 
Orange Park, FL 33073, [904) 269-1918 



L. 



''243 



MEMOREX 

rUXIBU DISCS 



WE WILL NOT BE UNDER 
SOLDfl Call Free (800)235-4137 

for pnces and information. [!)ealer 
inquiries invited and CO D 's 
accepted 

VIM 



pAcinc ^370 

EXCHANGES 

100 Fooihil! Blvd 
S«n Lull Oblipo. CA 
93401 InCai uil 
(800)591 S935 or 
(805)5431037 




.'Sm Ust Of Adv€rtisars on page 402 
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"Seldom is an asset depreciated 
the same amount in its first year 
as in one of the later years of its life." 



years, the machine has a scrap value of 
$450.00. 



Average yearly depreciation = 



_ 3600-450 _ 



= $525.00 



Table 2 shows the yearly depreciation 
charge, the amount accumulated in the de- 
preciation fund, and the book value of the 
machine at the end of each year: 

The book value drops to the salvage value 
at the end of six years. The accumulated 
depreciation plus the book value at the end 
of the year always equals the cost. 

Program Listing 4 prints this table. Code 
the headings as you like; commas between 
the variables space the printing In the first 
four fields. 

There are some serious problems with 
the straight-line depreciation method. Sel- 
dom is an asset depreciated the same 
amount in Its first year as In one of the later 
years of Its life. Consider your automobile, 
for example. You would like to depreciate It 
more the first year than the second, more 
the second than the third, and so on. (Tie 
this to the concept of Present Value. The 
more you depreciate the car early in the use- 
ful life, the more tax savings you get and 
also the more money you can earn on that 
depreciation fund money at compound In- 
terest.) You want to keep the book value in 
line with the real value of the car at the end 
of each year. Overcome this problem by cal- 
culating the depreciation charge as a fixed 
percentage of the book value each year, 
known as the constant-percentage (or de- 
clining-balance) depreciation method. 

In the constant-percentage depreciation 
method, assume an original cost C, and a 
fixed depreciation percentage d, so that the 
depreciation charge is Cd at the end of the 
first year, and the book value is: C-Cd, 
which equals C (1 - d). At the end of the sec- 
ond year, the depreciation charge is 
0(1 -d)d and the book value is: 

0(1 -d)2 



In other words, the book values for the first 
n years are: 

C(1-dJ, C<l-d)2, Ql-d)3, ... ,0(1 -d)" 

Since the book value at the end of n years is 
the scrap value, we can say: 

SV = C(1-d)" 

Consider the same problem: a $3600.00 
machine with a useful life of six years and a 
scrap value of $450.00. If we substitute what 
we know into the equation, we have: 



450 = 3600 (l-( 



or: 



(1-d)8 = 450O600 = 0.125 

solve for d, use logs: 

6log(1-d) = log0.126 

We run Into trouble in the Basic program 
on several different fronts. If your computer 
has only base e logs, convert from base 10 
with: 

loflbff) = loOeWloge(b) 

To find the base 10 log of 0.1 25 with a base e 
log function, you could say: 

LQ = LOQ(0.126yLOG(10) 

When we start working with: 

6IO0(1-d) = log0.12S 



we eventually must find an anti-log. I use 
the iteration technique. 

Suppose we just set d equal to 0.01 and 
try it in our formula: 



AQE 


BOOK VALUE AT 


DEPRECIATION 


ACCUMULATED 




END OF YEAR 


CHARGE 


DEPRECIATION 





3600.00 


0.00 


0.00 


1 


2545.20 


1054.80 


1054.80 


2 


1799.46 


745,74 


1800.54 


3 


1272.22 


527-24 


2327.78 


4 


899.46 


372,76 


2700.54 


S 


635.92 


263,54 


1964.08 


6 


440.59 


186.33 

Tabled 


3150.41 



120 


AG = 




130 


DC = 




140 


DF = D 




150 


BV = C 




160 


PRINT AG 


BV, DC, DF 


170 


FOR AG = 


1 TON 


180 


x = c ■ (1 


- D) t AQ 


190 


DC=BV- 


X 


200 


DF = DF + 


DC 


210 


BV = X 




220 


PRINT AG 


BV, DC, DF 


230 


NEXT AG 




Program Listing 6 



(1-0.01)6 = 0.94 

Because 0.94 is not the 0.125 we would like, 
0.01 must be wrong. Let's try 0.02: 

(1-0.02)6 = 0.88 

A little closer, but not 0.125. As the value of 
d goes up, the answer goes down. In the 
iteration technique, start at some very small 
value (0.001) and compare the answer to 
what It should be (in this case, 0.125). If our 
guess is too low, the answer is more than 
0.125. Add a small number tod and try again 
until the answer equals 0.125. At that time 
we have a good approximation of d (See 
Program Listing 5). 

Lines 10 through 30 allow us to input the 
values for the calculations. Line 40 calcu- 
lates the number we want to approximate In 
the iteration technique (0.125 with the data 
from the example problem). In line 50 we 
start with a d value of 0.1 percent. You can 
make this and the incremental value In line 
90 smaller if you like. These values allow 
reasonable running times, and produce rates 
of depreciation accurate to the third deci- 
mal place. Line 60 calculates T; (which I 
named "T" to stand for "Term") line 70 
raises this term to the nth power and calls it 
B. Line 60 compares B to A; if A is greater 
than or equal to B,D is printed. If A is less 
than B the program adds 0.001 to D and 
tries again. 

The book value is 41$ off, as is the 
amount in the accumulated depreciation at 
the end of the six years (See Table 3). The 
value of D is slightly inaccurate; the itera- 
tion technique only found a good approxi- 
mation. If you want greater accuracy (and 
are willing to wait for it while your program 
finds d) increment d by 0.0001 or 0.00001 in 
line 90. 

Program Listing 6 makes the table. Insert 
your own headings. 

Here we calculated the book value first 
and subtracted the new book value from the 



AGE 


DEPRECIATION 


ACCUMULATED 


BOOK VALUE AT 




CHARGE 


DEPRECIATION 


END OF YEAR 





0.00 


0.00 


3600,00 


1 


900.00 


900.00 


2700.00 


2 


750.00 


1650.00 


1950,00 


3 


600.00 


2250.00 


1350,00 


4 


450.00 


2700,00 


900.00 


5 


300.00 


3000,00 


600.00 


6 


150.00 


3150.00 

Table 4 


450.00 
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"This formula never allows you 
to reduce the asset balance to zero." 



old book value to get the depreciation 
charge. This is added to the amount already 
in the accumulated depreciation. 

The Sum-of-years-digits method in- 
creases the present value of the deprecia- 
tion tax shield. Assume the same problem: 
a $3600.00 machine with a $450.00 scrap 
value and a useful life of six years. Depreci- 
ate it 6/21 the first year, 5/21 the second 
year, 4/21 the third year, 3/21 the fourth year, 
2/21 the fifth year, and 1/21 the last year. 
Add all the numerators: 

1+2 + 3 + 4 + 5 + 6 = 21 = 100% 
21 21 

The sum of the "n" integers is given by: 



10 INPUT -COST OF ASSET 

20 INPUT ■■SCRAP VALUE IS 

30 INPUT ■■NO. OF YEARS 

40 = 2* {VN] 

50 AG = 

60 DC = 

70 DF = 

80 BV = 

90 PRINTAG, DC, OF, BV 

100 FOR AG = 1 TON 

110 CD^BV D 

120 DF = DF^.DC 

130 BV = BV-DC 

140 PRINTAG, DC, DF, BV 

150 NEXT AG 



= ^^;SV 
= -;N 



Program Listing 7 



n(n + 1) 
2 

In our example {where n = 6): 

6(6+1) - 6'7 - 42 - 91 
2 2 2 

Table 4 is produced. 

The scrap value is the book value at the 
end of six years. The depreciation charge in 
the first year was found by multiplying 6/21 
by the amount to be depreciated 
(cost-scrap value) = 6/21 '(3600-450) = 
900.00. All values in this equation stay the 
same each year except the numerator over 
the 21, which decreases by 1. 

Program Listing 7 produces this table. 
Add headings to suit your self. 

The program follows the methods used 



before, except for line 110 in the loop. The 
age (AG) must go from 1 to n but the numer- 
ator of the multiplication factor must go 
from n down to 1. The program calculates a 
value of UD for each value of AG. 

The Double-Declining Balance method of 
depreciation applies a uniform rate to the 
remaining book value. Assume that for tax 
purposes the rate cannot exceed twice the 
straight-line rate (hence, the "double" in the 
name). Consider the $3600.00 machine with 
the $450.00 salvage value and the six year 
life (See Table 5). 

The straight-line rate would be: 

100% = 16.6667% per year 
6yrs. 

This method allows us to double that, so we 
will use 33.3333% per year. The $1200.00 



AGE 


DEPRECIATION 


ACCUMULATED 


BOOK VALUE AT 




CHARGE 


DEPRECIATION 


END OF YEAR 





0.00 


0.00 


3600.00 


1 


1200.00 


1200.00 


2400.00 


2 


800.00 


2000.00 


1600.00 


3 


533.33 


2533 33 


1066 67 


d 


355.56 


2688.89 


711,11 


5 


237.04 


3125.93 


474.07 


6 


158.02 


3283.95 

Table 5 


316.05 



GANTT-PACK 



EASY PROJECT PLANNING UNIQUE PROGRAM FEATURES 

• Dynamic Scratchpad Entry • Simple Editing/Updating 

• Automatic Organization • Rapid Screen Review 

• Graphics for Communications • Printer of Your Choice 

• Charts and Data to Screen and Printer 




POWERFUL, FLEXIBLE, SYSTEM DESIGNED BY EXPERIENCED PROFESSIONALS 

• Now available for TRS-80* Model I, 48 K, 2 disks 

• TRS-80' Models II and III Versions by December, 1981 



LIBRA LABORATORIES, INC. ^57 
495 Main Street 
Metuchen, NJ 08840 



Tel. (201) 494-2224 

Gantt-Pack © Libra Laboratories, 1981 

PRICE $149.50 

'TRS-80 Trademark of Tandy Corp, 
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". . . the loan is amortized wtien you pay 
ttie principal and interest 
by a sequence of payments 
at equal intervals of time." 



depreciation in the first year was the result 
ot multiplying the book value of $36.00 by 
0.333333 = 1200.00. The $800.00 in the sec- 
ond year is 33.333% of 2400.00. 



10 INPUT "COST OF ASSET = 


";C 


20 INPUT ■■SCRAP VALUE IS 


^ ■■; SV 


30 INPUT "NO. OF YEARS 


= '■; N 


40 D = 2 ■ (t/N) 




50 AG = 




60 DC=0 




70 DF=0 




80 BV = 




90 PRINT AG, DC. DF, BV 




1O0 FOR AG = 1 TON 




110 CD = BV ■ D 




120 DF = BV-DC 




130 BV = BVF-DC 




140 PRINT AG, DC.DF, BV 




150 NEXT AG 




Program Listings 





This formula never allows you to reduce 
the asset balance to zero. The book value 
cannot fall below the scrap value of the 
asset before the six years are up. Accoun- 
tants and taxpayers who favor the high in- 
itial write-off in the double-declining-bal- 
ance method have to convert to some other 
method (often straight-line) towards the end 



10 


81 


1 


75.00 


82500 


9175.00 


11 


81 


2 


6881 


S31.19 


8343 81 


12 


81 


3 


62.58 


837 42 


7506 39 


1 


B2 


4 








7 


82 


10 


1761 


882.39 


1456.92 


8 


82 


11 


10.99 


889.01 


576.91 


9 


82 


12 


4.33 


581.24 


o.oo 








Table 6 






96K CP/M® 

(For your TRS-8(r Model II) 
Multiple Job Executive 

Add a whole new dimension to your 
TRS-80 Model II. Let it work while you 
work!! 

ATON's unique JobStream'" CP/M 2.2, along with additional RAM memory; allows you to 
simultansQuslY compile, assemble, or link in one 64K background panitmn |62K TPA) while you 
edit files, and spool to the printer, and communicate with another computer in up to four 32K 
foreground partitions |28K TPA). 

As you expand memory beyond 64K, you also enter ttie amazing world of TrackMode BIOS'" 
which not only multiplits diskette spssd up to five timas, but also autofnaticatly performs read 
after wnte checks for the ultimate in data reliability. 

■Gain hard disk parformanct for a fraction of the cost -and no backup problems! !i 

•Works in 32K, add RAM memory to 256K using standard Radio Shack memory boards. 

* Supports two sidad expansion disk drives (1.2 megabytes per disketlel 

JobStream CP/M 2.2 (with Z-80** Debugger) $235 

Omni Writer*' Video Text Editor $130 

Z-80 Debugger Source Code $ SO 

Package of above (a $415 value) $295 

Prapaid, Visa. MastBrCard or COO. 
Shipping and handling snra 
Catifornia residents add 6°/q sales tax 

CP.-M' Digiiai Researcfi Inc 
•'"Tandy Carji ••'"? ing Corp 
JnOSlfiam. TockMode BIOS'" ATON Inil 
Omni Wiiter™ Ommgraiifiics 

260 Brooklyn Avenue, San Jose, CA 95128 
^398 (408) 286-4078 



"Software with Service" 




on 



nternational, Inc. 



of the asset depreciation. Tt^e IRS allows 
you to cfiange from tfie declining-balance 
metfiod to ttie straight-line metfiod any time 
during the useful life of the asset. The 
unrecovered cost of the asset, less the 
estimated salvage value, must be spread 
over the estimated remaining useful life 
determined at the time of the change. In 
many circumstances you may also change 
from Declining Balance to Sum-of -years-dig- 
its, and from Sum-of-years-digits to straight- 
line depreciation. (See IRS Publication 534.) 
Program Listing 8 produces the table. 
Add your own headings and input prompts. 

Loan Amortization Table 

If you take out a loan virith interest, the 
loan Is amortized when you pay the princi- 
pal and Interest by a sequence of payments 
at equal intervals of time. The payments are 
almost always equal, and the time interval 
is usually one month (see Program Listing 9). 

Assume you make the following entries 
in lines 15 through 35: 

10000.00. 0.09, 900.00, 10, 81 

You borrow $10,000.00 at nine percent per 
year. The payments are $900,00 per month, 
and the first payment will be made in Oc- 
tober (month number 10) ot 1981 (81). The 
body of the table is in Table 6. 

Column 1 is the month number and col- 
umn 2 is the year. Column 3 is the payment 
number. Columns 4 and 5 are the portions 
of the payment applied to the reduction of 
the principal and the interest on the princi- 
pal. The first month interest was $75.00 
because $10000 * (0.09/12) = 75. If the inter- 
est is $75 and you made a $900 payment, 
then $825 is available to reduce the princi- 
pal. In line 1 1 of the table the remaining bal- 
ance is $576.91. less than a typical $900.00 
payment. In this case pay only $576.91 plus 
the interest on the $576.91, instead of a full 
$900.00. 

Lines 15 through 35 of Program Listing 8 
are the prompted variables Input and lines 
36 through 41 print the column headings. 
The Print Using statement lines up the num- 
bers nicely under the headings and prints 
dollars and cents. Line 42 sets the payment 
number counter to one. Line 45 finds the In- 
terest for this month by multiplying the loan 
balance by a 12th of the Interest rate (as- 
suming monthly payments). Line 50 calcu- 
lates how much of the payment is applied to 
the principal reduction by subtracting the 
calculated Interest from the amount of the 
payment. Line 55 calculates the new out- 
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mm 




LOWERCASE MOD 

KIT 

NO SOFTWARE 
ALL HARDWARE 




FOR TRS— 80 MODI 



THIS OFFER 

WILL NOT 
BE REPEATED 



$89 



95 



WHILE STOCK LASTS 



CECDAT, INC. ^62 

P.O. Box 497 
Hayden Lake, ID 83835 

CALL NOW 
(208) 772-9571 

M DAV WAftRANTV 

WITH ALL 

OPTIONS 

($125°° VALUE) 



THE W^CH;_isa_Uademarkj)f^EC^AT.JNC. 

Name 

Street ^ 

City State Zip 

Signature,, 

You must check 

lH "Mem Size v., "Memory Size" _ "Debounce". ' "Block Cursor" 

Price valid through December 31, 1981 



ORDER INFORMATION TRS-80 is a Trademark of Tandy Corp. 
: ; Check, Money Order, Bank Draft 
L. VISA. MASTERCHARGE (add 3%) 
^ Card No, 



Expiration Date^ 



"THE PATCH 2"®89.95ea. 
Ship&Hand @2.50ea._ 



.Today's Date. 



ID Sales Tax 3Vo (Id Res) 

TOTAL ORDER 




imUTY 
FORCE 



THE VIDEO MANAGER ^U FIRST IN A SERIES 

Our Video Manager will enhance your computer's per- 
formance with these features: vertical printing on 
screen; forms design direct from screen to printer; send 
entire screen or any part to your printer; save screen to 
disk as a file and more. Written so you can utilize it from 
DOS or BASIC. Available on disk for: TRS-80.* IVlod I TRS 
DOS 2.3, fVlod II TRS DOS 1.2 & 2.0, CP/M 2.0 or later. 
soon available for* Mod III. For your convenience with 
Visa or M/C phone in your order. Please add $2 for hand- 
ling and postage. ••T«n4yCotp 

SOFTWAREHOUSE IINTTERNATIONAL 

5070 N. Sixth St. Suite 103B 
Fresno, CA 93710 (209) 221-7877 

TO RECEIVE A FREE CATALOG PLEASE .'13 



'See List ol Aiiverlisers on page 402 





Programming drive 
you wild? 

We have the high quality programs you demand 
at a price that will please. Send for FREE catalog. 

VTHE BERG WORKS ^mi . 

Box 742G lanesville, Wl 53547 ^// 
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"The unrecovered cost of the asset, 
less the estimated salvage value, 
must be spread over the 
estimated remaining useful life. . .." 



standing balance. Line 65 checks for an out- 
standing balance less than the payment. If 
this Is the case, line 400 calculates the 



values to be printed for the last payment. If 
this is not the case lines 70 through 97 add 
one to the payment number and one to the 



month number. If the month number is 13 it 
is set back to one (January) and the year 
number is incremented by one.B 



10 CLS.PRINT:PRINT TAB(2(» "LOAN AMORTIZATION TABLE":PRINT 


75 M0 = M0 + 1 




15 INPUT 'LOAN PRINCIPAL =";P 


80 IFMQ=13THEN90 




20 INPUT 'INTEREST RATE = "; R 


85 GOTO 45 




25 INPUT ■ TOTAL PAYMENT ^ -, M 


90 MO-1 




30 INPUT -STARTING MONTH ^ -; MO 


95 YR = YR + 




35 INPUT "STARTING YEAR = ' , YR 


96 GOTO 45 




36 PRINT 


400 N = N + 1 






410 N0 = MO+1 




40 PRINT'MO YEAR N INTEREST TO PRIN REMAIN.- 


420 IF MO<^12THEN 430 




41 PRINT 


422 M0~1 




42 N = 1 


423 YR = YR + 1 




45 l = P ■ (R/12) 


430 l = P • (W12) 




50 PR = M - 1 


435 PR = P+I 




55 Pfl^M-1 


440 P = 




60 PRIN USING AS; MO. YR. N. 1, PR. P 


450 PRINT USING AS: MO. YR, N. 


.PR. P 


55 IFP + fP ■ (R/12))< = M THEN 400 


455 PRINT 




70 N = N + 1 


999 END 




Program 


Listing 9 





CO-DIR, BUNKING 



Jt^ CURSOR ORIENTED 
^ DIRECTORY! 

KILL! EXECUTE! COPY! LIST! 

BLINKING CURSOR DOES IT ALL RIGHT ON THE DIRECTORY SCREEN! 



FiXSIT«436) 


mm 


flGAICS/INS 


spolimm: 


IM/CHB 1 


SKVRAIB4I 


mam 


SCREOMIfiP 



Never type a program name again! 

Access to any program on any directory page! 

Very very easy to use ! 



TO ORDER 'CO-DIR' (R): Specify DOS and Modal l/IM. 
Available for DOS PLUS* NEWDOS/80" 1.0 and 2.0 



19 



95 



•Trade fvlark of Micro-Syatems Software. Inc. "Trade Mark ol Apparat 
Inc. 

Dealer Inquiries invited. 



PICOTRIN 

TECHNOLOGY. INC. 

Fl.res add tax. PH.: 305—586-2377 3531 San Castle Blvd. Lanlana. Fl. 33462 ^474 
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ABM Commander 



The United States is under attack! You control the master ABM 
targetry and nnust defend your six cities from the onslaught of 
lCI3M's, MlRVs, smart bombs, strategic bombers, and killer 
satellites. Hundreds of millions of lives rest on your reflexes and 
your supply of a nti ballistic missiles. 

Will you still own this game in 1990? Then switch to Laser 
Commander! You control the sites of a land-based anti-ballistic 
laser. Blast the enemy as he descends, but be prudent! Your 
energy depletes with each blast, and your power supply depends 
on your remaining cities. 

Features include: 

• One or two players • A guarantee of satisfaction 

• Multiple difficulty levels • Two complete games in one 

• Fast machine language • Sound effects 

graphics 

ABM/Laser Commander is the best game of its type on the 
TRS80. Other versions don't even come close. We guarantee 
you will agree! 

Model lor Model 111 16K Level 11 only 

Cassette . . . $14.95 Diskette , . . S17.95 

Laser Commander 



To Order Call Med Systems . . 

1-800-334-S470 



GRBASIC 2.0 




Our best selling GRBASIC has been upgraded. GRBASIC 
adds a set of commands to BASIC that allow the user to produce 
machine language speed graphics directly from BASIC. This is 
not a string packer or a USR function. INew BASIC commands 
are added directly to BASIC. All existing programs will still run. 



Trade-in Policy for GRBASIC 1.0 

Send us the original GRBASIC disk or cassette with 
$5.00 and we will send you GRBASIC 2.0. We must have 
^ original media returned. fJo exceptions. ^ 



GRBASIC 2.0 Model I and Model III I6K and up 

Cassette. .. $19.95 
GRBASIC 2.0 Model I and Model III Diskette . . . $24.95 
Please Specify DOS System When Ordering! 



Some Features of GRBASIC 2.0 

Draws or erases lines between any set of points on the screen. 
Coordinates may be chained. A corner to corner line is drawn in 
under 6/ 1 OOths of a second! 

Draws a circle of any given radius at a given point Circles may be 
drawn off the edge of the screen. 

Draws a shajje at any given point, using the last specified rotation 
and magnification. Any shape of a multiple set can be specified. 
Shapes can be drawn off the screen in extended space, and are 
user-definable with no limitations except the TRS-80'5 resolution. 

Magnifies a defined shape from 1 -255. This changes the size of a 
previously defined shape. 

Rotates a shape in 45 degree irKrements. 

Sends sound to the cassette port. User specifies range of 
frequency and duration of each frequency. Repeat factor is 
available. 

Extensive, newly rewritten manual. 




^mmMii:^ 



p,o. box 2674 
chapel hill, nc 27514 

l*800-334-5470 



- See Usl ol Advertisers on page 402 
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It's Not Your Printer, 
It's Your Software. 




Some Features of Qwerty 3.0 

1. Automatically prints in proportional print, with a suitable 

formal. Transitions between the three pnnt styles are easy, 
including all expanded print modes 

2. Qwerty 3,0 adds lb new symbols, including upper and 

lower case Greek letters, mathematical symbols such as 
integralsand summations. arrows, brackets, arxl probability 
symbols 

3 Any character can be used as a subscript or superscript, 
even simultaneously Carats, bars, and tildescan be placed 
over any character, with precise pobttion conlrol. 

4, Underlining, with or witliout underlining of spaces, including 
long ratios and mathematical expressions. 

5 Footnotes can be placed on any page so that they remain 

on the desired page, even if text is inserted later 

6 Table commands enable positonmg of the pnnt head 

anyA+iereona line Invaluable in pnnting neat mathematical 
layouts, tables, columnar material, etc . in proportional pnnt. 

7- Pretty commands allow printing of repettions of a chosen 
character When combined with Table, decorative borders 
can be produced with ease 

8. Folio format produces output m two or three columns per 
page, in either proportional or 16 7 cpi mode. Ideal for 
newsletters 

9 Supplies a third output mode, in which only Scripsit 
commands are obe><;d Allows pnnting of special Qwerty 

commands for future reference 

10. Page End indicates where pages will end. and the page 
number, without pnnting the text. One can prepare an 
almost error-lree document without ever using paper 

1 1 CorrectionofScrlpsit 5 errors and inconveniences, extensive 

documentation, and much more! 



Since we introduced Qwerty 3.0 in September, people have 
been calling to ask if we were making ludicrous claims. The 
a nstiJCfi.srtO.'QwertyS.O does everything we claim and more! 
Like Greek letters. Simultaneous subscripts and superscripts. 
Even footnotes and two or three column folio formats. See the 
list of features in the box. Mo other piece of software of this type 
can match Qwerty 3.0. 

Ctwerty 3.0 is more than "fully tested." It has seen thousands of 
hoursof useina uni versify environment A master s thesis and a 
statistical doctoral dissertation were produced and accepted 
right off a Centronics 737 using this package. 

Qwerty 3.0 is the finest Saipsit addition availabie. All you need 
is Scripsit, at least one disk drive, and one of the following 
printers: Centronics 737. Centronics 739, or Lineprinter IV. It is 
the best. Period. We Guarantee You Will Agree! \f for some 
reason, you find that this program does not meet your needs. 
return the entire package within M days for a prompt and 
cheerful refund. 

For cautious buyers, we offer the manual (almost 70 pages) for 
^ 1 0.00. When you decide to buy Qwerty 3.0, we will credit the 
full manual price. 

Centronics 737 pnnters were still available at this whting. Med 
Systems sells them. Please call for price and availability 

Qwerty 3.0 Disk, Manual, Reference Card, 

and Printer Table Rule $49.95 

Qwerty 3.0 Manual Alone $ 1 0.00 



^■' -■. 


Ad 


^ 


^ 



The Concept 



The Continuum Series marks a new era in adventure 
games. Every game features full screen, 3-dimensional 
per^jective graphics at machine language speed. Every 
one of more than 600 locations is drawn graphically. The 
problems are not old cliches, but new, original and 
challenging. These games are more complex with graphics 
than most adventure games are without! See reviews in 
February and August issues of '80 Microcomputing. 
Once you've played a Continuum adventure, verbal 
adventures just aren't the same! 

Adventure beyond mere words . . the Continuum Series 



3 ASYLUM, the newest Continuum adventure 
places you in an institution full of guards, 
inmates, doctors, and many more bizarre char- 
acters. Asylum features an advarKed language interpreter 
which allows input of complete senterKies as wed as orw 
and two word commands. Grafrfiic rooms, hallways and 
doors twist and turn in a layout guaranteed to send you 
screaming! 

ASYLUM Cassette . . . $1 9.95 Diskette . . . 522.95 



2lABYRirrrH deposits you in a huge maze of 
tunnels inhabited by gnomes, ghosts, witches, 
and an evil minotaur. You must find the weapons 
and treasures needed to destroy the minotaur before he 
discovers you! The labyrinth meanders through space 
and time, so don't be surprised if you come upxjn yourself 
wandering through the lonely corridors. 

LABYRINTH Cassette ... $14.95 Diskette ... $17.95 



^ DEATHMAZE 5000. the original Continuum 
g adventure. The single goal is straightforward. 
A ESCAPE ALIVE! Vile monsters, vicious dogs, 
hideous traps, and other hon'ors will plague your every 
step as you struggle to survive one of the most challenging 
adventures ever written. Expect to die a hundred deaths 
before you escape this one! Just a hint remember 
Beowulfl 

DEATHMAZE 5000 

Cassette . . . $14.95 Diskette . . . $17.95 



All programs are compatible with both Model I and Model 
111 TRSBO Level 11. Cassettes require 16K, diskettes 32K. 

Hint sheets for these games are $1 .00 each. Specify title. 




ssefOBKas 



|K«k box 2674 
chapel hill, nt 27814 

1-800-334'S470 



Continuum 




Satisfaction Guaianteedl 

If for any reason you are not satisfied with our products, 
return your order within 1 4 days for a prompt and cheerful 
refund. 

Ordering Infoimatlon 

Orders are processed within five working days. We pay all 
postage arxi handling within the U.S., Canada, and U.S. 
territories. European orders please include $3.00 for air 
post 



^^^^B 



O Asylum ($1995) 

D Deathmaze 5000 ($14,95) 

n Labyrinth ($14,95) 

n Adventures on Disk (add $3 00) 

DgRBASIC Cassette ($19.95) 

DgRBASIC Disk ($24.95) 
Specify DOS 

DQwertySO ($49.95) 

□ ABM/Laser Commander Cassette ($14.95) 

DABM/Laser Commander Disk ($17.95) 

Total 

Name 

Srreer 

City Stale . Zip 



Computer: 

Model I 16k[ I 
I jMastercard 
MC or VISA # 



Model III 16k[ 1 
Qvisa I 1 check 



Expiration Dale 



^See UsI of AOvorUsars on page 403 
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TECHNIQUE 



You use them in prose, so use them in code. 



In Praise of Outlines 



Dennis Drew 

908 Byers 

Joplin, Missouri 64801 



I teach programming classes using the 
TRS-80, and there is something i notice 
about all new programmers: they do things 



the hard way. For example, If I ask them to 
expiain the foiiowing lines: INPUT "ENTER 
YOUR NAME ■•:A$. The explanation will 
sound tike: "This line assigns a literal value 
into the string variable A$ using input from 
the keyboard." 

What's wrong with saying, "it lets you 
enter your name into the computer." The 
use of "twelve large words when one small 
one will do" is not confined to newcomers 



STRING VARIABLES: 




Variable name/purpose 


Location (l)nes) 


A$ Holds list data 


10,50,1100-1500. 




2040,2060,2080, 




2100,2120,3010- 




3030,4030-4050, 




5010,6020,6040- 




6080 


B$ Decision 


20,30,2010- 




2120,4010 


C$ Small Sort marker 


6010.6020 


D$ Sort saver 


6040-6080 


NUMERIC VARIABLES: 




A For/next counter 


4050.2020,3000. 




4000,5000,5020, 




6020 


B,C,D Tape counters 


40,50,5000,5010 


E Choice 


60-80 


F Number of Items 


40,100,1100- 




1150,2020,3000, 




4000,5000,6020, 




6090 


G For. . .Next counter 


4060 


H Sort marker 


6020 


1 Sort marker 


6020,6040-6100 


Program Variables 



either. I consider myself a fair programmer, 
yet i have to sweat through many articles I 
read in computer magazines. 

A Question of Difficulty 

How hard is it to write a program? In my 
early programming days I wrote a game 
called PHASE VII (available from Cheshire 
Software, P.O. Box 1295, Joplin, MO 64802). 
It was a difficult job and. because I knew 
nothing about program preparation, it took 
two years to write the game. It should have 
taken two or three months; but i had to 
restart three times. 

imagine the foiiowing: You have worked 
several hours on a program. There are about 
thirty major routines, a hundred minorones. 
dozens of variables and everything has to 
fit together jusi right. Your brain is weary. 
Suddenly, you cannot remember the pur- 
pose of a certain variable. Now you have big 
trouble. Like a line of dominoes, the pro- 
gram starts falling, and you can do nothing 
to stop it. Crash! What a mess! 

A Writer Doesn't Just Write 

When a professional writer begins a 
novel he starts with a theme, which he 
writes down, putting the general plot on 
paper. After this, he writes an outline, a sim- 
ple explanation of the story, piece by piece. 
He then writes a rough draft which follows 
the outline closely. Once the rough draft is 
finished, he re-reads to correct and revise. 
Using this rough draft, he writes the fin- 
ished version. Then he lets a reliable friend 
read it and comment on it before showing it 
to anyone else. To do otherwise would be 
suicide in the writing market. 

A Programmer Doesn't Just Code 

Coding is actually writing the program In 
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"/ consider myself a fair programmer, 

yet I have to sweat tfirough many articles 

I read in computer magazines." 



computer language. If a programmer tries 
to write a program starting with coding he 
will die a slow, painful death, with bytes all 
over his body (sorry). 

There is a set of easy-to-follow steps 
that I always use: 

1. Define the task 

2. Outline the procedure 

3. Code 

4. Enter 

5. Run 

6. Debug 

7. GOTO 5 

These steps can save hours of program- 
ming time and effort. Let's look at each step 
individually, while writing a small sample 
program. Then we will apply the principles 
to a larger program. 

Define the Task 

Write a mailing list program which ac- 
cepts 100 names and addresses of three 
lines each, allows corrections, prints ad- 
dresses on envelopes, prints names on the 
screen, stores names on tape, retrieves 
names from tape and sorts by zip codes (we 
use third class mail). 

Outline ttie Procedure 

There are different ways to outline pro- 



cedure. Some folks diagram with flow- 
charts, drawings of computer programs. 
Flowcharts have their use, but I never flow- 
chart. Why? Because in my mind it is too 
close to coding, and is no substitute for out- 
lining. Let me give an example by writing a 
standard flowchart for the definition (see 
Fig. 1). 

That flowchart Is not simple. I use 
another method that fits my natural work- 
saving (lazy) attitudes. I outline in simple 
English. 

If you can't explain a program in simple 
English, you sure can't write it in Basic. 
Your mother taught you English when you 
were a child; you should know the language 
far better than Basic. Use the power of your 
native language. This is my outline of the 
task: 

1 Start with a zero. 

2. Add five if the number is less than 100. 

3. It Ihe number equals 100 end the 
program. 

4. Print the number and its square root 
in columns. 

5. Return to step two. 

The outline is easier to understand and 
faster to write than a flowchart. 



Code the Program 

01 course, to get the program to work on 
the computer, it has to be entered in Basic. 
Let's code it now following the outline: 

• Start with zero. 

10 X = (this line should be eliminated on 
the TRS-80.) 

• Add five if the number is less than 100. If 
the number equals 100 end the program. 

20 IFX<100X = X + 5ELSEEND 

• Print the number and its square root in 
columns. 

30PRINTX, SQR{X). 

• Continue. 
40 GOTO 20 

Of course you now Enter and Run the pro- 
gram. Despite having taken the correct 
steps so far, the whole thing is not worth a 
bit (sorry again) unless it's correct. 

Debug 

Too often we see programs laced with 
bugs; I am tired of entering 16K adventure 
and Star Trek games that don't work. 

Debugging a program means correcting 
errors; It sometimes takes as much (if not 
more) time than writing the program in the 
first place. Do not run a program once and 
decide it works. I put all of my programs 
through hours of actual execution before I 



10 CLStCLEAR lOBOOi DIMA« < 101 . 5) 

20 INPUT"DQ you WISH TO PULL DATA FROM TAPE " j B 
« 

30 IF LEFT»(B«. 1 )='N"60 

40 INPUT-PREPARE TAPE TO PLAY. PRESS ENTER. "|F: 
INPUTS- 1 , F ; FORA- 1 TDFSTEP4 1 PRI NTAi Bs=A-H i C=At2 ; D= 
A+3 

50 INPUHt-l,A»(fl, U ,A»(A,2) ,A»{A,3) .A»(A,4) ,At( 
A,S1 , A«(EI, 1 } ,A«(B,2) ,A«(B,3) , A«<E(.4) .A«(8,S) ,A« 
(C. 1) , A« (C.2) , A* tC,3) ,A»(C,4) , A* (C,5) , A*(P, 1) .A 
• (D,2) , A«(D,3) ,A*CD,4) ,A«<D.S} (NEXT 
6ti CLSfFRINT"DQ YOU WISH TO 1-ENTER 2-CHANGE 
3-LlST 4-PRINT ENVELOPES 5-STORE 6 SORT " 

70 INPUTE 

BO IFe< 10ftE.>tTHENfeO 

90 ONEGOTOlOOO.rOOO, 3000. 4000, 3000,4.000 

1000 PRINTlF=F+1iPRINTF 

1100 1NPUT''NAME "jAVfF.l) 

1200 INPUT"ADD; "iA«<F,2) 

1300 INFUT'CITYt '■(A»(F,3) 

1400 1NPUT"STATE! ■■;A«<F,41 

1500 INPUT-ZIP: ■■!A«(F,5) 

1600 GOTOiO 

2000 PRlNTiPRINT"WHICH NAME DO YOU WISH TO CHAN 

QE?" 

2010 INPUTB* 

2020 FORA-ITDF: I FA* (A, 1 ) -e»THEN2030ELSENEXT 

2030 INPUT"NAMEi " i BS 

2040 IFB»='"THEN2050ELSEA*(A. 1 > -B» 

2050 INPUT-ADDi " j B« 

2060 IFB»-=" -THEN2070ELSEA* (A, 2) =>B» 

2O70 INPUT"CITY! "5B» 

2080 IFB*=""THEN2090ELSEA»(A,3)=B« 

2090 INPUT"STATEi " ( B» 

2100 IFB»-""THEN2110ELSEA»(A,4)=B« 



2110 INPUT'ZIPi ■■)&• 

212U IFB«=""THEN2130ELSEA«(A,5>=B« 

2130 eOTOtO 

30O0 CLS:FORA=lTOFiPRINTA 

3O10 PRINTA»(A, 1 ) 

~020 PRINIA«(rt,'-:! 

3030 PRINrA«(fi,3) ! ". "sA»{A,4);" "(AtCA.S) 

3040 PR 1 NT 1 NE X T 1 FQRA^ 1 TO^OO ; NE X r < G0T060 

4000 CLSsFORA-nOF 

4010 INPUT'INBERT ENVELOPE. PRESS ENTER " J B* 

4020 CLSiPRINT-PLEASE WAIT 

4030 LPRINTA*(A. 1) 

4040 LPRINTA»(A.2) 

4050 LPRiNTflS{A,3) s ■', "ifi»(A.4>)" ";fl»(A,5) 

406O FGRG=1TD12:LPRINT'- "iNEXT 

4070 NEXT1GOTO60 

SOOO CLS!PRINT"PREPARE TU RECORD. ENTER" : INFUTA 

iPRINT#-l,FiFDRA=lTDFSTEP4:B=A+l iC^A+2!D=A+3 

5010 PRIN1»-1.A»(A, 1 f .A»(A,2! .A»(A,3I , A» («,4) , A 

«(A.5) ,A«<B, 1) ,A«(B.2) ,A«<B.3) .A«(B.4> .A«(B,5} , 

A« (C, I) , At (C, 2) . A» IC. 3) , A»(C. 4> , A»(C,5) . A» (D, 1 > 

, A»(D,2) .A«(D,3> .A»(D.4) , A»1D,5) 

5o20 PRINT A: NEXT 

5O30 GOTOfaO 

6000 CLSiPRINT'SUHTING. PLEASE WRIT 

601O C»="79999" 

6020 1 = 1 + 1 ;FORA=ITDF; IFA» 1 A, 5) .C» THENCt-A* ( A, 5) 

)H»A 

6030 NEXT 

6040 D« = A» ( I . 1 ) I A» I I , 



6050 

6060 
6070 



D«=A«(I.2) : A«<I 
D»=fl* ( I ,3) I A* ( I 



1)=A»(H, 1> iA»(H, 1 J-D* 
2) -A«1H, ::) I n* (H, 2)=-B« 
3)=A«(H,3) ! A»(H,3)aD» 



D»=A«t 1,41 ! A»(I.4>=A»(H.4) ;A»(H,4)=D« 
60S0 D»-A» !J,5J : A»(I,5)-A«(H,5> sA«<H.5)=D« 
6090 IFI-F+II-O1QOTQ6O 
AlOO PR1NTI:Q0T06010 



Program Listing 1. 
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PACKER Machine language program that edils all or part 
o( your Basic program to run Taster, save memory, or 
ease editing. The 5 options include UNPACK— unpacks 
multiple statement lines into single statements 
maintaining logic, inserts spaces and renumbers lines 
SHORT— deletes unnecessary words, spaces, and REM 
statements. PACK—packs lines into maximum multiple 
statement lines, including all branches MOVE— moves 
line or blocks o( lines to any new location on program. On 
2 cassettes tor 16K. 32K. & 48K 

For TRS-80 Mod I or III Level II Or Disk Basic ... S2995 
SYSTEM TAPE DUPLICATOR: Copy youf SYSTEM format 
tapes. Includes verity routines. The Model III version 
allows use ot both 500 and 1500 baud cassettes speeds. 

For TRS-30 Model I or III Level 11 S15.95 

CASSETTE LABEL MAKER: A mini word processor lo print 
cassette labels on a line printer Includes 50 peel - and - 
stick labels on tractor feed paper 

For TR-eO Model I of III Level II & Printer $17 95 

PRINT TO LPRINT TO PRINT: Edits your Basic program in 
seconds to change all Prints lo LPrints (except Printl® or 
PrinlN) or LPrints to Prints Save edited version 

For TH-80 Model I or III Level II S12 95 

FAST SORT ROUTINES tor use with Radio Shacks 
Accounts Receivable. Inventory Control I. and Disk 
Mailing List Systems lor Model I Level II Sorts in 
SECONDS' Vou 11 be amazed at the time they can save 
Supplied on data diskette with complete instructions 

FAST SORT for Accounts Receivable S19.95 

FAST SORT for Inventory Control I S19.95 

FAST SORT for Oisk Mailing List (specify data diskette of 

cassette (or 1 drive system] Sl'1.95 

ALL THREE ROUTINES SM.95 

Prices subject to change without notice. Call or write for a 
complete catalog. Dealer inquiries invited. VISA and 
Mastercharge accepted Foreign order in US currency 
only. Kansas residents add 3% sales tax. 
On-lme catalog m Wichila FORUM-BO 316-682-2113 
Or call our 24 hour phone (3161 683-4811 or write. 
COTTAGE SOFTWARE 
614 N. HARDING 
WICHITA. KANSAS 67208 ^233 
TRS-BO IS a trademark of Tandy Corporation 



TRS-80 



SflVEABUriDLE 

'j^. When you buy your 
TRS 80TM equipment! 

Lse our foil free number to 

check our price before you buy 

a TRS SOT** . . . anywhere! 



rmsw i> I tfidtTLArt D* irv hkio Vlk* Dm 



Don't delay. . .CALL TODAY A 



V 



^^*8 



SALES COMPANY 



1412WEST FAIRFIELD DR. 

P.O. BOX BOgS PENSACOLA FL 32505 

904/435-6507 

iMtkMWiide 1-800-874-1551 
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"Any child can write a program; 
a good programmer writes 
bug-free programs." 

release them for publication. Your pro- 
grams are no less Impoilant. Any child can 
write a program; a good programmer writes 
bug-free programs. 

Outline the Procedure 

1. Clear screen. Reserve string space 
(100 times 3 times 36 equals 10,800). Set 
dimensions (name, address, city, state, zip 
code times 100 plus 1 for extra element in 
For. . .Next loops equals 101 by 5). 

2. Allow pulling of data from tape If 
desired. 

Pull total number of names. 

Loop through total number of names 

four at a time to save tape time. 

3. Give program options: Clear screen; 
Correct or change; List on screen; Print 
envelopes; Store names on tape; Sort by zip; 
Go to the proper routine. 

4. Entry routines: Add 1 to total number 
of names. Print total. Enter name. Enter ad- 
dress. Enter city, state, zip (In separate 
variables). Go to Item 3. 

5. Change routine: Allow entry of name. 
Find correct name In list by using a compar- 
ing loop. Allow corrections. Go to Item 3. 

6. List routine: Loop 1 through the total 
number of names. Display name, address, 
city, state, zip. Print a blank line. Finish 
loop. Go to Item 3. 

7. Print routine; Loop 1 through total 
number of names. Prompt to insert 
envelope. Print an envelope. Feed envelope 
to operator. Finish loop. Go to Item 3. 

8. Store routine: Loop 1 through total 
number four at a time. Store four on tape. 
.Finish loop. Go to item 3. 

9. Sort routine: Start main loop to go 
through number of names. Start minor loop 
1 through number of names. Find smallest 
Item In list. Exchange with Item at top of 
list. Finish minor loop. Finish main loop. Go 
to Item 3. 



End of outline 

Code: You can follow the program by 
comparing it to the outline (see Program 
Listing 1). 

The last thing we need to cover Is docu- 
mentation. I do not use REM statements, 
because they take up computer space and 
slow down programs. For example, I 
clocked the following program at 10.82 
seconds. 

10FORX = 1 TO 5000 
20NEXTX 

After adding the following line: 15 REM the 
program took 14.68 seconds. A few REM 
statements outside of loops will not make a 
lot of difference, but REM statements also 
consume memory. If you write a program 
and run out of space the first thing you do is 
cut REM statements. Why put them there in 
the first place? RAM Is valuable, so do not 



r START j 



INITIATE 
A NUMBER 



INCREMENT 
BY 5 



FIGURE 

SQUARE 

ROOT 



PRINT 
NUMBER 



TAB 



PRINT 

SQUARE 

ROOT 



TAB 




clog It Up with REM. 

The solution is to use pencil and paper. 
On paper you have all the room for REM 
statements and variable notation you need. 
Do not skimp on documentationt This is 
very Important If you expect to program In a 
professional manner, if you look at an un- 
documented program six months from now 
you probably will not understand it. 

It Is necessary to write down REM-type 
statements In a non-menu driven program 
to document programming routines. In the 
mailing list program, the menu in iineSOand 
80 will serve this purpose. 

This demonstrates the art of program- 
ming simply and effectively. If you follow 
the seven basic steps every time you write a 
program, you will save time and memory, 
and avoid extra unnecessary work.B 



Color computer owners 




Yes, that's right - for as little as 
$298.00 you can add 32K of dynamic 
RAM, and a disk interface, to your 
TRS-80 Color Computer! If you just 
want the extra memory it's only 
$199.00, and you can add the disk 
interface later for $99.00. 

Just plug the Color Computer In- 
terface (CCl), from Exatron, into 
your expansion socket and "Hey 
Presto!" - an extra 32K of memory. No 
modifications are needed to your 
computer, so you don't void your Ra- 
dio Shack warranty, and Exatron give 
both a 30 day money-back guarantee 
and full 1 year repair warranty on 
their interface. 

The CCI also contains a 2K 
machine-language monitor, with 
which you can examine (and change) 
memory, set break-points, set memo- 
ry to a constant and block-move 
memory. 

So what about the CCI Disk Card'^ 
Well as we said it's only an extra 
$99.00, but you'll probably want 
Exatron's CCDOS which is only 
$29.95 - unless you want to write your 
own operating system. The CCI Disk 



Card uses normal TRS-80 Model I 
type disk drives, and CCDOS will 
even load Model I TRSDOS disks into 
your color computer - so you can 
adapt existing TRS-80 BASIC pro- 
grams. 

As a further plus, with the optional 
ROM Backup adaptor, you can dump 
game cartridges to cassette or disk. 
Once the ROM cartridge is on cas- 
sette, or disk, you can reload, examine 
and modify the software. The ROM 
Backup adaptor is only $19.95. 

For more information, or to place an 
order, phone Kxatron on their Hot 
Line 800-538 8559 (inside California 
408-737 7111), or clip the coupon. 




excellence in electronics 

exatron 




DEALER ENQUIRIES INVITED 



Exatron, >^500 

181 Commercial Street, 

Sunnyvale, CA 94086 



11 Please send a 'MK Color Computer 
Interface for $199.00 

D Please send a CCI Disk Card for $99.00 

:: Please include CCDOS and manual 
for $29.95 

D Also include a ROM Backup adaptor 
for S 19.95 

Please add S5,00 for shipping to all orders. 
and 6 percent sales tax in California. 

Name 

Address 

City 

State Zip 

Charge my: 

D MasterCard Interbank Code 

n Visa Expiration Date 

Card 

C Check enclosed for 

n Ship COD ($2.00 extra) 



Signature 



*:t.>K K.V.M plui Disk Intcrfai: 



TKS-Kil li a iradrmark uf Tand> 



INTERFACE 



AtoD Alchemy. 



Real World Interface— Part II 



Elliott K. Rand 
P.O. Box 552 
Melbourne, FL 32901 



There is a need for direct communication 
between personal computers and the 
real world. Without it the entry of sophisti- 
cated data is limited to input through a Key- 
board. This precludes real time applica- 
tions, requires at least one additional level 
of abstraction, and introduces human error 
into a system. 

The computer counts in whole numbers 
which change abruptly. Since the computer 
counts in jumps while the real world is con- 
tinuous, converting one to the other means 
some small error must be tolerated (Fig. 1), 
Each increment of an eight-bit word is .4 



percent of the full amount. That would be 
like measuring a foot and having a max- 
imum error of less than 1/20 inch. If you 
need greater accuracy and you can cope 
with their complexity and cost, you can use 
a 10-bit {.1 percent) or 12-bit .025 percent) 
system. Most requirements are satisfied by 
an eight-bit system. Small errors like two 
plus two equals 3.984 are not a problem, but 
big errors can result if you assume a com- 
puter means 4.000000 when It shows you 
a 4. 

Computer Talks to Real World 

You need a means to convert the digital 
word into the power to drive a motor, 
vary an audio tone, or control a light source. 
A digital-to-analog converter can make that 
conversion. It can do it with either of two 
types of resistance networks (Fig. 2). With 
the supply voltages shown in Fig. 2, peg- 
ging the digital switches at the same set- 
tings in both systems will give identical cur- 
rent flow through the ammeter. 



ANALOG 
VOtTAGE 




SAUPLtrtG INTERVAL 



Fig. 1. Digitized Analog Signal. 
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Comrerter Resistances 

Binary-weighted resistances in a ratio of 
2" (1 , 2, 4, 8, etc.) are connected as shown In 
Fig. 2a. In a four switch system 15 steps of 
1/8 ampere from zero amperes to 15/8 
amperes provide the 16 levels of a 4-bit 
system according to the closing of the ap- 
propriate switches. 

This system found its widest use when 
complete digital-analog converters were 
not available on a chip, tn this type of con- 
version, accuracy suffers If many bits are 
used. The range of resistor values in an 
eight-bit system would be from R to 256R. 
Resistor tolerances of . 1 percent or better of 
non-standard higher values are required. It 
is difficult to maintain the system's linear 
properties after four or five bits because of 
its unpredictable drift with variations in 
temperature and other elements. 

Climbing the R-2R-Ladd«r 

Resistances R and 2R are connected as 
shown in Fig. 2b. With all switches 
grounded, the resistance from any node is 
2R in any direction. Closing any switch 
divides the current at each node. Connect- 
ing Si— the farthest switch from the am- 
meter—to the minus 4V source makes the 
current through the ammeter 1/16 of the cur- 
rent through SI ; connecting S4— the switch 
closest to the ammeter— makes the current 
through the ammeter 1/2 the current 
through S4. Thevenin's theorem or the prin- 
ciple of superposition will show the current 
flow through the ammeter Is an analog 
equivalent of the digital value represented 
by the switch settings. 

The major advantage of this system is 
the ease of fabricating extremely closely- 
matched resistances right on the chip with 
values of R. The requirement for twice the 
number of resistors is not a disadvantage 
considering microcircuil dimensions. 

Affordable Chip 

Current-to-voltage conversion Is easily 
accomplished through the use of an opera- 
tional amplifier. (Fig. 3.) By selecting the re- 



'.. this is not only a worthwhile book 
but a great book. My advice is to get it 
and USE it!' - William Barden Jr. 




OTHre 



132 pages 
S22.50 



Now available at 
selected DALTON 
bookstores 




312 pages 
$29.95 



Get them at your local IJG dealer! 



'It has twelve thousand one-liners 
in It, and every one is great!' 
- Dennis Kitsz. 



TRS-80 Disk and Other Mysteries is the 
definitive fixit book for disk users. Writen 
by Harvard Pennington it has more than 
1 30 pages of easy to read, entertaining and 
immensely useful information ■ find out 
how to recover disk files, the layout of 
information on the disk, memory maps, 
problem solutions . . . the list goes on! 

Many readers have saved days of work 
by recovering files that had been unread- 
able. Now in its fourth updated printing, 
TRS-80 Disk and Other Mysteries has 
been getting rave reviews in several mag- 
azines. Yours for only $22.50 (plus $3.00 
shipping, CA residents please add $1.35 
sales tax). 

Microsoft BASIC Decoded and Other 
Mysteries is the complete guide to your 
Level II ROMs. With over seven thousand 
lines of comments and 6 additional chap- 
ters packed with information, this is easily 
the biggest, and best, book about the Level 
II ROMs available. 

Exploit the full power of Microsoft 
BASIC, with the aid of more than 300 
pages of tested examples, understandable 
explanations and detailed comments. Now 
available in a revised second printing, only 
$29.95 (plus $3.00 shipping, CA residents 
add $1.80 sales tax). 

I'Jti I'omputer Services, 
1260 West Foothill Blvd., 
:--T. Upland, CA 91786 
Please send me the following 
Other Mysteries: 
D TRS-80 Disk for S22.5() 
D Microsoft BASIC Decoded for $29.95 
n The Custom TRS-80 for $29.95 
n BASIC Faster and Better for $29.95 
D The BFBLIB Disk for $19.95 
D The BFBDEM Disk for $19.95 
Please add $3.00 per book, or disk, 
for shipping. 

Overseas airmail $8.00 per book. 
California residents add 6/(' sales tax. 

Name 

Address 




Phone orders (714) 946-5805 



City 

State Zip 

Charge my: 

n MasterCard Interbank Code. 

3 Visa Expiration Date 

Card No 

D Check enclosed for 

Z Ship COD ($3.00 extra) 
Signature 



THW-sil i>a iradcrnarkorTand.i, Mitronofl ii trademark of MitroM)f(. 
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'These transistors are inserted 
within the feedbacl< loop 
to provide up to 75 mA ..." 



quired value for Rp we can achieve any de- 
sired multiplication. The mechanical switch- 
es may be replaced with FET switches ac- 
cessed by the data bus. 

A widely used integrated circuit, DAC-08, 
available from Precision Monolithics and 
National Semiconductor, provides R-2R 
capabilities on a single chip. Wide use has 
made the chip very affordable. A block 
diagram and an equivalent circuit of the 
DAC-08 are shown in Figs. 8a and b. 

Inside th« Beast 

A schematic of the digltal-to-analog sec- 
tion of the real world interface is shown In 
Fig. 4. A reference voltage (Vr) is generated 
across VR1 for use within the digltat-analog 
Integrated circuit. Maximum voltage output 
of the system Is 255/256 times VrRm/Rf, 
available at pin six of 741 operational am- 
plifier AR1. This voltage Is used to drive 
transistors 01 and Q2. Those transistors 
are Inserted withi n the feedback loop to pro- 
vide up to 75 mA output current from the 
digital-analog converter. This low im- 
pedance output voltage Is returned to the 
negative Input of AR1 . This ensures that the 
output voltage will remain constant as long 
as the load does not draw more than 75 mA 
(the limit established by the 2W 220K)hm 
collector resistors). 

Getting Your Feet Wet 

To perform these experiments, all in- 
tegrated circuits except IC7 must be in- 
stalled. If IC7 Is already Installed it does not 
need to be removed. Both the plus five volt 
and the plus-minus 15 volt direct current 
supplies are also required. 

Before attempting these experiments be 
sure to remove power from the TRS-80 and 
all power supplies. Never leave the power 
on while setting up or reconfiguring test 
hardware. 

If the Interconnect cable Is not already In- 
stalled between the TRS-60 and the real 
world interface connect the card-edge con- 
nector to the expansion port with the 
ribbon-cable exiting upward. Install the 
40-pin DIP plug Into S01. Pin one of the 
40-pln DIP plug goes to pin one of SOI. 

Connect the plus five volt and the plus- 
minus 15 volt direct current supplies to the 
real world interface. Connect a direct cur- 
rent voltmeter capable of reading 15 volts 
across the digital-analog output and 
ground. 

Turn on the plus five volt supply. All light 
emitting diodes (LEDs) should light. Turn on 
the plus-minus 15 volt supply. The voltmeter 
should Indicate approximately 10.25 volts. 
Turn on the TRS-80. 

A memory size start-up routine should oc- 
cur. No memory need be reserved for these 
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experiments, so press Enter to get Into 
Level II Basic. 
Enter and run: 

10 OUT 127,137 'Configures 8255 

20 OUT 124,128 'Loads BOH into Port A 



You should observe only the most- 
slgnlflcant-blt (MSB) (left-most) LED lit. The 
meter should read exactly one-half the 
meter reading on power-up. 

Run the program after changing line 20 to 
20 OUT 124,64 'Loads 40H into Port A. You 
should observe only the second MSB LED 
lit. The meter should read exactly one- 
quarter of the meter reading on power-up. 

You may want to try other values In tine 
20. Note that an error message occurs If a 
value outside the range of 0-255 Is at- 
tempted, and quantities to the right of the 
decimal point are Ignored. 



Enter and run: 

10 OUT 127.137 
20 OUT 124,064 
30 OUT 124.128 
40 GOTO 20 

You should observe the two MSB LEDs ap- 
pear lit while the meter reads somewhere 
between one-quarter and one-half of the 
meter reading on power-up. The system is 
switching between the two voltages too 
fast for the meter or eye to follow it. 

Run the program after adding 25 FOR P 
= 1 TO 100:NEXT P and 35 FOR P = 1 TO 
100:NEXT P. Now the LEDs toggle visibly 
and the meter needle swings between the 
two values. 

Change lines 25 and 35 to 25 FOR P = 1 
TO 10:NEXT P and 35 FOR P = 1 TO 
10:NEXT P and run the program. The LEDs 
will toggle rapidly while the meter needle 



VOLT 




Fig. 2a. Binary weighted D/A converter. 



NODE I NODE 2 NODE 3 NODE 4 

R R R 2R 



2R 



^ 



2R 



SI 



2R 



S2 



2R 



S3 



<*> 



2R 



S4 



1 



S4-tA 
SI-I/I6A 



^ 1 ^1 ^1 ^1 



"1 

-4V 



Fig. 2b. R. 2R Ladder D/A converter. 



DAC08 



Tl I 




• OTO + Ips ■ Rl 



Fig. 3. Positive Low-Impedance Output Operation 



LEVEL IV PRODUCTS, INC. 

- IS NOW OFFERING - 

The Full TRS-80' Line at Discount Prices, 

wltti Extended Warranty Coverage 






COLOR COMPUTER 



MOD III COMPUTER 



MOD II COMPUTER 

32K(f?) S2950 

64K (P) S3375 

Expansion Dr#l (P) SW9 
Expansion [>#l-2-3(E) S695 



NOTE: THE MOD ill CAN BE ASSEMBLED WITH UP TO 4 MEG UNFORMATTED FLOPPY DISK STOR- 
AGE CAPACITY (4-80 TRK DOUBLE SIDED DRIVES) - CALL FOR A QUOTE ON THE SYSTEM 
TAILORED TO YOUR EXACT NEEDS 



16K(R) 


$440 


16K(R) S8b9 


16KCE) 


S359 


48K2-40 drives ([?) S2010 


16Kw/ext basic (f?) 


S529 


48K2-80 drives (E) S1829 


16Kw/ext basic (E) 


S479 


48K2-80 drives (E) S21!9 
48K 2-80/80 dr-ves (E) $24 19 
PS232 inlertoce odd $89 



PRINHRS 



Line Printer IV (R) $849 

Line Printer VI(R) $986 

[)aisyWheellKR) S1679 

C. ITOH StorNAffitefS Call 

Centronics All Call 

Epson All All 

AnodexAII Call 



MPI DRIVES FOR: MOD I, MOD III, & COLOR 



MODEL 
40 TRK (E) 
40/40 TRK (E) 
80 TRK (E) 
80/80 TRK (E) 



RAW SINGLE DUAL 

S240 $298 $576 

S360 $419 $818 

S360 $419 $818 

$502 $549 $1078 



PERIPHERAU 



OK(R) 
16K(R) 
32K (R) 
16K(E) 
32K(E) 



16KRAMC200MS) 



$249 
$359 
$469 
$305 
$362 
$39 



DEALER'S INQUIRIES INVITED, CALL FOR OUR WHOLESALE DEPARTMENT (313) 525^5201 



WAWAHTY POUCY 

Items including non-Rodio 
Shock components (E) are 
co/ered by on extended six- 
month pofts/lobof Marronfy m 
cxj tech service center 

Items constructed from r?odo 
StxKk oppfowed components 
CR) ore cc\efed tjy a POday 
parts/labor warranty ot any 

r?odo Sfxx;k store, plus on oddi- 
tKXKil 90 days in ou tech ser- 
vice center 



TIRMI OF SAU 



,2%.Discount allowed on cosh 
pre-poid orders Pefsonoi 
ctiecks require two weeks tc( 
bonk cleoronce 

Visa. Masler Charge ond COD 
aders accepted Add SJ50 fa 
CODs 

Shipping/hondimg/insurance 
odd 1 5% or S2 50 minimum 

Prompt shipments from stock 



LEVEL IV PRODUCTS. INC. 
32441 SCHOOLCRAFT ROAD 
UVONIA. MICHIGAN 46150 

MICHIGAN - (313) 52M200 
TOU FREE - 600-S21-3305 



'JQAC£fsAAPK Of lAfgDY COfP 




THE NEW EaaFuCAiKcJi 

IS AVAILABLE FOR 
YOUR CHURCH TODAY! 

it the first affofddble computerized church record 
syilem vthi< h cndb/es your itaff (o quickly and 
accuiatelv 

• RfKoiddll weekly zonlnbuttam 

• Prepare IRS slatementi lor members 

• Miiriljin prfiond/ records 

• Surl fttordi by ikill or aclivity 

• Mdintjm mailing //sts 

• Pimt mailirin laheh 

• Use a "Wotd Piocesioi" lor 

Swmons 

• flu//p((ns 

• i enen 

• S(e»)C//i 

• /^ulomjfp payroll and accounting 
^Maintain invcnfories for 

» Iqiiiprryent. Rooki 

• Music. Spfmons, e(c 



CiiaFi£^m^ 



i* 1 COMPLtTI syslem including 

• Reliable microcomputer 

• /(is'' ^P**"/ pr-ntetiH 

• Quality computer prograrni 

• Required training & manuali. 



CBSF^^me^ 



requires no prior knowledgr ofcompuiers 
Your church staff will rapidly adopt the 
COMPUCMURCH system tor all iheir 
adminislrative laskt. A real time uver! 



CaaFi£AmEA 



wjf developed by computer specialisli at 

MTS, Inr Dr. Stewart W. Turner, President 
of MTS. Inc also has an in depth 
understandinf; of church finances and 
administration, and can personally custom 
deiign a syslem for your church , , . from 100 
to 1000 members 



CBapuCMmeft 



n AFfOROAILE due lo recent advances in 
technology . . . even with a modes! church 
budget, we can inslall a COMPLETE system 
in your church for ONLY 

SSOM — saoM 

depending, on your church needs 

(Software available separately) 

Call our specialists today fof more 
information and a free sample portfolio. 
O.K. to call evenings when rates are low 



/ y P.O. BOX 596 

rn L^ f^icevHle. PL 32578 
UiLCJ^ (904)897-3741 ^451 
uKiKxohmjTiM ncHHOLocy and tofrw/uu 



"No memory need be 

reserved for these dithers 

between limits of its earlier swings." 



dithers between the limits of its earlier 
swings. An oscilloscope can be connected 
to the digital-analog output terminals for a 
more Infornnative examination of the 
various signals developed. 
Next enter and RunlOO: 



100 OUT 127,137 

no FORM = 1T0 2» 

120OUT124.N 



+I5VDC 



R46 

loon 

DIA ^— WA — 

OUTPUT 
(0-IOV) 




(^ 



Q3 
2N3055 OR 

EQUIVALENT 
POWER TRAN- 
SISTOR 



BASELESS PLI 
PANEL LAMP 



"^(GND) 
Fig. 5. Lamp Driver Circuitry. 



130 NEXT N 
140 GOTO 110 

You should observe the LEDs continuously 
counting from 0-255. The meter swings 
from zero to maximum In about two 
seconds and quickly returns to zero at the 
end of each count. An oscilloscope will 
show a staircase-sawtooth waveform. 
Change line 140 and add the lines: 

140 FOR N = 255 TO STEP - 1 
150 OUT 124, N 

160 NEXT N 
170 GOTO 110 

Run the program again. Now the voltmeter 
swings from zero to maximum and back to 
zero, describing a triangular waveform. 

Add 125 FOR P = 1 TO 10:NEXT P and 
155 FOR P = 1 TO 10:NEXT P and RunlOO 
the program. Now the ramp may be more 
closely studied. 

Enter and Run200: 



zoo OUT 127.137 

210 INPUT "ENTER DECIMAL NUMBER 0-2S5";M 

220 IF M<0 OR M>2S5 GOTO 210 

2X OUT 124, M 

240 GOTO 210 

The voltmeter will Indicate a voltage pro- 




-tsv 



D/A OUT 



Fig. 4. Digital-to-Arialog Converter. 
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You've Cot 

TOTAL ACCESS 



© 



( spectallzlng in TRS80 *i 



Rose 



ici 



TO YOUR COMPUTER HARDWARE & SOFTWARE 
NEEDS. CALL ROSE TODAY! 



I've cot 

* Disk Drives 

TA400 ( 40-T ) S289 

TA 800 1 80-T ) $41 9 

TA400 Flippy S319 

TABOO Flippy §439 

All with Silver case & power supply 
All TA Drives are MR. 

* CABLES 

2-Drlve $23.95 

4-Drlve §33.95 

Extender cable S14.95 

* BARE DRIVES 

TA400B S259 

TA800B $389 

TA400B Flippy S289 

TA800B Flippy §409 

* EPSON PRINTERS 

MX70 §379.00 

MX80 §475.00 

MX80 F/T $5B9.00 

MX100 §799.00 

Parallel Cables $29.95 

• Delivery stow or some modets 
■k OPBtATINC SYSTEMS 

TRSDOS 2.3 Disk & Manual ...$17.95 

LDOS §129.95 

NEWDOS/80 §129.95 

DOSPLUS 3.5. 3.3D $89.95 

* IRON 

Disk Drive Power Supply, 

Single $37 

Disk Drive Case (sliver) 

and Base Sl9 

Memorex Diskettes ( bx of 10 ) 
$25 

90 day warranty on drives. Add $S.OO fright per 
drive In Cont. us. ups cod marge Si.w Tnere is 
atso a 1 5 day FREE trial on TA drives. If not com- 
pletelv satisfied I'M refund your money < less stilp- 
plng ). I'll take exception to Improper use or 
misnandjing. 

* USERS CROUPS 

When your club makes a group buy, 
be sure to can me for a price. 
Rose 

TRS80 * COMPUTERS 
*COMPUTERS 

26-1061 Mod III, LI, 4K §595 

26-1062 Mod in, LM. 16K §850 

26-1066 Mod lll,a8K/2 Disk/RS232 

$2150 

26-4002 Mod II, 64K §3300 

26-3001 Color computer, 4K. . . §330 
26-3M2 color computer, 16K. . §510 
26-3501 Pocket computer $195 

* DISK EXPANSION, MOD 11 

26-4160 One Disk $977 

2&4161 TWO Disk $1487 

26-4162 Three Disk S1998 

LOBO drive units also available. 

• Trademark of Percom Data Co. 
•* Trademark of LNW 



• PERIPHERALS 

26-1140 0K ExD. interface S255 

26-1140 W/16K Mem, testedS505 
26-1140 W/32K Mem, testeclS355 

26-1172 D.c. Modem II SI 35 

26-1206 CTR-80 Recorder §51 

26-3503 P.c. interface §42 

16K Memory, Guar. 1 yr 529 

• PRINTERS 

26-1165 Line Printer V §1581 

26-1166 Line Printer VI $986 

26-1158 Daisy Wheel 11 $1694' 

26-3505 P.C. Printer S127 

DP9500/1 Anadex S1295 

■ LIMITED AVAILABIUrr 

• SOFTWARE 

26-1563 SCripSit $85 

26-1566/7 VJSlCalC $85 

All Other R/S software IS-' off list 



TtiG complete line of Radio snacX proOucK te 
available tnrougn TA with standard RS limited 
warrenty. Call me for price and delivery Just 
cause vou don't see it, don't mean we ain't 
got It. 

ROSE 



ROSE'S 
SPECIAL 
OF THE 
MONTH 

•AEROCOMP'S^ 

ALL NEW 

DOUBLE DEIMSITY 

CONTROLLER 

"DDC" $149.95 

Heres a Double Density Controller for 
Mod. 1 tnat does away with all those data 
separation problems that seem to keep 
cropping up! Rose wouldn t fun ya now, 
would she? Dent be scared of Double 
Density any more, aerocomp has design 
ed some advanced circuitry that even i 
don't understand - but i do know it 
works. Better order now. Ouanities are 
going to be a bit short, 

$189.95 complete 

with Dosplus 3.3D. 

How many do you 

want? 12? 



Rose's T-SHIRTS 

With any order of Si ,000.00 or 
more, I'll send you one of my 

"MINI-FLOPPY" T-ShlrtS! 

STARWRITER 45 CDS 
DAISY WHEEL ^ 

f?'.'HT^-'^,,.$1799 

DOUBLE DENSITY 
DATA SEPARATOR 
FROM AEROCOMP 
$49.95 

If you own a Percom "uoubler A " *, 
"Doubler II"* or LNDoubler' •• 
upgrade It with the "DOS". Plugs 
right in. No more lock-out! You 
deserve one of these. 

ORDER NOW! 
TOLL FREE 
800-527-3582 

write or call Rose toll free at 
1-800-527-3582 Texas residents call 
214-254-1770). Please use the toll 
free lines for orders and literature 
requests only. Technical help or ser- 
vice use the Texas line, you can pay 
by VISA or MASTERCARD, you can 
send check or money order (allow a 
couple of weeks for personal checks 
to clear) or order COD (we ship cods 
cash, certified check or money 
order only). Rose will take American 
money In Just about any form. Add 
freight (UPS where possible) on all 
orders under $1000. if you buy 
SI 000 or more Rose eats the freight! 
Texas residents cough up 5% sales 
tax. Allow 2-4 weeks for delivery. 
Order today - 1 need the moneyl 

TOTAL ACCESS. 

P.O. BOX 3002 
RICHARDSON, TX 75080 



2ia-23a-1770 

■ TRS80 & Radio snacK are trademarks of 
Tandy Corp. 

Copvrlgrn 1981 TOTAL ACCESS 



t-6 



TO ACC / 2 J 
T0ACC1/2d 



-See Li&l ot Aduerl'sets on page 402 
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"Without the spacer 

the heat-sink will 

be at the same voltage. . . " 



R47 

I5K 

— IOV •— vw 




- - r.,, TO MOTOR 
^"3 ♦I.5V0C TO 
-I.5V0C 



-I5V -15V 

Fig. 6. Bi-directional, Variable-Speed, Permanent-Magnet Motor Driver. 



portlonal to the decimal Input (10X/255 
volts). The LEDs will indicate the binary 
equivalent of the decimal input. Both the 
voltmeter reading and the LEDs still only in- 
dicate an abstraction of a physical condi- 
tion and have no real meaning to the phys- 
ical world. 

The Reality Connection 

Connect the lamp driver circuit (Fig. 5) to 
the output of the digital-analog converter. 
Use a 2N3055 NPN power transistor or 
equivalent with a heat-sink. Be sure to apply 
some silicone grease between the tran- 
sistor and heat-sink to maximize the 
transfer of heat and put an insulating 
spacer between them. Without the spacer 



the heat-sink will be at the same voltage as 
the transistor collector. Avoid inadvertent 
contact with other circuitry. 

This circuit provides adequate current 
to power a small panel lamp. A base- 
less 12-volt bulb, like the kind used in 
automobile instrument panels, is conve- 
nient to use with clip leads, or Inserted 
directly into a solderless breadboard or the 
space provided on the printed circuit board, 
avoiding the requirement for sockets and 
other items. 

Run all the programs I've described with 
the panel lamp circuitry and the meter 
across the digital-analog output. Program 
operation will control the light bulb's 
brilliance. Note the voltmeter indicates 




Fig, 7. Voltage-Controlled Audio Oscillator. 
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several volts above zero before the lamp 
glows. 

The 0-10 volt direct current output from 
the digital-analog converter can be translat- 
ed into a proportional voltage of about 
minus 1.5 vdc-plus 1.5 vdc (see Fig. 6). 

Operational amplifier U8 sums the minus 
15 vdc and the 0-10 vdc inputs. With the 
values shown in Fig. 6, an output of minus 
1.5-1.5 vdc results from converter output 
voltages of 0-10 vdc. Transistors Q4-Q7 in- 
crease the circuit current-driving capability 
from a few mA from U8 to one Ampere. 

Connect the motor-driver to the ap- 
propriate power supplies. Do not connect 
the permanent-magnet motor to the motor- 
driver output circuitry yet. 

Type and enter OLfT 127,137: OUT124,128. 
This sets the motor-drive output to zero 
volts. Now connect the permanent-magnet 
motor to the motor drive output circuitry. 

This motor is a 1.5 volt direct current 
motor used in small tape-recorders and bat- 
tery-operated toys. (Radio Shack #273-208 
or equivalent.) Clamp the motor in a small 
vise to prevent it from jumping around. 

Run200 the program previously loaded. 
For numbers lower than 105 rotation of the 
motor shaft will be in one direction. Speed 
of rotation will increase as the numbers ap- 
proach zero. For numbers higher than 150 
rotation of the motor shaft will be in the op- 
posite direction, increasing as the number 
approaches 255. Painting a spiral on the 
motor shaft with nail polish or white correc- 
tion fluid makes the direction of rotation of 
the shaft more visible. 



SUPER MICROPRO CESSOR FOOTBALL 



SCOFEi T* WGHTV CMftJTEIt - B 



■ ■ 

r ■ 

■ ■ 
I ■ 

ft 



G :i 21 31 dl Si i>t 31 2t tl G 

...fflUfl TEfl« DFFD61* mftO. <— (— 

'.ST DOUN WD IB W T>C HIBKTY GOTVUTERS 31 



IIMI -MIT 15 VOUH QFRNSM PLPY^ lltll 



QDO IS HWlhC - TIRE <ID«!MIW 11 : 2fl ■ PLAT TirCR S 



Animated Graphics — Game Time Clock 
{48K 32K) Available for TRSSO" Lll Ml or M3 
48K DISC *22.9B - 32K DISC *19.95. (48K 

has more of everylhrngl!') 

16K DISC OR TAPE M2.9S " 

Many more super programs Please write for 
free lisiing and program details. 

Attention: Software Authors— We want good 

programs^Top royalty plan. Dealennquiries 
welcomed. 

■ TRS80 is a Reg Trademark of Tandy Corp 

MICRO PRO SYSTEMS 

Route #2 Box 533 
Cumming, Georgia 30130 




TEACH YOUR 
CHILDREN 

Learning to couni money by Malcolni Nygren 



A ihree-program learning system ihal leaches 
the important skill of counting money. 

1, Counting Coins— insiruclion and drill in 
counting pennies, nickels, dimes and 
quarters. 

2, Shopping Trip — Buy goods in various 
stores; count out Ihe payments and earn 
"purple stamps" for a right answer. Three 
speed levels, 

3, Check-Out — Run yout own checkout 
counter. Learn and practice how lo make 
change. 

Learning lo count money by Malcolm Nygten 
leatures superior graphics and is available for 
TRS-80 Model 1-Le%el n-l6K on cassette 
only Shipped postpaid by first -class mail 

tach program S6.W— fl// Ihref $19.95 



ALSO AVAII.ABLi: 

ALPHA— Aiphabci rei.ogrmion (or 

prfithixtlcri 
SItMA — Addition problems for 

Grades lO 
SltMA-KX — Addition ptobicms (or 
— the younger or slower 
learner 
SPtL. L— Spelling pratiKc (or 
Cjtades 2-4 
Available on cusellc only. JJ.9* each Two for SM, 
AU foui for S20.00 1-104 

MertFi Syittint Inc, 
Hkkivlllc. N.Y. t 1801 



{(I 



r,o, o..d .>„..„. TRS-80* MODEL 

BASIC CROSS REFERENCE 



• UNDWHISl NAMIS *Rl USttJ FASt' 

• CAS yoil DUI tE IMA I lINfUNDOUt' 

• DO >Oll HAVt UtADlODINC 

• rtANI A NK \ fH<x;HAM IISIJNC. WIIH 
DATl S IIMI IN MlAOINt, 



>SAVl HOUHS' 

»PA«Aim StHIAL I'HINItHS 
• SlViRAI DPIIDSS 
H.H IPI VAKIAHLI 
lINt WIDIH & PA(.( Uf PIH 



M)rt A\ AllAHll ' 



^OS'SS HANDLING 

IXXLiMtMAllON (?Nl> iU1l«» 
Ul DV\ T IHLt ON PtJRt MASl 



DISK SORT 

• MLMU DRIVIN • 

• RANIKJM lilts < 

• (.MAINS TO S>ST(M 
OR BASK PROGRAMS 



• \C)U [JON T MAVi Hi HI A PKIX.HAMMIH TO USI IT' 
I A'j> I(J US( •IAS> lOINilKI INUI 

lA^T lOHSlKIAMIOK $69.99 



• SPKS SAVID 
ON DISK 



N(>N-SlOP kUNMNC 



+ POSTAGE A 
HANDLING 



BASIC COMPILER 



D(XLlMINIATIONi>NL> HDCJ) 
Dl IK ■< I IKl 1 OS PUR< HAM 



IWHIIUN H> MICROSOFT 



• TRSDOS'BASK, (OMPAIIItll' •lASV TO USl 

• FASUH I HAS HASK H> l.P !0 • AUC-MlNil D \M 1 H Ol.H 
WITIMIS DOC LMtSlAIIDS ■ — 

iKs«>' & THS[«>s'A«i kicisiiHiD GOODLYDDON DATA SYSTEMS 

IKADf MARKS Oi TANDl c OKI' 54W RIVERSiOe DR.. CMINO. CA, 91710 



$350.00 



♦ POSTAGE & 

HANDLING 



MASTER CHARQEw 
VISA accaptad. 



THE BOOKKEEPERS 



FOR INFO CALL (603)-447-2745 



Full Charge Bookkeeper— 48K, 3 DRIVE, w/ALPHA $129.95 
Intermediate Bookkeeper— 48K, 2DRIVE & Printer $109.95 
Cheap Bookkeeper— 32K, ZDRIVE & Printer $ 89.95 

AU Above Are Daily lournal^G/L Systems 

Ann Rose, our Accounts Receivable Clerk — 
48K. 2 DRIVE & PRINTER 



$150.00 



STURDIVANT & DUNN, INC. ^s? 

BOX 277, 124 WASHINGTON ST., tONWAY, NH, 03818 




Model 488-BOB For ModBl 1 Opantlon 



Modal 488-80C For Mode) 3 Operstlan 



IEEE-488 TO TRS-80* INTERFACE 
Everything needed to add powerful 
BASIC GPIB-488 controller capability to 
TRS-80 Model 1 or 3, Level 2 or DOS with 
a minimum of 16K. 

488-80B or 488-80C $325. 

+ shippmg, insurance i lax 

WHEN ORDERING SPECIFY DISK OR TAPE 

SCIENTIFIC ENGINEERING LABORATORIES ^291 

11 Neil Drive • Old Bethpage. NY 11804 
Telephone: (516) 694-3205 

'Trademark ol Tandy Corp 

There is no aniliaiicf bei^een Scientific Engineermg 

Laboratories ana Tandy Caip or Radio Shack 



VISA/MC Order Line Onfy (except Mich.) 800-253-4358 ext. 100 

FINDiSK-II The ultimate in automatic disk Indexing with »clu»ive features Model-1 S20.00 

AUTOMATICALLY cieale INDEX of programs or data from all youi disks, print disk LABELS, punt 
alphabetaed MASTERLIST, do fast SEARCH, add DESCRIPTIONS Also automatically detect DATA or 
SYS disks, PURGE disks and index ol old files, and UPDATE from revised disks only 
S<HJ^R-l Tlie critical calculaUoiw far passive design. . . Model! $30.00 Model-II S45.00 

INPUT any lalitude. onentation. slope, roof overhang, storage type, buildmg loss. OUTPUT: solat anyles. 
shading, time, heat gain/loss, percent solar, fuel use Print report by hour, month, year in presentation formal 
RIA-ll Complex Real Estate investment Analysis Modell S30.00 Model II S45.00 

Analysis for investor or homeowner using Elwood method INPUT PrO]ect costs, loan and lax data, 
expenses. deprecial>on rate OUTPUT Cap rate/value, mortgage payments, before after lax cash flows, return 
IIRR) . profit/gain from sale over any time series 

DEPRECIATE! Manage a Hat of depreciable Items Model! S15.00 Model-II S20.00 

Tracks long list of depreciable items with varying purchase dales, depreciation rales, or per cent business use 
Update any lime Print lax form. Used by many CPAs 

STRUCT-! Graphic design of steel/wood beams and moment transfer Model-! 115.00 

INPUT span /cantilever, uniform/point loads, beam material OUTPUT with screen graphics beam moment 
& shear diagrams Pnnt job report with diagram, stresses, and requited beam sizes. 

Min32K On disk (Modi one drive orderlape) Add $1 IX) postage iMich add 4% tax) VlSA/MC 
^88 DOCUMAN SOFTWARE BOX 387- A KALAMAZOO, Ml 49005(616)344-0805 



y'See Usi of Advertisers on page 402 
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'The computer can also convert 
analog signals into audio tones.' 



Enter 128 in response to the pfogram 
prompt to stop the permanent-magnet 
motor, then Enter and Run300: 



300 OUT 127,137;OUT 124,128: FOR N = 126 TOO 

STEP - 1 :OUT 124, N:NEXT N 
310 FOR N = 010 256 
320 OUT 124, N 

330 FOR M - 1 TO IDiNEXT M 
340 NEXT N 

350 FOR N = 256 TO STEP - 1 
360 OUT 124, N 

370 FOR M = 1 TO 10:NE)CT M 
380 NEXT N 
390 GOTO 310 

The permanent-magnet motor gradually In- 
creases its speed in one direction, then 
slows to a stop, reverses direction, and 
gradually increases to maximum speed in 



the opposite direction. You may want to in- 
crease or decrease the delay loops in line 
330 and 370. 

When the motor Is stopped, depress 
Break, enter and Run400: 



400 OUT 
410 FOB 
420 OUT 
430 FOR 
440 OUT 
450 FOR 
460 OUT 
470 FOR 
480 OUT 
490 FOR 
500 OUT 
510 FOR 
520 OUT 
530 FOR 
540 OUT 



127,137.0UT 124.128 

N = 1 TO 500-N E)fr N 

124.105 

N = 1 TO500:NEXT N 

124,70 

N = 1 TO500:NEXTN 

124.35 

N^l TO600:NEXTN 

124,0 

N = l TO500:NexT N 

124.255 

N = 1 TO500.NEXT N 

124.220 

N = 1 TO500:NEXTN 

124,185 




Fig. 8a. DAC-08 Block Diagram. 



550 FOR N = 1 TO 500:NEXT N 

560 OUT 124,150 
670 GOTO 410 

The permanent-magnet motor suddenly 
changes speed and direction at one-second 
Intervals. Hold the motor in your hand. 
Notice that large speed changes or raver- 
sals cause the motor to torque (twist) op- 
posite to the shaft rotation. These speed 
and direction changes are sudden but not 
Instantaneous. 

The computer can also convert analog 
signals into audio tones (see Fig. 7). A 
number of schemes have been devised to 
produce musical or audio tones from the 
TRfrSO, using the system as a very expen- 
sive square-wave generator. The major dis- 
advantage with Internally generated audio 
Is It ties up the whole system which could 
be doing other things. 

This Is an example when the hardware/ 
software trade-off— always an engineering 
consideration— favors hardware. 

For our application, the integrated circuit 
for the 555 timer Is configured as a voltage- 
to-trequency converter. Varying the input to 
R55 (24K) to between zero and 10 volts 
direct current results in the charging volt- 
age — appearing at the junction of R55 
(24K}, R56 (lOK), and R57 (10K)— varying be- 
tween 10.6 volts and 13.5 volts do. To allow 
the 555 to function as an oscillator, Ct must 
charge to 2/3 of Vcc (10 volts). This require- 
ment is met with the value given for R55 
(24K). Lowering the value of R55 to 20K 
causes the 555 to stop oscillating as the in- 
put to R55 approaches zero volts. This per- 
mits silencing the oscillator if desired. 

Because of the capacitor Involved, linear 




OUT 



OUT 
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Fig. 8b. DAC-08 Equivalent Circuit. 



(stratght-line) variations in voltage resuit in 
logarithmic changes In frequency. Happily 
the human ear and brain respond log- 
arithmically to sound, and the result is sur- 
prisingly pleasant. 

Next RunlOO the program previously 
loaded. The light and motor may remain 
connected If desired. 

You should hear a realistic siren sourKl 
from the loudspeaker. 

Run200. For each number entered, a 
unique tone is heard. 

Next, enter and Run600: 

eOO OUT 127,137 
eiOA ^ RND(29e)-1 
B20 OUT 124, A 
630 GOTO 610 

You should hear a Jar>gled cacophony of 
tones, if the motor is connected, it will go 
t>ananas trying to follow the signal. The 
light will flash in disco style. 
Enter and Run700: 

TOO OUT 1 27,1 37<;LS 

710 A - RND(2Se)-1 

720 PRINT A; 

rx OLfT 124,A 

740 FOR M = 1 TO SftNEXT N 

750 GOTO 710 

Now the tones are distinct and separ- 
ated. Some of you may be reminded of the 
music of J. S. Bach. The duration of each 
rwte Is equal. 

To vary the duration of each note enter 
and RunSOO; 

800 OUT 127,137<;LS 

aiOA . RN0(29Q-t 

820 PRINT A; 

830OUT124,A 

S40B ' RND(1D0| + 10 

BSO FOR N = 1 TO BlNEXT N 

SeOQOTOSIO 

The tones heard are reminiscent of bag- 
pipes. You may want to experiment with 
additional program variations. For In- 
stance, a third random element may be In- 
troduced to control the number of times a 
note Is repeated. 

The Real Wortd la Ours 

We are now communicating with the 
physical world using our TRS-80 as sophis- 
ticated controllers. We have demonstrated 
by simple experiments the basic principles 
of controlling the real wofkJ, affecting the 
senses of sight, 80ur>d, and touch. 

Control Is still through the keyboard re- 
quiring human Intervention to change pro- 
gram effects. Next month we will explore 
the methods and applications of anaiog-to- 
digital conversion as a sophisticated re- 
sponse to the physical world and decision- 
making without human intervention. ■ 




#19 SOFTWARE 



ULTIMATE SOFTWARE PLAN 



We'll match any advertised price 
on any item that we carry. And if 
you find a lower price on what you 
bought within 30 days of buying 
it, just show us the ad and we'll 
refund the difference. 
It's that simple. 



Combine our price protection 
with the availability o1 full profes- 
sional support and our automatic 
update service and you have the 
Ultimate Software Plan 

It's a convenient, uncomplicated, 
logical way to get your software 



DISK WITH 
MANUAL 
ART1HCIAL INTELUQENCE 
MsdicallPAS-a) SS49/S40 

Dental :paS-31 Se49/I40 

ASrST DESKIN 

Prof Time Accoonling 1549yj40 
Geneial Subroutine S269/J40 
Application Urililies (439/140 
COMPLETE BUS SYSTEMS 
C(«alor t26g/t25 

Reporlsr tl60/S20 

Both >399/t45 

COMPUTER CONlnOL 
Fsbs(B-tree) S158/I20 

UltrsScI II S159/S25 

COMPUTER PATHWAYS 
Pearl Uewel 1) I 99/125 

Pearl Uev«l 2) S299/t4a 

Pearl (level 3) S&49/I5a 

DtarTAL RESEARCH 

CP/M 2 2 

NorthStar S149/S25 

TRS-80 Model 1 1 ( P + T)» 1 59/»3 5 



/ 



M iciODOl IS 

C'Ofn omco 

PL/l-eO 

BT-80 

Pvtac 

Sid , . 

Z-Sid 

Ten 

DeSDool 

D.M.A. 

A»com 

DMA-DOS 

CBS 

Formula 

GRAHAM-DORIAN 

General Ledger 

Acci Receivable 

Acct Payable 

Job Costir>g 

Payroll II 

Inventory II 

Payroll 

Invenloty 

Cash Register 

Aoartment Mgl 

Survey" riQ 

MedKrai 

Denial 
MICRO-AP 
5- Baste 
Selector IV 



i^Ga/%2b 
S189/S25 
(459/S3S 
S179/S30 
» 85/S15 
» 65/»15 
S 90/* 15 
S 90/115 
S 50/* 10 



1 149/* 15 
S 1 79/*35 
S36g/*45 
S539/*4 5 

S729/S40 
S729/t40 
S 729/* 40 
S729/J40 
S 729/140 
S729/*40 
a 493/140 
■493/140 
S493/S40 
3493/140 
S729/J40 
5 729/J40 
S729/S40 

S269/t25 
3469/(35 



MICRO DATA BASE SYSTEMS 

HOBS I269/J35 

MDBS t795/*40 

DRSof DRSorRTL »269/*10 
MDBS PKG *1295/*60 

MICROPRO 

WordStar »319/*60 

Customiiation Notes f 89/*na 
Uail-Merge 3109/t35 

WordSlar/Mail-Merge »419/*85 
DalaSlar «249/*60 

WordMasler >I19/I40 

SuperSortI 1199/140 

SoellStar SI75/140 



MANUAL 
ONLY 

i^ (New items or new prices] 

CP/M users soectly auk systems and formats Most formats available 

OROANK; SOFTWARE 

Te.tWriter III 

Date Book t! 

Milestone 

OSBORNE 

General Ledger 

Acct Hec/Acct Pay 

Payroll w/Cost 

All 3 

All 3 + CBASIC-2 
^ Enhanced Osborne 
^Wirn C Basic 

PEACHTREE* 
General L edgei 
Acct Receivable 
Acct Payable 
Payroll 
In van lory 
Surireyor 
Property Mgt 
CPA Client Write-up 
PS Version 

SOFTWARE WORKS 

Adapt(CDOStoCP/M) 
Rattoi 

SOHO GROUP 
Match Maker 

Worksheet 

STRUCTURED SYSTEMS 

GLorABorAPorPay 1599/140 

Inventory Control 1599/140 

Analyst 1199/125 

Letlorighl *179/125 

□Sort I 89/120 

^ NAD * B7/120 

SUPER SOFT 

Diagnostic I I 49/S20 

Diagnostic II * 84/*20 

Dish Doctor 1 84/120 

Forth (BO80 or Z80( 1149/t30 

Fortran 12ig.'S30 

Fortran */RaHor I28Q/S35 

Other less 10% 
TCS 

GLorARo'APorPay * 79/125 

All 4 I269/S99 

^Compiled each I 99/12S 
UNICORN 

Mince 1149/125 

SCTibbte *149/*25 

Both 1249/150 





OTHER QOODtES 




I111/J25 --Select 


1269 tna 


1269/J25 ^^orcaster 


ST99/tna 


1269/130 ^ Micro Plan 


1419/lna 


^ The Last One 


1549/tna 


* S9/J20 SupefCalc 


1269/* 50 


1 59/120 T,.™. 


11 89/* 30 

1149 '115 


*1?9J60 BSTMS 


SI 49/1 15 


1199/175 J r 


1 89*50 
J 229/150 


*349,175 caASlC.2 


* 98*20 


Mevada Cobol 


1129/125 


1399/140 MicroSiat 


1224/125 


1399/140 Vedit 


1106/115 


1399/140 MinMrMel 


1449/150 


1399'140 StatPak 


1449/140 


1399/140 Micro B* 


1229/120 


1399/140 Raid 


1224/135 


t799/*40 String/aO 


1 64/120 


1799/140 String/80 (source) 


12 79/1 na 


Add 1129 


SIS II 


1199/150 


Plan BO 


1269/130 


i 69/lna 
* 86/*na 






APPLE II 


1 Q7/»?0 INFO UNLIMITED 


1224 
1349 


MS Other 


less 15% 



MICROSOFT 

Sollcara lZ-80 CP/M) 1259 

Fortran 1179 

Cobot 1499 

MICROPRO 

Wordstar 1269 

MailMerge 1 99 

Wordstar/ Ma I IMerge 1349 

SupcfSofll 1159 

■Scellstar 1129 

PERSONAL SOFTWARE 



MKHOSOFT 




Basic-so 


S2B9/lna 


Base Compiler 


S 329/1 na 


Fortran-ao 


S349/*na 


Cobol-80 


S574/lna 


M-5on 


S124/*na 


Macro-BO 


S144/*na 


Edit-80 


1 84/*na 


Mu5<mp/MuMath 


1 224/1 na 


MuL'SP-SO 


Si74/lna 



WHITESMITHS 

C Compiler 

Pascal (Jncl C"l 

DATA BASE 

FMS-80 
^QBASi II 
Condor II 

•^ ACCHSS/80 

^ optimum 

PASCAL 

Pascal/ MT ' 
Pascal/Z 

Pascat/UCSD4 
Pascal /M 



16O0/130 
1850/145 

1649/145 
1595/150 
1899/150 
1699/150 

1749/150 



1429130 
1349/130 
1429/150 

11 89/* 20 



Visicalc 3 3 
CCA Data Mgr 

Desk top 'Plan II 

VisTterm 

VisiOei 

Visiplot 

Visitiend/Visiplot 

Zofk 

PEACHTREE' 

Deneral Ledger 
AccI Receivable 
Acci Payable 
Payroll 
Inventory 

OTHER GOODIES 

dBASE II 

VU »3R 
!use«/VisK:alc) 
^Context Connector 

:iise«/Visicalc; 
•^ Micro Courier 
^ TCS Apple 

(complete business) 
Supor-Teit II 
Data Factory 
□ B Master 
Charles Mann 
STC 



1159 
1 84 
1159 
1129 
1159 
1149 
(2?9 
1 34 



1224/140 
1224/*40 
1224/140 
1224/140 
1224/140 



1329/150 
1 79 

1129 

1219 

1259/199 
1127 
1134 
1184 

less 15% 
less 15% 



WORD PflOCESStNG' 

WordSearch 1179/150 

SpellGuard 1229/125 

VTS/BO 1259/165 

Magic Wand 1289/145 

SoeK Binder 1349/145 

ORDERS ONLY-CALL TOLL FREE VISA ■ MASTERCHARGE 
1-AO&454-2003 ext 823 • Calif. 1-600-522-1500 ext S23 

Overseas — add (10 plus addtlional postage ■ Add 12 50 postage and handling per each item ■ California 
residenis add 8% sales tax ■ Allow 2 *eeks on checks. C □ ok ■ Prices subiect to chanfle without riolice 
All ilems subject to availability • K' — MIgs Tra<lemark 

THE DISCOUNT SOFTWARE GROUP 

6520SelrTia Ave. Suite 309 ■ Los AngeJes. Ca 90028 ■ 1213) 668-7677 
tnt I TELEX 499-0032 BVHL Attn DiscSolt • USA TELEX 194-634 BVHL Attn DiscSolt • t^ **0 

TWX910-321-3597 BVHLAttn DiScSoft 
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nrn&V^fproSrSp^bvl^nice HansenlJ 



DVENTORE 



the 
systEm 



I BRAND NEW! 



Create your own adventures ti ^t look ^rj p^-^o,- e.-cti^ i u 

<» pT^T^fii .- it ( a urMciu* «Mp«r.ence n crertt'vtijl jncluiJeiJ in | ^le /\<Jveri- 

# A" (>Jvwitur« eJitoi- •tiicl' ollows ijou to design, debuq, r-ead and «T-ite 
ifou"" own odventuT^ c'«t3ti<X>4' 

# /\n adventure ariver (-Qr executing ^ovr adventure c^eotiont' 

# T*o ffll lefigtli adventure? "P^iner'c Aoveoture" and "D"'^!^^' 
/\dventure" 

9 )t\ 50+ page manual in a nandsome notebooK descibing t"e adventuf^ 
language a"J no* to u^e it, includes a free n'lni-adventut-e' 

# An nvitation to join trie adventurer'i uier group wflicfiw'll entitle ijOu to 
free progran- jpdate^, uier tp«. a tpecial discount on adventures, a user 
re»(letter. and special ^e-p getting the adventurei ijou *rite marlveted 

The Adventure System actually utilizes a unique 
lanfiuafie that permits you to Input criteria for build* 
infi an adventure same to your specifications. Vou 
are limited only by your imaalnationll Cballenfie. 
amaze and entertain your friends with your own ad- 
venture profiramsl Adventure characters can In- 
clude your family or friends; adventures can talte 
Place at home, worK« campus or your own clfyl 



I '^v Aoventurc O't'tPfr sells for 

,ust ^30 Q5 

please specif Model | or |!| 
Re^u.res I d-^ve and 48 K RAM 



For the cost of three adventures. 

TAS lets you create dozens {! 

In stock and ready to ship NOW. 






J. 



I ^ /\hr'-'uAr ,>Hi".r 1 ai«*«(S iKsriil<'V} lubii, •■■tiei to t"»ii 
tfut lK»v( aT"»fi ( a'tnt-f g—."^ a«>i| f »>•• pi^mn'i to tubiC'^'^ 

O^ lt»n y»fQT Martk i' _ iQOl »«*■ p»10" lub<t>-.t) ng/T»n«».iq | 
7^ i«v# p»T»od to I r\^ ana m#nt.on.r.q t*i.( *tfv*'^'t»f»*rtt. •■!' rvce^w* 
ofcfoiut**^ [™«. a f-roqrxitT. calini FtV* ' "" •'" f"*^ '^-< p»x>g'w" to ta 

1-t.^i, fm of buM ■^*. co»toi-n^ -v, .^-^ SwanniM • t^ 

t'O". it'l luT* to om^e i^&j for no^ji^ 0« #'4* PLf ^ '^-'^ fo*" *ti'e tT"^»^it 

Ma^i-5' iq6? T— i4fow-^i-,ofTAS--?i0oo FLV > 

rti»« You'll S*0| IjOW^Jf 4 ifOu »"i« llv.l on.* 



fName. 

Add^s 

Ct.. _ 

State, Zi 



The Alternate Source MONitor \ 



Overview; TASMON nan interactive/ 60rr,onitorandd,.- 
osssmbUr lAH versions ( orre complete B-itn tape and diil\ l'(^, o^^o alio* 
prograrrn to DC easi'4 converted from one medium to tKe ot'i«>' ^jouTtecode 
generated t>^ T AoMON ^fn be loaded bij all populai-editoT/assemD'er 
pi-ogramt I A oMC_)N featuf»i a corr.rranj to fuHi) r-elotate tie'r to 
an^ 'nemo'\j block \fOv ipecif^. 

Purpose: TU pu^x^e of TASMON -* to <.IU ttA dek^.ng 
tracing anJ !i"g!«-(tepp.ng of ^-OO oljjett code OP**^'*"' ^'"* ™ ™*" 
taken to maLie t^^e pT^gTv^m ea54 to ut« tH( beginning ^-oO pt^i-amme'^ 
I ASM(w)(\l *'" developed ai a result of itic autnoi-'( dittotitfoct'on 
* tK tKe «even monitorf ^lepurcKaied | AoMC^In ^os a ^5+ page user 
rr-ariual documenting eacti of iti features, and ncludet specia' uler (ettioni 
«fiit li document tne more complicated features 

"Other excellent disassemblers are ... The Alternate Source's 
TASflON. which provides symbob and (Nsk files. (The TASMON 
packatt Is a Powerful nxmttor. one of the best I've seen.)" 

William Bardcn. Jr. 



Command Summary: 



/X^C_II '"•••XjrxH dump 
UnKltnibWJ *xn(i 
Dl'««»mW» to p""!*' 
LAi"^ «"»•" to p^nte' 

Pind 1-4 COntKutiv* ^Irt 
jilip fo-^Ord or* .■rtt'-kKtia 
D't'l vp on* .nitrvd.oo 

Mov* olocl( Of ■•<»Wio1( 



Plus: 



D"«'k of'*' " »'rtutioni 



La*' tftt^ top* 

L«d /CMD M fu 
V-«^--f. /CMD dJ, f.U 
^-^., /CMDMf.i. 

Ditatif<b^ to dci. 
D-wti^-nWo to lap* 

SpI biTol(po"ti (0 tot"!) 

S'"q'» St»pp-"a (t-O mJi,l) 
1 ''iK-nq fl+ O (p««dl 



Disassembles with labeisl 

TASMON I tr-IIU^ 

TASMON I d^. 

TASMON llld,i. 

S29JS 



I 






D Ru^K me a TAS I M^- \ 



The Alternate Source 

1806 Ada street 

Lansing. MIchUan 48910 

517487-3358 

517-485-0344 ^^3% 



a Rutkmea TAS III di.kl 

D R-^-0 a TASMON tape: 

D Rus^ me a TASMON I d..U 

D Rus^ me a TASMON III di.ki 



Add ?200 for pcKkag^g o^^d pntd^ 

Add ?. SO I'o^ CpD .^P~*"i. 

AdJ 4% fo>- C)V>'^ fd-^ D'dr-! 
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MODEM 80 

Communications Package 



Abilities: 

9 I 'demote operation o\ a \ |^0-00 riodel I or 1 1 1 fr^m o termintil Of a 
second I l-^^-OO tnrougri a tB'Bpnone link -- f'l^ mtii^ be tvianst-er-r^d 
witri tne unattended computer 

# -(^i-roT- t"r«e file ti-ansfeTS -Jutli anot^iei- | |<^-00 ot a computer tliat 
can use the protocol of tke C^M' ri pr'ogr^m "PJoJem" wiiicii li *iclel4 
used on computer bulletin boards (and available on („1— '/rl user group 
d.sk number -25). 

9 j~ile transfer^ «itn mon^ otber tijpes of computers *it^i tbe | |<0-00 
dctmg as a terminal, | be program 'S set up for uSewitfi r1ici\)f\Ji^ | , 
tbe Source. |— orum OO's ana Similar systems, but tbe communication 
parameters, character set, and control cnaracters mci^ be redefined to 
opert:*te with rnianu otner coTiputer^, 



Advantages: 

9 I — lies of unl.mited length moL) be handled, even m a J^K, System. y</ 'tn 
tU "XMODEM/CMD- f.le transfer utiLt4. files man U tran.- 
ferred with a lOfC. Computer, 

9 1 — lies mai) be prepared off-line, talking advantage of ijour word proces- 
sng program, or tbe .ncluded program "o A V t'C^M VJ o'^OLild 
a first attempt at transmission fail, ijour file is still safeli) ao i^our disk ^j-* 
available for a second trij 

9 ' ransmit and receive f les maij be opened before communication begins, 
and mai) be turned on and off independently. |n a Specialised application, 
one file ma^ be transmitted *hile a different file 'S S'muitaneouslij being 
receved v_,ontrol codes maij be used to allow the remote computer to 
control tbe file operations 

9 f\ single line maij be sent from tlie file, allowing sending from tne file to 
be intermijied witn taping from tbe keyboard. | bis allows a more flenble 
respionie to prompts from the remote computer, af\0 permits transmitting 
data to a computer that cannot accept full speed transmission and does 
not use control codes to stort and stop tne file transmission. 

9 LJtJo commands and programs wbicb execute n tbe lower lOfC of 
memory maij be eiecuted while maintaining positions in tne transmit and 
receive files | he previous screen contents orre restored upon completion 
of tbe DOS command. 

MODEM 80 is compatible with AU. Popular opera- 
ting systems Including LOOS. Newdos/80 (even ver- 
sion 2.0). DOSPLUS. TR5D0S and ULTRADOS. 

MODEM 80 .^guir^S one disk Jr.ve and i^K 
MODEM 80 IS supplied on diskette witb full-SHe puncUd manual 

MODEM 6o costs ,ust ^59.95 

n 

D 



AT LAST !! 

CONCINNATOR 

I he wait 1! over, [ ]odel 1 1 1 people!! l^_,oncinnator opens the door to machn-ie 
language programming! (^^oncmnator is a patch to |^,adiO 0""^^ S Editor 
A\ssembler I 2 package - - patches it right up to work on ] t^yU I'd iijsteml 
I\|ot onli) tinat, but (^^oncmnotor makes numerous improvements to tbe pO'-X- 
age; just look: 

improvements: 

9 Y Ou can reserve memori) for machine language prcgrams ar^ci dump l''i> 
assembled code to this reserved area' fCeeps v^orr mntitor n memorn 
still intact so tnat ipu can return to it later! 

9 (,_oncinnator allows ijou to e«ecute the assembled code that 411., dun-ped 
into the reserved memory af^iv. \ nis means ijou can test i^our cotle f^d 

do 40ur debugging, etc. without tons of tape \'\ J. Vv ben, ar^a onli| wlier' 

40ur pr\;gram is complete - then ijou can save ijour source/ ob^ec t ( ode to 
tape! I oggle between assembled code and (.^oncmnator at wH' 

9 vyben it comes to tape \l\J), C_,oncinnator provides ifou with all of the 
ideal Opt'Ons: it honors the break kei^ so 40U can escape from unwante.l 
loads or saves, it features a verify option to ensure tbal uour t ode wat 
saved accurately, it also supports selectable baud rate (_500 or I 500 J' 

9 (^oncinnator is at 40ur command -- readij at anij time to : onvert disp'fL, 
and/or modify contents of memorij locations! 

9 t^^oncinnator keeps 40U informed of available m.emor^ bi) ront nua'lij a ; 
placing the number of bi^tes remaining m the te>t buffer' 

9 E-ter. at an^ time, BASIC'^ mon tor mode [SYS TE M p^mpt} 
for jumps to anij location in memory and/or to load 3> I O I t^ I I tapi's 

9 Enter, at anytime, BASIC'^ command mode (READY pr>-ri>t) 
to perform anij neeaea calculator functions 

9 t,^oncinnator even allows 40U to return to fullt( progi-ammable Lj/\o 
IL^, keeping C^onc.nnator intact and waiting, arid optional^, dumped 
machine programs and source code prxitected in h.gh memorij' 

The best news '^ tkat Concmnator provides ALL of t^iese opt O's, 
ana. takes awa4 less than AOO b4tes ["rcim. tbe original text buffer fw' t- '.o 
memory s .^sewed)ll InClUdCd Wlfll COnClnnatOf ^ '> P--1- " 
called SYSTPE *J^i^^ ^lUs 40U to combine EDTASM anj C ■" 
Cinnator into one ^ Y O I 1= \\ tape at higb speed, for easij use fl mlrO 
bonus program. CPYALL, "lows 40U to ts:,^^ tack oLie^ t ro^e 
produced bi| (^^oncinnator, and resave it as a co.ntinuous yraxyi^r ti ar ■■e,'- 
mentedj bigh speed tape' 

And ifs Justs 19.9511 

Conclnnator requires Radio Shacit's EOTASM 1 .2 
(Condnnator does NOT support disit 1/0. sorry) 







Rush me a Modem 80 | d sM 


The AKemate Source 


Rus^ me a Modem 80 | 1 1 d.sk! 


1806 Ma street 




UnslM. MIcMflan 48910 


I^^usb me a {,_,oncinnator tape! 


5I7-487-33S8 
517-485^44 



Add$'5oforCOD.^.p™"t. 

Add 4% fo- charge Cil-d orde-s 



tjut theif (ir*n t a '•(141 g v.ng i>vo\^ f'"** prO(^TV>n"i ttn uO*C r. be T>4 ^u^t '"0« H 

C^dtk." BefQ™Ma.xO'J08;e«d,pe.^ont.U(r,bV™™«n„t..r-a J 

1^ lilve perod to TAS, "--d insntion ng th 5 advp"tnc"Te"t, •>' ■f.e- .* \ 

ablQ'utrlij \-rrr, a piijgTvim colled FLT» You *. I f."(> t*. i pfrigrt- ■- t; bf I 

1 1.™!^ full of butt -tet cont., - .q ™ *^™^ SwanniM » t^ ^ j 

It K avoiloble onl4 thresh Iki i and (."-.'ar advert.iemcnti, offer good .nl.l 

Mflrd,5MQ82 T-«it4 four .isu« of TAS <"v $-30 00 fVi. 
fr« Yo^'.i swat .o"--if if ^"" -« t^' --I 




•So9 List of Aavfftisers on page 402 
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APPLICATION 



An assembly time-cost analysis program with heart. 



The Pacemaker 



David Tin is 
National Controls Inc. 
4500 John Young Pkwy. 
Orlando, FL 32804 



A modern piece of electronic equip- 
ment consists of a multitude of parts. 
In fact, a printed circuit board assembly 
may include hundreds of resistors. 
capacitors, transistors, diodes and in- 
tegrated circuits. Have you ever wondered 
how a finished assembly was created from 
a pile of parts? 

It should be immediately obvious a 
worker does not sit down with all the com- 
ponents lo build the finished product. In- 
stead, assembly lines are created in which 
the product has parts added to it until a 
completed unit is produced. 

Pacing a Line 

This brings us to the concept of a 
"paced" assembly line. Imagine an 
assembly line consisting of four work- 
stations whose purpose is to build a 
printed circuit assembly. A bare board 
enters the first station and has parts 
mounted on it. Then it's passed to the next 
three for additional parts, until the final 
assembly emerges at the last station. All 
seems to be working well. But suppose it 
takes the first station five minutes to com- 
plete the required task, the second three 
minutes, the third eight and the fourth 
four. Some workers will be sitting for long 
Stretches with nothing to do while others 
must work feverishly to keep up. 

Looking at the total time of our 
hypothetical four-station line, we find it 
should take 20 minutes of assembly time 
to build a single unit. But is that true? 

Even though station two can finish its 
job in three minutes, it must wait two more 
minutes for the next piece from station 
one. Station three in turn requires eight 
minutes for its task. A backlog starts to 
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build as the two faster stations pass on 
more boards than it can handle. Station 
four, like station two, is limited by its 
preceding station. It can finish a job in four 
minutes, but must wait four more minutes 
for station three to finish. 

This results in an assembly time of 26 
minutes instead of 20 minutes and an effi- 
ciency of only 78 percent. The solution is 
to redistribute the work among the work- 
stations so each will take equal time. 

An actual production line will have these 
problems multiplied manyfold. How do you 
set up an efficient assembly line from 
scratch? 

You could go on past experience or a 
"gut feeling" and later adjust the line as re- 
quired. But this wastes time and man- 
power resources. Good practice dictates 
establishing standard times for every 
operation. Then, by adding all the standard 
times, a total lime for the finished 
assembly can be established. 

Working backward, you can divide the 
total time by the number of work stations 
to arrive at a time per work station. Know- 
ing this, you can return to the per compo- 
nent standard times to determine what 
combinations of parts should be assigned 
to each work station. This step is usually 
the most difficult one, involving the 
manipulation of lots of numbers, and can 
turn into a major job when applied to an 
assembly with a large number of parts. 

The Computer Steps In 

Here is where an assembly time/cost 
analysis program is useful. Such a pro- 
gram allows the engineer to easily rear- 
range work station compositions until a 
balanced condition is achieved. 

Assembly Time/Cost Analysis allows a 
person to create a paced assembly line 
with a minimum of aggravation. Through a 
master menu, the user can create new files 
or load saved files containing assembly/ 
work station data. Parts can be changed, 
added, deleted or moved from one station 



to another. Station composition can be 
viewed either for a single station or all sta- 
tions sequentially. Each station may con- 
tain up to 20 discrete components, and the 
number of stations is limited only by your 
computer's memory size Finally, cost per 
work station can be automatically com- 
puted, a necessary detail for a profit mak- 
ing business. 

Glossary 

The program is essentially self-prompt- 
ing; however, a glossary of terms used as 
they are encountered in the program is in- 
cluded for maximum understanding. 

• Performance Factor-This is an adjust- 
ment number used for uncontrollable 
variables ^fatigue, housekeeping, per- 
sonal needs, etc. It is generally between 
one and two although it could be higher for 
really inefficient operations. 

To illustrate, it may take 0.5 minutes to 
bend the leads on a resistor, insert it in a 
printed circuit board, solder it and clip the 
leads. Based on this standard time you 
might expect 120 resistors an hour to be 
handled. But try doing it yourself some- 
time; before long you get tired and bored. 
You stretch, go get a drink, go to the 
bathroom, talk to a fellow worker, etc. At 
the end of an hour you may have done only 
100 resistors. To allow for this, an adjust- 
ment is made to the standard time. 

• Raw Minutes-Thls is the ideal time to 
perform the required operations for a 
single part- When displayed in the station 
breakdown, this will be multiplied by the 
quantity of the particular part. 

• Factored Minutes-This is the adjusted 
allowable time for installation of a line 
item. This number represents Raw 
Minutes times Quantity times Perfor- 
mance Factor. 

• Factored Hours-The adjusted allow- 
able time for a line item converted to hours 
or fractions of hours. 

• Direct Labor Hourly Rate-The average 
hourly wage paid to a direct labor 



"Have you ever wondered 

how a finished assembly was created 

from a pile of parts?" 



worker— those individuals who actually 
build the product. 

• Overhead Percentage-A factor used 
to add In the cost of doing business other 
than raw materials and direct labor. This 
Includes rental of facilities, maintenance, 
management salaries, office workers, 
utilities, etc. It even extends to the cost of 
the company's softball team, company 
picnic and greens fees for the golf league. 
Anything that costs money adds to the ex- 
pense of operation and Is included In 
overhead. 

Initial entry Into the program results In a 
two choice mini-menu. A new file can be 
created or an old one recalled. Entering a 
new file entails Inserting file name, per- 
formance factor and number of assembly 
tine stations information. If you are unsure 
about the actual number of stations 
needed, it causes no harm to specify some 
extras and then leave them blank. The ar- 
ray scanner used by various parts of the 
program detects these empty stations and 
notifies you of their availability. When 
reading in an old file you don't get in- 
itialization prompts since the required 
data is stored as part of the file. 

Both selections eventually get you to 
the Main Menu. This gives you 10 com- 
mands plus an exit from the program: 

• Totals By Station-Use this command to 
view a work station component breakdown. 
Either a single station or all stations in se- 
quence can be viewed. Output can be either 
video or printer. 

• Factored Hours By Station-This is a 
summary of all stations, used as a quick 
check to see how well the line balancing is 
proceeding. Output can be to either video 
or printer. 

• Reassign Parts-Parts can be moved 
from one station to another. Requests for 
movement to or from nonexistent stations 
or to full stations are trapped and rejected. 

• Enter Additional Parts-This is a two- 
part routine. Parts can be added to an ex- 
isting station if it Is not full or an empty 
station can be assigned a parts group. The 
parts entry portion requires a yes/no after 
each part Is entered. The station entry por- 
tion uses the "easy entry" mode first used 
when creating a new file. 

• Delete Parts~As the command states, 
you tell it what Item at what station to 
delete and it does. First, however, it 
displays the item and part numbers and 
asks for confirmation to delete it. 

• Assembly Costs-The Direct Labor 
Hourly Rate and Overhead Percentage are 



entered and a cost per station and total 
cost are calculated. Output can be video or 
printer. 

• Save Current File-Saves the work sta- 
tion file on disk. 

• Restart- Provides a clean way to finish 
operations on one file and start on a dif- 
ferent one. 

• Change Performance Factor-Allows 
Instant changes to be made to the fac- 
tored calculations. 

• Edit Current File-Single line Items can 
be changed. A small menu allows selec- 
tion of specifications to change. 

Line List 

I tried to write the program in a modular 
fashion so it could be modified or ex- 
panded as the need arose. With that in 
mind, I've provided a line number list: 
• Lines 10-90: Initialization. The user 
has the option of opening a new file or 



retrieving an old one. 

• Lines 100-110: Main menu. 

• Lines 990-1999: Work station com- 
position breakdown by single station or 
all stations. 

• Lines 2000-2999: Factored hours per 
work station and total for ail stations. 

• Lines 3000-3999: Parts transfer from 
one station to another. 

• Lines 4000-4999: Addition of parts to 
a station. 

• Lines 5000-5999; Deletion of parts 
from a station. 

• Lines 6000-6999: Cost analysis by 
work station and total for all stations. 

• Lines 7000-7999: Menu driven editor. 

• Lines 8000-8999: Saves the current 
file to disk. 

• Lines 9000-9999: Loads a requested 
file from disk. 

• Lines 10000-14040: Various sub- 
routines. ■ 



Program Listing 



la CLSiCLEAItlSI8:PS-'tt.tl(tI':C$'-$5tt(.tf 

15 PRINT CHRS(23) :PRINT?128, "ASSEMBLY TIME/COST ANALYSIS" iFORX-l 
T03BB:NEXT 

16 PRINTe262,"{l) CREATE NEW FILE" 

17 PRINT?326,"[2) LOAD EXISTING FILE" 

18 PRINT?39B,"";!lNPUT A 

19 IF A<1 OR A>2 THEN 16 ELSE IF A-2 THEN 9080 

20 INPUT "ASSEMBLY {FILEl NAME ";FS 
25 INPUT"PERFOSKANCE FACTOR "jPF 

30 INPUT "NUMBER OF WORKSTATIONS "jNS 
40 G05UB 14808 
SB JO»B:FORX"1TONS 

55 CL5!S-1:PRINT"STATI0N NUMBER ! " ;Xi PRINT'ENTRY IN ITEM FIELD: 
't' ENDS STATION ENTRY, '/' ENDS ALL ENTRY* 

68 PHINTg25, "PARTS THIS STATION ; " ; S; : PRINTgl92, " ITEM NUKBER i 
"; !PRINTI320,"PART NUMBER : 
'ijPRINTe448, "QUANTITY : ■ j : PRINTg576 , "RAH MINUTES FOR S 

INGLE ITEM : *; 

70 PRINTe2B5,"::INPUT XS; IFXS'" g"THEN98ELSEIF)(S""/"THENie8ELSE 
1N(X,S)-VAL(XS) :PRINTf333,"'!:INPUTPNS(X,S) ; PRINTe4 58 ,"";: INPUT 
QT(X,S) !PRINTe606,""!:lNPUTRM(X,S) 
75 PS(X)-S 

88 RM(X,S)"RM(X,S)*OT(X,S) !FH(X,Sl''RH(X,S)*PF!FH*[>;,S)":FMlX,S)/6 
8:S-S+1:1FS>20THENCLS:PRINT"NO FURTHER ITEMS ALLOWED FOR THIS ST 
ATION";:FORA-lTO5a0:NEXTA;CLS:GOTO9eELSEGOTO6e 
90 IFJO-lTHEN417aELSENEXTX 

180 CLSiPRINTTABdS) .-"ENTER OPTION DESIRED" :PRINTTAB( 15) ;" 1 1) TO 
TALS BY STATI0N":PRINTTAB(I5) ;"12) FACTORED HOURS BY ETATION":PR 
INTTAB{151 j"(3) REASSIGN PARTS" :PRINTTAB1 15) ; " ( 4) ENTER ADDITION 
AL PARTS"!PRINTTAB[15) ;"I5) DELETE PARTS' 

105 PRINTTAB(151 !"(6) ASSEMBLY COSTS' ! PRINTTAB(15) ;" (7) SAVE CUR 
RENT FILE":PBINTTAB{15) ;"18) RESTART" : PRINTTABl 15) ;' 1 91 CHANGE P 
ERFORMANCE FACTOR" : PRINTTAB( 15] ;"[ 10) EDIT CURRENT FILE" sPRINTTA 
B(:5) !"(11) END J0B';PRINTTAB!15) ;'";! INPUT O 

110 If 0<1 OR 0>11 THEN 108 ELSE ON GOTO 998,2008,3880,4000,58 
08,6888,8880,10,13600,7000,10000 

990 CL£:INPUT"(1) ALL STATIONS OR (21 SINGLE STATION ";A:IF A<1 
OR A>2 THEN 998 

1000 OS-0!lHFUT*lE) SCREEN OR (PI PRINTER ' ; AS; IFAS="P"THEN0S=1 : 
GOSUB13B08 

1081 IF A'2 AND OE-8 INPUT"WHICH STATION " j X !GOSUB101a :GOT01999 
1002 IF A»2 AND OS-1 INPUT"WHICH STATION " jX:GOSUB1070 :GOTOI999 
1B83 IF A=l AND OS=0 GOTO 1005 

1804 IF A«l AND OS-1 GOTO 1060 

1805 FOR X=lTONS:CLSiGOSUBlB18:NEXTX:GOT01999 
1810 S-l:TFt (XI -0:CLS 

1020 PRINT'STATION NUMBER: "jXjPRINT'ITEM I PART I QUAN. 

RAW MIN, FACT. KIN, FACT. HRS.":PRINT 
1038 IFS>20THEN18 50ELSEIFIN{X,S)=B THEN105BELSEPRINTTflB| 2) ;IN(X, 
S) i:PRINTTAB[9) ;PNS(X,S) ; : PRINTTAB( 231 ;QT(X,S1 ; : PRINTTAB [31) j""; 
jPRINTUSIHG PS;RM1X,S1 ; ! PRINTTAB( 42) ; "" j ! PRINTUSING PS;FM(X,S1 ;: 
PRINTTAB[53) ;" t : FHt [X ,S) =FM (X ,S)/60 : PRINTUSING PS;fHI(X,S) 
1835 TFt (X)-TFt (X)+F]lt(X,SI 
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^.■jP TlAlf^ i.^N -^1 



'■"■"'HO't Oi^^Li;. 

•^KIMflTtr ;:Hi.r ....ji:,-t,(--iy. uTr 

>;i"PL= Oij; ^-.tHTEME'JTi. i.L.(.'-i_i;, Mri-;...t- 

I'J'iLUC'ES '"LnT::NG i.it rhDI I.- &**«■ -jft^PHj, 

TO GET YOURS. 
SEND CHECK OR MONEY ORDER TO 

P.M.W. ^S9s 

7741 ALABAMA AVE. 08 
CANOGA PARK. CA. 91304 

Wa ship same day on monay orders. 

4-6 weeks lor checks 

no COD'S or charge cards 

'THS-80 is a trademark ol the Radio Shack Div. ol 

Tandy Corp. 

"Foreign residents add St SO postage and handlirtg 



EPSON Printers 



MX-80 
MX*80ft 
MX- 70 



MX'lOO 



"o^ 



""'c, 



We have accessories 



■fj 



C.ITOH Starwriter Printers 



25cps Parallel $1425 
45cps Parallel $1770 



OKIDATA Printers 



MicrolineSO S410 



DIABLO Printers 



630 RO 



SI 990 



UDS 
LEXICON 



MODEM 1D3LP $169 
MODEM LEX-11 $125 



Scotch 3M Diskettes 
8" SSSD 10/$2.79 50/S2.69 
5 1/4" SSSD 10/$2.69 50/$2.59 



APPLE SOFTWARE PGM'S 15% OFF 
VISICALC $159 

SOFTCARD S296 

BASIC ■ 80 CP/M S297 

BASIC COMPILER CP/M S335 

Wriie or call for Miditionsl pfogrami. 



isir lor fts* tilting 



P.O. Box 305 ^323 
Massapequa, N.Y. 1175S 

(516) 798-7448 

FOB Shipping Painl NVS Rti Add S*ln T» 
•rmi M 0.. C*rt. Chacki. Allow 2 whM for P««>nil Oiki 

PRICES SUBJECT TO CHANGE 
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194B IFS«1BTHENPBINT:IKPUT"PRESS <EHTER> FOR HORE' j AS:CLS: S.S*l! 

CO'nDie2e:ELSES-S+l;GOTOie3e 

IBSB PSIKT:PR1NTT*B(16) j'TOTAL FACTORED HOURS FOB STATION' :J(; " i 

■j :PR1NTUS1NG PS;Tr* (X) : PRINT: INPUT'PRESS <ENTEF> TO CONTINUE'tA 

S: RETURN 

1060 LPFINT CHBS(14) siLPBINTTABIlfl) j'ASSEnBLVj'iFSiLPRINTsLPBIKT 

TAB(ia) i'PERFORHAIJCE FACTOB: * ; PF:LPR1NT CHRS(lll:FOH X-1T0NS:G0S 

UBIB1B:NEXTX!GOT01999 

leee lprikt-itek i part i qoan. raw nis, pact. hik. 

FACT. HRS.'iLFRIKT CHRS(13) 

1t9S IF5)2BTI1ENlllBELSEIFlN|X,S)>«THENlllBELSEt.7RIHTTAB(2})IN(X, 

S);;LPBINTTAB(9) |PNS[X,S) ; i LPRINTTAB{ 231 ;OT(X,S) ; : LPB1NTTAB[ 31) | 

"(iLPHIKTOSlNG PSj R«(X ,S) | jLPRIHTTABI 42) i *" j : LPRINTUSING PS;Ft(( 

X.S) iii.PBIMTTAB(53) i " i :FHt (X,S) -FM[X,S) /fiC ■ LPRIHTUSIHG PSlFH#(K 

.S 

IIBB TFI [X)-TFHX)+FHI[X,S) : S-S+l!G0TOlfl9B 

lllB LPRINT CKRS(13) iI.PRIMTTAB[16) i'TOTAI. FACTORED HOURS FOR STA 

TION'iXi": ■j:LPRINTUSINC PSf TFI (X) : FOHZ-ITOZ: LPRINT CHRS(13):NE 

xrz : RETURN 

1999 GOTOIBB 

2aBB 0S-4:A£(-B;CLS:IHPL'T*(SI SCREEN OB IP) PRINTER *iAS:IFAS-*P 

'THEN OS-liGOSUBllBBB 

2010 HDS-'STATION NUHBER FACTORED HOURS*-,IF OS-1 THEN L 

PRINT 'FACTORED HOURS BY STATION* iLPRINTlLPRINT HDS ELSE CLS:PBIH 

T HDS 

2B2B FOR X-ITONS 

2030 S-l:TFt|X)-e 

2040 IFS>20THEH:BS0ELSeiF IH(X,S) -BTHEH 20S0 ELSE TFt (X) ■TFI {X) * 

FHt(X,S) !S-S+1:GOTO2040 

20Sa ASI-ASt+TFt (X} ilF OS-1 THEN LPRINTTAB(6) ;X; : LPRINTTAB(27) ( ' 

") sLPBIKTUSING PSsTFKX) ELSE PRI(rrTAB(6) jX( : PRI1JTTAB(27) j '" j : PR 

IHTUSING PSjTFUX) 

2055 IF OS-9 AND X/1O-INT(X/10) THEN INPUT'PRESS <ENTEB> TO CONT 

1NIIE';AS:CLS:PR1IJT HDS 

2060 NEXT X 

2B70 H2S-"T0TAL FACTORED HOURS FOB ALL STATIONS: ■ : IF OS-1 THEN 

LPRINT H2Sj:LPRINTUSING PS; ASI : LPRINT: LPBINTr ELSE PRINT H2S;:PR 

IHTUSING PSjASi 

2998 INPUT'PRESS <ENTER) TO CONTINUE'iAS 

2999 GOTO10B 

30BB IFNS-ITHENPRINT'ONLY ONE STATION. UNABLE TO TRANSFER PARTS. 

■:GOTOJ99BELSECLS:INPUT'RE«OVE PART FROM WHICH STATION '|RS:IFRS 

<1 OR RS>NS THEN3BB0 

3010 PRINTgl2a,") :INPUT"ADD PART TO WHICH STATION ■iDStlFDS<l 

R □S>NS OR DS-RS THEN3B10 

302B EMPUT'EKTER ITEH NUMBER " j PA 

303B S-1 

3040 IF IN(RS,S)-PA THEN3060ELSEIF IN(RS,S)'B OB S'2e rHEH30SBEL 

SE S-Stl:G0TO3a4B 

3B5B PRINT'ITQI "(PA)' SOT FOUND. ' :GOT03998 

3a6B PRINT'ITEW *)IN(fiS,S)j' PART NUMBER 'jPnSCRS.S) 

3B7B INPUT-IS THIS THE ITEM TO BE MOVED lY/N) ' t ASrlFASO'Y-THEN 

3BS0 D-1 

3090 I FD > 2 BPHI NT 'DESTINATION STATION FULL. " iGOT03998 

3I0B IF 1N(DS,D) OBTHBH D-D»l :GOTO3B90 

31 IB I«IDS,D)-1N(RS,S):PHS(DS,D)«P(JS(BS,S) :0T{DS,D1 -QTfBS.S) :RN( 

3113 PS(DS;-D:FSIRS)-PS(RS)-1 

DS,D).Rn(Ra,S) jFHiDS,D).pn[RS,SliPlI*(0S,D)-PHI(RS,3) 

311S GOSUB312B:GOT0399B 

312B GOSUB1370B:IFS-2BTMEH3150 

313B IN(RS,S)-IH(BS,S»1) . PNS{BS,S) -PH5(RS,S*1) :OT{RS,S) -aT(BS,St 

1) lRMIRS,S)»R/1[BS,Stl) iFM[HS,S)-FM(RS,S-tl} i PHI (BS.S) -FHI (RS,5+1) 

314B S-S+liIFS-2BTHEN31SBELGE313B 

315B lH(RS,S)-aiPNSlRS,S)-' " iQT(RS,S) -Bi RH (RS.S) -BiFM(BS,S) -BiF 

H*[RS,S)-9:RETUBN 

399B COSUB11B00 

3999 GOTO100 

40BB CLStlNPUT'd) ADD PARTS OR (2) ADD STATION'jA 

4001 IF A<1 OR A>2 TNEN4BBBELSEIF A-2 THEN410B 

4082 INPUT'ADD TO WHICH STATION *)DS 

4»»i IP DS<I OB DS>NS THEN 4B0B 

4010 D-1 

4BZB IF 1N(DS,D)-B THEK4B3BELSEIF D-2fl THENPRIMT'STATION FULL':G 

OTO40EB:ELSE D'D4l :COT04B2B 

4B30 CLSiPRINT'STATIOH NUMBER :" ;DSi : PRINTS2S, 'PARTS THIS STATIO 

« :'lD:PRINT:INPUT'ITEM NUMBER : 'j IN(DS,D) ■ PRIMTj INPUT'PART NUM 

BER : 'jPHSIDS.D) :PRIHT:INPUT'QUANTITy i ' iOT{DS,D) : PRINT: INPUT' 

RAW MINUTES ! *|BH1DS,D) 

404B RMlDS,D)-RH(DS,D)'OT([>S,D}:FM(DS,D]-RMIDS,D)*PF:FKt(DS,D)-F 

N(DS,D|/6B 

4045 PS(t>S)-D 

40SB PRIHTiD-[>*liIFD>2BTHENPRlHT*THIS STATION HOW FULL" !COT04B6B 

sELSE IHPOT'ADD ANOTHER PART TO THIS STATION ( Y/N) * jAS i IFAS-'ICT 

HEN CLS:GOT04B3B 

40GB INPUT'ADD PARTS TO ANOTHER STATION (Y/N) ' i AS: IFAS-"Y'THEH4B 

0BELSE4999 

410B tS-BiG0SUB13SBB:PRlNT'AVAILABLE EMPTY STATIONS:*] 

41 IB FORX-lTONS:IFPS(X)-BPRINT'-*iXitiS-l 

412B NEXTX 

413B IPZS-BTHENPRINT' HONE' i : PRIHT:GOSUB11B0B:GOTO4999: ELSEPRim 

4150 INPUT'STATTOH NUMBER TO BE ADDED'iA 

4160 IF Ad OH A>NSTKENPRINT'TBAT STATION IS UNDEFINED' !GOTO41B0 

:ELSE1FPS(A)<>0THE((PR1NT"TKAT STATION IS ALREADY IN USE'iGOT0415 

0ELSEX-A;JO-llGOTO55 

4170 CLSilNPUT'ANYTHING ELSE TO ADD ( Y/N) *; AS:IFAS-'Y-THEN40BSEL 

SEIBB 

4999 GOTOIBB 

50BB CLS:INPUT'DeLETE FROM WHICH STATION *)RS 

S00S IFRS<1 OR RS^HS THEN SBBB 

SBIB PRINT: INPUT'DELETE ITEM NUMBER *lPA 

5B2B S-1 

5030 IP IN(RS,S)'PA THEHS05BELSEIF IN(RS,5)-0 OR S-20 THEN3040EL 

SE S-S''1:G0T0SB]B 

S040 PRIKT'ITOl *|PAj* HOT FOUND. ■:GOTO50BB 

SB50 PBINT'ITEM 'iIN(RS,Sli* PART NUMBER 'jPNStRS.S) 

5060 IHPUT'IS THIS THE ITEM TO BE DELETED I Y/N) * lAS: IFASO'Y'THE 

N5BB0 

5070 GOSUB 312B 

S075 PS(RS)-PS{RS)-1 

SBSB INPUT'DELETE ANOTHER PART FROM THIS STATION (Y/N) ' l AS: IFAS" 

'y'T«ENCLS:GOT05BlB 

5998 INPUT'DELETE A PART FROM ANOTHER STATION I Y/B) ■ jASi IFAS-'V" 

THENSBBB 
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PLUS 




Model II 64K $3300 



Pcrraao u a i_j ljO), 
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Pocket Computer $ 1 89 
P. C. Printer $130 
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or Computer 4K $ 
1 6K Ext. Basic $4£ 


310 
>9 




32K Exp. Int. $334 




Model IIM6K 
2 DR + RS232C 



$839 
$2100 



Mf^f%^ ^^^^ ^^^ 1"'^ 3 ^w o^ oui* ^1"® offers . . . 



call toll-free for full Information. 



COMPUTERS 




PERIPHERALS 




Microline62A 


515 


Model M 64K 


$3300 


Expansion Interface OK 


S249 


Microline83A 


799 


Model III 4K LEV 1 


599 


Expansion Interface 16K 


355.50 


Pocket Computer Printer 


130 


MODEL III 16K 


639 


'Expansion Interface 16K 


291.50 


DISK DRIVES 




MODEL III 32K 


945.50 


Expansion Interface 32K 


462 


R.S. Model til 1ST-Drive 


712 


'MODEL III 32K 


881.50 


'Expansion Interface 32K 


334 


TEAC40TrackMI 


329 


MODEL III 4aK 


1052 


16KRAMN.E.C.200N.S.ctii 


3S 25 


R.S. 1 Drive Exp Mil 


999 


-MODEL 111 48K 


924 


MODEMS 




R5. 2 Drive Exp Mil 


1518 


Model III 4aK 




Lynx Direct Connect Ml/Mil 


269 


RS. 3 Drive Exp Mil 


2040 


2 Disc ft RS232 c 


2100 


Auto Ans. /Dial 




SelmansS'MII 


/W 


Color Computer 4K 


310 


Teleptione Interface II 


169 


Atari 810 Disk 


499 


Color Computer 16K 


416.50 


R.S. Modem t D.C 


130 


SOFTWARE 




'Color Computer 16K 


352.50 


Atari 830 Modem 


159 


R.S.Softvifare10%ottllst 




Color Computer 16K 




Atari 850 Interface 


183 


Atari Software 10% off list 




w/extended basic 


459 


PRINTERS 




Newdos + (40) track Ml 


88 


Pocket Computer 


189 


Daisy Wheel II 


1695 


Newdos 80 Mtit 


149 


VIDEOTEX 


310 


Line Printer VI 


999 


ST80III 


149 


APPLE 48K only 


1279 


Epson MX80 


499 


ETC. 




ATARI 800 32K 


789 


Epson MX80 FT 


599 


Verbatum 5" Double Density 


32 






Epson MX100 


799 


Verbatum 8" Data Life 


49.95 






Line Printer VII 


315 


Ctr-80A recorder 


57 


'Computer Plus New Equipment. 
180 Day Extended Warranty 


Line Printer V 


1610 


C C Joysticks 


22 


Bl lie ■•'A^l K«#»h 


r_iii« lAf 


Microllne80 


345 







Factory warrantees on Apple and Atari equipment. Other 
equipment carries manufacturer's warranty or Computer 
Pius 160 day extended warranty. Combined warrantees 
carry Computer Plus ISO day warranty or original manu- 
facturer's warranty. 



call TOLL FREE 1-800-34S-8124 



com 



DEALER INQUIRIES ARE INVITED 

Price* tub|ect to char>ge wtlhout notice. 
Not responsible for typographical errors. 

TM-AQ Is a f*glst*f*d trodttmork of Tondy Corp. 




Depl. D 

245A Great Rood 

Uttleton, MA 01460 

617-486-3193 



Write for your 
free catalog 



.'See List of Adveilisers on page 402 
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REAL ESTATE SOFTWARE 



l.ir ^PHLt 1 HSMI ■ I'LT 



• PHOPEHTV NiANAGtMENT SYSTEM: »32S 

• Tiaint HniHT • IhrMttliir Fait 

• Lilt knl Htpwl • taiWing MM'tl 

• Vuincy R<po(1 • Uiiintt Hfpci 

• iKHiia NifHI • Tii E^aau IWirl 
■ Alio lali Oimit < 

• *>lvrnt« CkKtl • I 

• PHOPKHTY LISTINCSTOMPARABI.ES: I32S 

SCREBt IT^-*- • HU/HUn hid 

• ;; Nwi/liiUiif • liai fiid/IHHint 

• IMt iHtol/Diik ■ Mti fna/S^ F«i 

• UtHt MUM FMM • IMa ChMw 

• REAk ESTATE ANALYSIS MODULES: MO. M odiilr 

• Hhii furcMM • Tu tMmti bttaiim 

• IKoa* Rl* ftntiiM • IfH Lho Aiuhiui 

• rttftnt sua • LiM AnNtUfiUan 

• CMitriKMi Ua/fnUi • OwKuiwi fnHfiii 

. WORD PROCESSOR MACIC WAND: 12*5 



U Ommlf Slint EnnoMit 



Ca AhMMi hM »% SHI T 



SuiltF Dim M I1it-«in SRiel uiriMni^ eiicn C* 9a?U 



•LACK JACK PLAYERS 

A YEARS INCOMi IN 4 MONTHS. 

loiic Strot»fly TultMi, lof ih* oovir* • aiipwi olik*. 
lit* OUT TuKKi ( qukkly iMtn how lo bwom* A WINNER. 
Earn »40 Sour. L«nn th» lacrali ot our luccaii. Oui Tutori 

will t»och you how to: 

•■ tCT YOUR MONIV •• 

" PIAT EACH HAND '• 

■* NOTOfTRARtED" 

"•f ARUSimU" 

"••MWARI"" 

Our Tulort ac« not gomai!!! Thvy cif* iifiou* tooli lo 
mok« winiwn out ol you. Ih« outhort hov« ip«nl 7 yooci 
ptaytng 1 b«>no winnax. Now •□ con you. with Iha o<d 
ol OUI lulori. Our Tu'ori oia boiad of th« ilralagloi 
d>v*lo^*d by Lawranc* Raviia. Mora advantad itralagioi 
or* Qvailobl* call lor inlo. Coniulfotion ii avoMotila 
tor you by mall or phona From 12pm Horn M.S.T 

PKG. I contain* 10 toili Tutori tor Attontit Cify. or N*v*da 
Ruth S» loc 16K Mod I or Mod III. can tX) lor 3m ditk 
fimatu odd 13.00 (or ihipplng. 

MICRO HAJAK SYSTEMS INC. 
ItOO NORTH ELLEN STREET 
FLAGSTAFF, ARIZONA M001 
(Ma) 77i-S723 or (M») 774-7UI 



EDUCATIONAL 
SOFTWARE 

Pof TRSaO" Color Computer. PET, Apple II. 



ELEMENTARY 

SCIENCE 

GEOGRAPHY 

ECONOMICS 

rOREIGN LANG. 

GRAMMAR 



MATH 
HISTORY 
ACCOUNTING 
BUSINESS ED. 
FARM RECORDS 
COIN INVENTORY 



Write for FREE Caialogue. 
MICRO LEARNINGWARE ^»<. 

BOX 2 I 34. N. MANKATO MN S600I 
507-62 S-220S 



VISA ft. MASTER CHARGE ACCEPTED 

'\r-l<-t I "> ■ 'Oi(.<.ry :or (dutrflion,! 

Apple ij d (rademark of Apple Computer Co. 
TRVM t% A icsbtefMl tT«dcnuu1i ol TANDY CORP. 
Pet h ■ tradrm^rti at Commodore tia. Machkio. 
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Ptogiam conunueO 



5999 GOTO IBfl 
6Blie CLS 

eeSl INPUT-ENTER DIRECT LABOR HOURLY RATE';DL 
601B INPUT'ENTER OVERKEAD PERCENTAGE' lOHiOH-OH/lBB 

6015 os-e 

G02B INPUT"(S) SCREEN OH (P) PRINTER" ; AS : IFAS-"P'THEH0S-1 iGOSUBl 

3B00 

6(30 BCS-"STATI0N — FACTORED HOURS — DIRECT LABOR — OVERHEAD — BURDE 

NED COST" 

6B35 TD'9:TA-9!TB-e 

GB4e IFOS-ITHENLPRINT; "DIRECT LABOR HOURLY RATE: " i : LPRINTUSItiG C 

S;DL:LPRINT"OVEBHEAD!";OH*lfle!'»"!LPRINT:LPHINTBCSELSECLS: PRINTS 

CS 

eeSB FORX-ITONS 

6H6B S.1:TF1[X|-B 

6e7B IFS>28THENeB8eELSEIF IN(X,S) -BTHEK608BELSE TPt (X] -TFt (X) +FH 

#1X,S) :S-S+l!G0TO6B7B 

6Be0 DL(X>.TFIIX)*DL:0H[X)-DL(X)*0HlBHX)-DL(Xl+OH(X) :TD-TO+DL{X 

) !TA-TfttOH[X) :TB-TB+BL(X) 

6B9a IF OS-1 THEN LPRINTTAB(3) |X; : LPRINTTAB{12) J "" I I LPRISTUSING 

PS;TFI(X) J :LPRINTTAB(26) [ "" ( : LPRIHTUSIHG CS;DL[X) j :LPRIHTTAB(38) 

;""j:LPRINTUSING CS;OM IX) | : LPRINTTABl 50) j "" ; ! LPRINTUSING CS|BL(X 

) !GOT0612B 

elB0 PRINTTAB(3) !Xi!PRINTTAB[12) ;""J!PRINTUSING PS|TF# (X) J ! PRINT 

TAB[26) j"";!PRINTUSING CS)DL(X) ; iPRIHTTAB[38) j "" ) 1 PRIWTUSIMG CS; 

OH(X) j!PRINTTAB(5B) ;"") :PRINTUSING CS(BL(X1 

611B IF X/1B'INT(X/10) THEN GOSUB llBBBiCLS: PRINT BCS 

6120 NEXT X 

6130 IF OS-1 THEN LPRINT""!LPRIHTTAB(9) ;"ASSEHBLY COST" j sLPBINTT 

AB[26) ;";:LPRINTUSING CSiTD, ! LPRI WTJABOS) J "" I sLPRlNTUSIHG CS|T 

Aj:LPRINTTAB15B) f "";: LPRINTUSING CSlTBsLPRINTtLPRINTiGOTOfiSSB 

614B PRINT:PRINTTAB(9) j'ASSEBBLY COST" j : PRINTTAB(261 J "" ! ! PRIHTOS 

ING CS;TD!!PRINTTAB(38) |""f iPRINTUSIKG CS;TA! : PRINTTAB(5B1 ; "" I : P 

RINTUSING C5;TB 

6998 GOSUBllBBB 

6989 GOTO lfl0 

7BB0 CLSiTNPUT'EDIT WHICH STATION" jX: IFX<1 OR X>NS THEN70Bi 

7B10 PRINTi64,"EDIT WHICH ITEM'jilNPUT A:Y=1 

7B15 IF IN(X,Y)«A THEN7B3B ELSEIF Y-2B THEN702BELSE Y-Y+l!G0T07l 

15 

7028 PRINT"lTEH"iAj"NOT FOUND. CONTINUE TO EDIT [ Y/N) " f 1 INPOTAS: 

IFAS-"Y"THEN7BBaELSE7999 

7B30 CLS:PRINT3B, "STATION NUHBER: ' |X; : PRIHTgl28 , "ITEK NUMBER:";! 

N(X,Y) ;!PRINT8192,"PART NUMBER: " ;PNS (X,Y) ; i PRINTS256 , "QUANTITY: " 

IQTIX.VI ! ;PRINTe320,"RAW MINUTES FOR A SINGLE ITEM : " | RJ4[X, Y)/OT( 

X,Y) ! 

704B PRINT§448,'EDIT (1) ITEM NUMBER (2) PART NUMBER (3) QUAHTIT 

Y 

14) RAH MINUTES (5) OUIT';:INPUT A!IFA<1 OR A>5 THEN 704B 
7B45 PRINT?576,"":ON A GOTO 7050 ,7B6B ,7B7B ,7B89 ,7090 
7B5B PRINTi640,"NEW ITEM NUMBER" j : INPUT IH (X ,Y) :GOT07e3B 
7068 PBINTg640,"NEW PART NUMBER"; ; INPUT PNS (X,Y) :GOT07B3B 
7078 PHINTe64B,"NEH QUANTITY" ;: INPUT A:RM(X, Y) -RM(X,y) /QT(X,Y) iQ 
T[X,Y)-A!RM(X,Y)-RM(X,y)'QT{X,Y) !GOT078 3B 

7068 PRINT§64B,"NEW RAW MINUTES" ;: INPUT RM(X,Y) :RM(X , Y) -RM{X,Y) * 
OT(X,Y) :GOTO7B30 

709B FM(X,Y)=RM(X,Y)'PF:FH#[X,Y)-F«(X,Y)/6B 
7999 GOTO 180 

8880 ONERBORGOTO12BB0:CLS!lNPUT"ENTER NAME FILE IS TO BE SAVED U 
NDER "jFS 
8085 GOSUB 13500 

801fl INPU'T"INSERT DATA DISK IN DRIVE AND PRESS <ENTER>'|AS 
802B 0PEN"0",1,FS:PRINT#1,NS,PF 
8825 F0RX-1T0NS:PRINTI1,PS(X) jNEXTX 
8830 PORX-1TONS:FORY-1TOPS(X) 

8848 PRINT#1,IN[X,Y) ,QT(X,Y) ,RM(X, Y) ,FM(X,Y) ,FH#(X,Y) 
8850 HEXTY:NEXTX 
8860 FORX-1TONS!FORY-1TOPS(X) 
8070 PRIIITtl,PN$(X,Y) 
8088 NEXTY:NEXTX 
8090 CLOSEl 

8998 GOSUB 11008 

8999 GOTO 100 

9000 ONERRORGOTO120B0!CLS:INPUT"ENTER NAME OF FILE TO BE RETRIEV 
ED ■ i F S 

9010 IHPUT"INSERT DATA DISK IN DRIVE AND PRESS <ENTER>"(AS 

9028 OPEN"I",l,FSlINPUTH,NS,FF:GOSUBl'1000 

9022 PRINT 'PERFORMANCE FACTOR IS ";PF 

9025 F0RX-1T0NS:INPUT(1,PS(X) iNEXTX 

9030 F0RX«1T0NS:F0RY-1T0PS(X) 

9040 INPUT#1,IH[X,Y) ,OT(X,Y) ,RM(X,Y) ,FH1X,Y) ,FH#[X,Y) 

9050 NEXTY:NEXTX 

9060 FORX-1TONS!FORY-1TOPS(X) 

9870 INPUTtl,PNS(X,Y| 

9088 NEXTY:NEXTX 

9098 CLOSEl 

9998 GOSLIB11000 

9999 GOTO 180 
180B8 CLStEND 

11000 PRINT'PRESS <ENTER> TO CONTINUE" 

11018 AS"INKEYS:IFAS-'"THENllB18ELSEflETURN 

12000 CLOSEiPRINT ERR0R:G0SUB11BBB :RESUHE1B0 

13808 P"PEEK(14312) :IF P>128 THEN CLS : INPUT"PRI(1TER HOT READY. A 

BORT (Y/N)"iAS ELSE G0TO13B2B 

1381B IF AS-"Y"THEN OS-fl :GOT01382B ! ELSE INPUT'READY PRINTER AND 

PRESS <ENTER>";A$!GOTO130B8 

13B20 RETURN 

13508 PRINT"* ♦ SCANNING ARRAYS + +" :F0RX-lTONSiS-l 

1351B IFS>2BTHEN13528ELSEIF IN[X ,S) -0THEH1352BELSES-S+1 1GOT01351 

8 

13520 PS(X)-S-l!NEXTX!HETUHN 

13600 CLS:PRINT"PERFORMANCE FACTOR IS " jPF : INPUT"NEH PERFORMANCE 

FACTOR ■;PF 

13610 GOSUB 1370B 

1362B FOR X-1T0HS:F0R Y-ITOPS(X) 

13630 FM(X,Y)-RM(X,Y)»PF:FK#(X,Y)-FM{X,Y)/6B 

136 40 NEXTY;NEXTX:GOSUB11000:GOTOiaB 

13700 PRINT"* + ADJUSTING ARRAYS t +":RETUHH 

14080 CLS:PRINT CHRS(23) : PHINTM64 , "INITIALIZING" 

14010 DIH IN[NS,20] ,PNS(NS,20) ,QT{NS,2B) ,RM(NS,2B] ,FM[NS,20) ,FHI 
(NS,:B) ,TF«(NS) ,DL(NS) ,OH(NS) ,BL(NS) ,PS(NS) 

14820 FORX'1TONS:FORY-1TO20 

14B3B IN[X,Y)=fl:PN$[X,Y)=" " ;QT(X,y) -B sRK (X,Y) -0 iFB(X, YJ -0iFH* (X 
,Y)-8 

1404B NEXTY iNEXTX: RETURN 




The MX-100. Not just better. Bigger. 



Epson. 



Our MX-80 was a pretty tough act to follow. I mean, 
how do you top the best-selling printer in the world? 

Frankly, it wasn't easy. But the results of all our 
sleepless nights will knock your socks off. 

The MX-100 is a printer that must be seen to be be- 
lieved. For starters, we built in unmatched correspon- 
dence quality printing, and an ultra-high resolution bit 
image graphics capability. Then we added the ability to 
print up to 233 colunxns of information on 15" wide 
paper to give you the most incredible spread sheets 
you're ever likely to see. Finally, we topped it all off 
with both a satin-smooth friction feed platen mid fully 
adjustable, removable tractors. And the list of standard 
features goes on and on and on. 

Needless to say, the specs on this machine — and 
especially at under $1000 — are practically unbelievable. 
But there's something about the MX-lOO that goes far 



beyond just the specs; something about the way it all 

comes together, the attention to detail, the fit, the feel. 

Mere words fail us. But when you see an MX-100, you'll 

know what we mean. 
All in alt, the MX-100 is the most remarkable printer 

we've ever built. Which creates rather a large prob- 
lem for those of us at 
Epson. 

How are we going to 
top this? 

Your next printer. 




EPSON 

EPSON AMERICA, INC. 



3415 Kashiwa Street - Torrance, Californid 90505 • (213) 539-9140 

See the iviwle incredibU' Epsou MX Series of printers, ul i/our Authorized Epson Dailfr. 



■ S»» Li!,i ol AOveiiisvrs on page 402 
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Instan t Softwarelnc 

Pelerborough, NH 03458 - A Division of WAYNE GflEEN INC. 



. -■ ■>» ,; . ,-; 



^^^w'^i)^ 



This coupon may be redeemed for one dollar off any Instant 

Software package at all participating dealers in the United 

States. Limit—one coupon per package. Not valid for mail order 

purchases. All information must be filled out completely. 

Dealers— redeem coupon through Instant Software. 




Program you are purchasing 
Your name 



Address. 



City 



State 



.Zifi^ 



Dealer name. 



Address, 



Zip 



-A4I 






r- 



Ran 






ini^DIl 



Instant Software Ina 

PelertwfOugh, NH 03456 -A Division of WAYNE GREEN INC. 



This coupon may be redeemed for one dollar off any Instant 

Software package at all participating dealers in the United 

States. Limit— one coupon per package. Not valid for mail order 

purchases. All information must be filled out completely. 

Dealers— redeem coupon through Instant Software. 



Program you are purchasing 
Your name -_ 



Address 



City 



State 



J^ 



Dealer name. 



Address. 



A t, i iy* «, M li * 4 f 



Zip 




Inslgnl^^SoftvvareJn^ 

Peterborough. NH 03458 -A Division of WAYNE GREEN INC 






p tB W^ ° I^ 1 n^ 



This coupon may be redeemed for one dollar off any Instant 

Software package at all participating dealers in the United 

States. Limit— one coupon per package. Not valid for m.ail order 

purchases. All information must befdled out completely. 

Dealers— redeem coupon through Instant Software. 




Program you are purchasing 

Your name 



Address- 



City 



State 



.Zle. 



Dealer name. 



Address, 



-ZiR- 



-A41 



^,a^.tifeM,^mtttii) i ;M,«gfi^y^^datB{^i 'i 



l^l^.4.<fa:M<ri1 



.^.^_^^i^^ ^>^^ ^> ^^_^^^^^.^^ ^ ^,^^^«^^^.^:^: 



m 




For Microcomputers 



U.S. $1.00 UK sop FFR 5 
DM 2 URA 1000 SFR 1 




^^^^^. 



Instant Soffwarer 



5^^^ NEW PRODUCTS 



TEHPLB OF THB BUN 

Your quest for the anclcnl Riles of the 
Shaman has finally kd you to a rrmotc 
South American ruin, long rumorrd lobe 
[he icgendary TEMPLE OF THE SUN, 
Now. at last you are able to explore the 
rite for the last clues to the most powerful 
order of Wizards left In the world. Octo- 
dlrecllonal. the matrix ol Ihls adventure 
Is nearly cndle^. as arc the ways to die. 
Model 1. Level II. 16K 
5012R[Tape)SlB.gi] 
5011ltD(Dl>k)$39.9B 



THE RUSSIAN DISK 

Well, here II ts: THE RUSSIAN DISK. 
Everything your APPLE computer needs 
to put you Into the Inlematkx^ picture. 
Instant SoRware has packed two multi- 
part packages onto this single disk, so that 
you can master ihe Russian (or Cyrillic) 
Alphabet In no time flat, learn to type In 
Russian, and to read and recognize a vari- 
ety of Russian words foi foods, drinks, 
stores, and even names. 

Tfjr first set of programs eases you 
through the Cyrillic alphabet In short, 
rapidly digested and thoroughly exercised 
steps, starting with those letters which 
moot resembk the English counterparts 
and Introducing the more cxotk] orics bll 
by bit. Enjoy that lift which comes from 
the discovery that you have learned the 
entire Russian alphabet, almost without 
trying 

The second sel of programs devek^n 
your reading ability In Russian, and ex- 
pands your Russian vocabulary as well. 
You'll learn the words for various foods, 
dflnks and places to cat. for signs and 
names of Mores — everything the traveller 
needs to know. 

Furthermore, the program will allow 
you to practice typing In Russian, using 
Ihe Cyrillic characters. Recommended age 
level. 10 toadull 

RUSSIAN DISK requires 32K RAM. one 
disk drive, an Apple II or Apple II Plus and 
Apfdeaoft. 
02B3AD (Dlak) 024.95 



MASTER REVERSI 

Are you looking for a game you can 
spend hours wllh^ a game Ihal'a simple 
lo play, yellnflnllely challenging: a game 
that you can play with a friend, or against 
your computer In the wee hours of the 
morning: a game that can be played at 
panics, and at serious tournamenls? 

Look no farther! Master ReversI will 
meel all your needs! 

Masler ReversI Is a tournament- win 
nlng game program Ihal has more fea- 
tures than any olher reversl program on 
the market. It will challenge and leach 
you no matter what your degree of exper- 
tise. 

What makes Master ReversI really spe- 
cial is Usability to allow In-depth analysis 
o( moves and games. You may examine 
the computer's evaluallon and choice of 
moves. You can save and replay Interest- 
ing moves and games. You will be able lo 
study and manipulate dozens t^ louma- 
menl-level games which are provided In 
the program's vast library 

Masler ReversI will enable you lo over- 
come any barriers standing between you 
and a world championship. 
Model I, Level II. I6K. 
0378RD (DUk) $29.95 



CAPITAtaATIOIf 

As the firat module In the Instant Soft- 
ware Aided Instruction (CAI| English 
[.anguage Series. CAPITALIZATION Is an 
educationally solid program for the 
leaching and review of the rules governing 
capital letters. Wllh this program and an 
Apple computer, the student, the writer, 
the reporter— anyone can learn or review 
the 12 fundamental rules of capitalization 
quickly and effectively. 

The program Is designed for students of 
Junior high school level and beyond. Each 
rule Is concisely explained on the screen, 
and examples arc given. Next, the student 
ts allowed loexerrise the usage of the rule. 
The computer keeps score and reports the 
level of mastery at the end of each set of ex- 
crdaes. The student may then choone to 
study the next usage, or may return for 
further practice to the previous exercise, A 
Model Mastery Worksheet Is Included In 
the documentation as an aid to teacher 
and student CAPITALIZATION requires 
32K. one disk drive and an Apple n or II 
Plus with Appleaon Bask: 
0339AD (DUk) 824.9B 



BPACE SHUTTLE 

Inside Ihe cockpil of the space shuttle, 
Columbia, the pole green light from three 
computer driven TV screens Illuminates 
Ihe craft's 1.400 switches and circuit 
breakers. The Command Pilot gives the 
necessary Instructions lo begin what 
NASA calls the dcorblt " procedure. It's 
time to bring this baby home. 

Just 55 hours ago. 5.3 million pounds of 
thrusi from Iwo solid fuel boosters, essen- 
tially 15-story firecrackers, sent Ihe 
scHTiewhat chubby ^lace buttle into or- 
bit. Now. on-board computers performing 
325 .CXX) separate operations every second 
will help guide Ihe craft safely and 
gracefully back to Its roost. 

Over Ihe Indian Ocean, the OMS engines 
bum for Iwo minutes to slow the crafl 
down from its orbital speed— a speed 
equivalent to 25 limes the speed of sounds 
The shuttle craft begins to drop and Is 
turned iKwe up so thai Us lllc coaled belly 
will absorb the enormous heat of reentry. 
Those 34.000 sllkron glass Ules are all that 
prevent the craft from being burned up. 
Thirty-five minutes later. Ihe orblter 
enters Ihe Earth's atmosphere over Mid- 
way Island. By now. ttie shuttle Is banking 
and flying wide traverses to control Its 
speed. The strain on Its supcrstruclui« Is 
Iremendous. Finally, the runway at Cape 
Canaveral Is dead ahead. At 190 miles per 
hour, the shuttle touches down and ends 
Its perilous Journey. 

Instant Software's SPACE SHUTTLE 
puts you In the Command Pilot's chair of 
one of America's first reusable space 
vehicles. You will bring her back from 
space. Simply stated, this will be the most 
fascinating and breathtaking experience 
you will have until the space shuttle be- 
comes a commuter run. 

SPACE SHUTTLE ts Ihe ulUmair air 
night slmulatktn Model I. Level II 16K: 
Model III. 16K. 
0332R(Tape)614.9B 



DEER'S TIPS 

Never remove a floppy disk from lis pro- 
Iccllve plastic casing. 



DRAGCmQUEST 

THE PRINCESS 

HAS BEEN KIDNAPPED 

And you. Sir Knight, have Ihe task of 
reluming her to her father. Ihe King, l>c- 
fore nightfall, when SMAEGOR. the most 
foul, will certainly do her In. 

Explore the unfamiliar lands beside Ihe 
River Delta as you search for clues lo 
SMAECOK S hiding place. Get the tools 
you will need: weapons, food, and magical 
Items if you can find Ihem. Prepare for en- 
counters with the creatures of the land lor 
some of them may be In league with The 
DragiHi. Seek answers In the Land of the 
Dead, but enter cautiously tor 111 awaits 
you there. 

Wben.at last you are ready, confront the 
Mighty SMAEGOR In his latt, for M'lady 
awaits and Is In muLh danger, CAN YOU 
DO IT? Can you vanquish SMAEGOR and 
iM^al the selling sunV Many surprises await 
you In this DRAGONQUEST-and one of 
Ihem Is named DEATH 

In a desperate race agalnsi ihe sun, you 
search for SMAEGOR. Monarch o( Dragon- 
folk, who has kidnapped (he princess of 
the Realm and holds her In a dlsianl and 
unknown place. In a quest for Honor and 
glory, you must search Ihe land, seeking 
oui Ihe tools needed for the ulllmale con- 
frantallon On the River Delta. In the aban- 
doned Temple of Baalhteskl. Goddess of 
Ihe Blade, cver>'where clues abound. Bui 
WHERE Is the Princess? Now, as never 
before. Ihe genius of CHARLES FOR- 
SYTHE shines In this machine language 
ADVENTURE DRAGONQUEST. Can YOU 
save M'lady from the Iron clutches of 
SMAEGOR? Tape version: Model I. Level 
II. 16K: Model III. 16K Two individual disk 
versions available for Model I and 
Model III 

BO06R(Tapc]8LB.9fl 
BOOTRD (Disk. MODEL I) 621.9B 
B01OR3D (DiBk, MODEL mj 821.SS 



TBB IXBCntOinC BRKADBOARD 

Computer Aided Design (CAD) Is one of 
the newest applications of microcomputer 
technotogy THE ELECTRONIC KtEAD- 
BOARD permits the design and analysis of 
analog circuits. It can be used to evaluate 
voltages, currents. Impedance and the fre- 
quency response of any circuit. This pack- 
age Is Ideal for audio componenl repair- 
men, ham radio technicians, hobbyists. 
electrical engineers, telecommunications 
englneera. audlophllea and students of 
electronics. Tests can tx made on any 
analog circuit such as transmitting and 
receiving equipment, amplincrs and the 
like The program will allow: adding or 
removing components: calculating Imped- 
ance at a particular potot In the circuit: ob- 
tairUng the voltage at a portlcuiar point (or 
all points) : setting of the desired frequency 
or a sweep range of frequeiKles for analy- 
sis; and saving of circuit designs on 
ca.isettc tape. 

Components In a simulated circuit can 
be removed or Inserted for East, efflclent 
design or analysis. The possible cames of 
circuit failure can easily be determined, 
reducing the amount of time »penl on 
troubleshooting. In conJunctlMi with a 
course In artalog electronks. the program 
canheusedasa training aid. Students can 
verify electrical theory by entering exam- 
ple circuits and determining frequency re- 
sponse. It you're an elcctrcmlc doughboy, 
then you need THE ELECTRONIC BREAD- 
BOARD! Model I, Level U, 16K: Model m, 
16K. 
02B7R (T&peJ 849.98 



NEW PRODUCTS 
AVAILABLE SOON 

for the TRS-80* 



DOMES or EILOARl 

The Ion Station at Kilgarl Is rich In 
history and as far away from the civilized 
galaxy as you can gel. Your Survey craft 
has been disabled, her Ion englrtes are 
dead for lack of fuel. Only by retrieving 
an Ion rod for the mass convrrter can you 
hope to leave the Outrlm and return lo 
Federation space. But Ihe automated 
Digitron Ion Station Is programmed lo 
destroy all intruders. Can you solve ihe 
puzzle presented by this classic Adven- 
ture? Or will you be doomed lo the lonely 
wasteland of Kilgari forever*/ 



TIHEQUEST 

Sifting through the sands of time, you 
allempi to solve Ihe mystery as II unfolds 
t>elore you. From the distant pasi to the 
obscure future your Time machine 
tracks Adventure In lis truest form. High 
speed machine language wllh all the 
features you have grown to enjoy. Easily 
one of the l>esl and destined to tiecome a 
classic. 



"IRS 80 IS a vodefTxxk of Rcx*o Shock, o 
division ol lonoy Cofp 
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Our Guarantee 

Defective software may be returned for exact replacement at no cost to you, or for full 
credit, within thirty days of the invoice date. You MUST enclose dated proof of purchase 
for any replacement to be made, so please keep your invoice. 

Should a disk or cassette become defective after the warranty period. Instant Software 
will still protect you. You may return the original defective cassette along with S4.00, or 
any disk with S5.00 for a replacement. Again, you must provide us with a copy of your 
invoice for any return to be made. 



On the Cover: sculpture entitled "The 
Undersecretary in Charge of Protocol" by 
Don Simpson, courtesy of the Earthlight 
Gallery. Boston. 

Photo by Martin Paul 
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'A Irademark of Apple Compulcr. Inf. 

'A Irademark of Tandy Corporation 

'A trademark of Commodore Huslncss Marhlncs, Int. 

•A Irademark of Texas Inslrumenls 

'A trademark of Healh Company 

•A trademark of Noilhsiar Compulers. Inr 

'A Lradrmark of Personal MirroCompulcrs. Inc. 



Instant Software Inc 



Peterborough, New Hampshire 03458 



COPYRIGHT 'i, 1981 
.INSTANT SOf'TWAKE [NC 
PETERBOROUGH N M 0.145fl. USA 
ALL RIGHTS RESERVED 



Instant Software • 3 



Instant 




99 



". . . It's becoming very clear now. . . 
Your microcomputing lite Is going 1o be very 
exciting. . Money! I see much 
money lor you. Perhaps It Is the 
money you will gain when 
Instant Software's new 
business applications 
guide your financial 
endeavors. I see 
travel .you will 
journey to distant 
worlds in distant 
times. You will build 
kingdoms from des- 
erts and armies 
from slaves. Never 
will you t>e bored, 
adventurous one! Your 
programming burdens will 
lighten with new utilities— new 
tools. I see color! Many 
bright colors! I see new 
packaging for all these trea- 
sures .. .everything new! 
And, . yes, a tall, hand- 
some stranger who will 
guide you to these won- 
ders. It will be your In- 
stant Software dealer— 
a wise one indeed. All 
awaits you — all Is 
yours for the asking. 
Soon. . very soon!" 



Get a glimpse of the future today— at your nearest 

Instant Software dealer. 
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YOUR NAME COULD 

BE HERE. CALL: 

1-800-258-5473 



Find out what you're missing. 

You heard the lady. Your microcomputing iife is going to be very exciting. But don't 
leave it to chance — leave it to usi We have a brand new catalog full of packages and 
valuable coupons to help make it happen. It's free ... if you fill out the coupon and mail 
It today. (Or make a photocopy and spare your magazine). 



NAME: 



ADDRESS: 
CITY: 



STATE:. 



ZIP:. 



Instant Software Inc 



Peterborough, N.H, 03458 603-924-7296 ■A2i 



Introduction 



Wayne Green's anticipation of the growing demand for microcomputer software 
brought about his establishment of Instant Software back in early 1978. At that time. 
Instant Software consisted of a handful of employees, and produced six programs. 

Today. Instant Software employs fifty five people and produces over one hundred soft- 
ware packages for the TRS-80, Apple. Pet. TI. and Northstar. We have over 200 more In 
the development stages, including programs for the TRS-80 Color. Atari and Casio com- 
puters. The rapid rate of development of microcomputer software by today's top-notch 
programmers pushes the industry's standards higher. For this reason, several months 
ago, we began an extensive review of each Instant Software product. The results. . . tem- 
porarily, a smaller product line, but a top-notch one. 

Those packages which did not meet our standards are being rerun through our 
development pipeline. We are working closely with the authors to upgrade these 
packages, and make them available to you once again. 

Speaking of upgrading . . . you'll want to keep your eyes on our new products, packag- 
ing and our advertising campaigns in the upcoming months. These all create an image in 
which we see . . . 

Instant Software in your future. 

Instant Software. Inc. 



PMC-80 COMPATIBILITY 



At this time, the following TRS-80 programs are known to be 
compatible with the PMC-80 computer: 



0017R 

0023R 

0058R 

0106R 

0117R 

0127R 

0133R 

0136R 

0137R 

0140R 

0141R 

0159R 

0I68R 

0171R 

0218R 

0219R 

0223R 

0228R 

0230R 

0232R 

0240R 

0246R 

0250R 

5003R 



Air Flight Simulation 

Oil Tycoon 

Programmer's Converter 

Air Mail Pilot 

Night Flight 

Surveyor's Apprentice 

Renum/Com press 

Beginner's Russian 

Everyday Russian 

Business Analysis 

Battleground 

Jet Fighter Pilot 

Label 

Flight Path 

Dr. Chips 

House of 30 Gables 

Cosmic Patrol 

Dynamic Device Drivers 

TLDIS 

Disassembler 

Alien Attack Force 

Compression Utility Pack 

IRV 

Ultra-Mon 
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ENCYClOPflHA 




'Ibots(.& 

Technioucs 



& 



Some 
of the 

Best 




Encyclopedia for the TRS-80" is the newest peripheral for 
your microcomputer. This ten-volume reference series con- 
tains programs and articles especially selected to extend the 
documentation that comes with the TRS-80. E^ch volume con- 
tains business, education, games, graphics, hardwcU"e. home 
applications, interface, tutorial and utility selections. Volumes 
of the Encyclopedia will be issued one-at-a-time approximate- 
ly six weeks apart. This means that each new volume will 
reflect the latest development in TRS-80 microcomputing. 
Encyclopedia for the TRS-80 is available in two editions. The 
deluxe COLLECTORS EDITION has a handsome green and 
black hard cover with a dust jacket. A soft cover edition is also 
available. 

To order sinjjlc hard cover volumes ol the Encyclopedia please spcfily: 

Vol. 1 BN8101. Vol. 2 EN8102, Vol. 3 EN8103, Vol. 4 EN8104, Vol. B 
BNBlOBeacti $ig.9S 

To order sinjilc soft cover volumes of the Encyclopedia please specify: 

Vol. 1 BNS081, Vol. 2 BN80S2. Vol. 3 EN8083. Vol. * BN8084. Vol. 5 
ENSOSBcach S10.95 

Special Introductory Offer — Order ihc entire set Hhe first ten vnlumrsl of Ihc 
Encyclopedia for tbe TRS-80 and receive the lenlh volume FREE! 

10 Volume deluxe hard cover COLLECTOKS EDITION— a S 199,50 value 

EN8100 $164.00 

10 Volume soft cover edition, a S109.50 value. 

EN80S0 S83.00 



Encyclopedia Loader is the software companion to the Encyclopedia tor the 

TBS-HO. This cassette ends the agftravalioii of typing in the programs. [,oad each 
volume of Ihc Encyclopedia instantly without typos. 

Vol. 1 EL8001. Vol. 2 EL8003, Vol. 3 EL8003. Vol. 4 EL8004. Vol. S EL8O0S 

each $14.95 

Underatanding and Programming Hlcrocomputers— A wcll-stnicturcd intro- 
ductory IcxI on the hardware and software aspects of microconipullng. 

BK7382 $10.93 

How to Build a Microcomputer and Really Understand It— A technical manual 
and programming guide that takes the hobbyist slcp-by-step through the design, con- 
sirurtlon. testing and debugging of a eomptcle microcomputer svstein (6502 chip). 

BK732B 89.95 

Some of the Beat from Kilobaud Hicrocomputlnj— A collection of articles focua- 
ing on prograniiiilng techniques atid hardcore hardware construction projects. 

BK731I S10.99 

Tool* and Tcchnlquea for Btectroolca — Describes the safe and correct »a\ s to use 
basic and specialized tools for electronic projects as well as specialized metal-working 
tools and the chemical aids which are used In repair shops. BK7348 S4-9B 

40 Computer Gamea from Kilobaud Microcomputing— Games in nine dilTereni 
categories for large and small svsieins. including a section on calculator games 

BK73S1 &7.9B 
*TRS so Is a trademark of Radio Shack division of Tandv Corp. 






fiorr 



micioec»iip«j*ig 




* *Dealcr DlBCounts 
Available. Inquire: 
Dealer Sales Dept. 



MAIL A COPY OF THIS FORM TO: WAYNE GREEN BOOKS 
ATT: MAIL ORDER • 80 PINE ST • PETERBOROUGH NH • 03458 



EN8081 
_ EN8082 
EN80S3 
eN8084 
EN8085 
EN8101 
EN8102 
ENS 103 
EN8104 
EN810S 
EN8080 
EN8100 
Dealer'* 



$10.95 

$10.95 

810.95 

810.95 

810.95 

819.96 

819.95 

$19.95 

$19.95 

$19.95 

883.00 

8184.00 

Catalog** 



EL8001 $14.95 
EL8002 814.95 
EL8003 814.95 
EL8004 814.95 
EL80O5 814.95 
BK7382 810.95 
BK7325 8 9.95 
BK7311 810.95 
BK7348 8 4.95 
BK7381 8 7.95 



addreaa 



city" 



state ilp 

(include 61.50 for postage A haodling] 

enclosed S 

bill: DMastercard DVlfta 



D American Express 



acct. I 



interbank I 
signature _ 



..exp. date_ 



Please allow 4-6 weeks for dellTery. 
NO C.O.D.'B 



CALL TOLL FREE 1-800-258-5473 
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Instant Software 

PETERBOROUGH. N.H. 03458 

Order Form 

TOLL FREE ORDER NUMBER: 1-800-258-5473 

Yes, I would like to see my local software dealer 
carry more INSTANT SOFTWARE: 

Store Name 

Address ^ 



Name: _ 
Address: 
City: 



Slate. 



Zip- 



Method of payment: 

r check D money order D VISA D AMEX [J MC 

Card No. ^ Expiration 

Signature . Date 



City. 



State. 



Zip- 



QUANTITY 


ORDER NO. 


PROGRAM NAME 


UNIT COST 


TOTAL COST 
































































































+ stiipping 




2.50 








Total 





You may photocopy this order form if you wish to keep your catalog intact. 



M 



ATTENTION PROGRAMMERS 



How to Submit Programs 
to Instant Software 



The gu Id III)} icl«i behind Icistani SoTlwaiT Is a simple one. [i lakes lime, taleni, trainiiij; 
and experirni-e lo write good programs; 11 also lakes lime, money, iralning. expenrni* 
and laleni lo establish an eiTicicnt niarki-iing system You have (he Tirsl set o( qualifira 
lions: we have Ihe second Wc wanl lo leam up wUh you 

Instanl Soflware is sel up lo evaluate submllled progriims. to publish the bcsl ones in 
quantity, and to market Ihrse programs Uirough a network of computer stores and niher 
retail outlets. 

You havi- our catalog in your hands. Look at the hreadlh of the programs available: 
games, slnuilallons. utilities. educallon:il and business programs. While games have 
always been good sellers and are likely to remain so. bright futures fcir microcomputer 
software lie In the fields ol business, educational and utility programs. Ever>- biisini-ss 
person wanls to pui his computer io work saving time and monev Goixl bookkeeping. 
accounilng. invenlor\- and billing programs are sure wllei^.. As microi-ompulers slan lo 
appear in schools. Ihe need for good CAI programs will grow. Finallv. programmers will 
continue lo need the tools to write, edit and debug programs. 

Thinking ol programming for puWicalion? [f. in light of what is now t>eing sold. yc)ur 
programs prrfonn a unique function, work faster, are more convcnlem or easier lo use. 
ihen we want lo sec them. 

The kind of software we re sollciling consists of programs that not only solve old prob- 
lems but also do jobs (hat couldn't be done before. We want software that Incorporates Ihe 
latest developments In the art of programming. 

One piece ot advice— write what you know. This advice applies csjieeially to writers of 
computer software. If you're an accountant, you understand the problems faced by ac- 
eounlanis. An accounilng program authored by you has mosl likely addressed just those 
problems, and is probahlv a good one. The same goes lor an educalionai program. A good 
leachcr knows from Iraming and experience prectsely what students need in order lo 
learn, and how lo give it to ihem. 

Please note: Instant Software Is supponing all popular microcompuicr systems We 
want software for (he THS 80 Models 1, 11, HI and the Color Computer, Apple 11 and III. 



Atari 800, PET, TI 9914. Casio 2, and any other successful microcomputer system At 
present ihc Insianl Software lab, one ot the best equipped compiiier laboratories In the 
world, has over IS dUlercnl computer systems running. What's more, we have lh<- staff 
and theexpenise lorun andcvaluate programs for all of these svstems Wc also H-ek eon 
versions of successful programs from one system lo another. 

For tlii- full details on program submission, write for a Submission Package to 
Submission IJepartinent 
Instant Software, Inc . 
Rt. 101 and Elm St 
Peterborough, NH 0345a 

Inhnel, Ihe package will Icll you that we need a complete dcscrtpllon of whal your pro- 
gram does, how It does II. how to use It and what benefits the user will get froiii Ihe pro- 
gram When you are ready, ihis Information, plusa disk or cassette copy of your program, 
should be sent to the above addres.s Wc will send you a card ot acknowledge mem upon 
receipt of your material 

If we feel that your program has markciing potential, we'll send you a contract. Upon 
receipt of the signed contract, we 11 send your program to up lo live associate editors. We 
try to match (he editor's background lo the subject matter of Ihe program. The as.sociate 
editors will evaluate your program, tell us what Ihey think of II, make suggestions for 
changes and suggest an estimated relall price. Our programmers will contact you about 
any changes. 

Once the prograin has been completed, we'll write the user documentation, using 
materials you provide plus the expeilence of our trained doc u men la lion slafT. Next, we 
design the package and write the package and catalog advertising Then we print the 
documentation, m.ikc copies of the program on cassette or disk and release the package to 
our marketing department. 

Our marketing department will sti the price for Ihc package, arrange Iheadventsing 
campaign and coordinate Ihe distribution of the package through our niaikeung 
represent ailves and Inslant Software dealers. 
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Business/Applications 
for your TRS-80 



riNDITSUICK 

Pul an end to the mlsplarrd Information 
syndrome! Here Is a reliable fasf. subject- 
oriented Information locator— FIND IT 
QlIiCKI This Information Indexing and 
relrleval system Is versatile and flex- 
ible— Ihe Ideal tool for doctors, lau-yers. 
engineers, businessmen, educators, any- 
one who needs to locate Information. 

Designed with a Jourrwl;nia|(ailne for- 
mat. FIQ Is versatile enough (o he used to 
Store and retrte\-e any type of referenr^ In- 
(MTTiatlon Including clIeTil lists, vendor 
advrrtlsemenis. report bibliographies and 
more— even poems and famous quota- 
11or». Subjects can be Indexed or called ac- 
cording to author. Journal and date or by 
up 10 nine keywords thai you determine. 
Keywords can be used singly or In com- 
blnalion during the search routines. 

FIQ can be used by anyone. II requires 
tiospeclal skill. Just the ability to type Ar- 
ticle references to be stored can be pre- 
selected and then entered Into the system 
by a secretary or assistant. Kven the con- 
tents of entire file cabinets can be. Indexed 
and stored! 

MND IT QUICK requires a minimum 
system consisting of TRS-80 Model 1. Level 
11 with 16K of RAM. an Expansion Inter 
face and at least one disk drive l.'pio 106O 
items can be stored on one data disk. In 
sum Software s Tiny DOS operating sys- 
tem Is Included on the program disk so 
that you can use the program without luss 
or bother. 

Make vour computer work like vour own 
personal librarian with FIND if QUICK 
Can you afford to wall another day? 
OZSSKD (DUkl $49.9B 

THE WORDSLIHOEK 

AI last simplified letter writing! The 
Wofdslinger Is an cconomkal program de- 
signed for the Individual user or small 
business. The program has automatic for- 
matting for letterhead stationery and en- 
velope addressing. You can write and edit 
letters, reports, forms, even schoolwork! 
Text Is stored on cassette tapes for fast. In- 
expensive retrieval. Once you've used the 
WordsJlnger. you won't want to go back to 
your typewriter. 

One of the Wordsllnger's major advan- 
tages Is that you don't need disk drives or 
an Expansion Interface, the minimum sys- 
tem required Is the TRS-80 Model I. Level 
II with 16K al RAM and an appropriate 
printer lyou may need an Expansion Inler- 
iace. If your printer can't operate with Just 
a printer Interface cable, such as Radio 
Shack's part '26-1411 or 2&1416|. 
0I2aft(T>pc]Sa9.SB 

CLtlIATE<»lfP 

Come rain or come shine, you'll tove be- 
ing "In the know" with CI Imatc-Comp, our 
two- program weather package. 
WEATHER FORECASTER— Gives you a 
short-range forecast of upcoming weather 
In your local area. Just enter past and pre- 
sent barometric pressure to obtain a 
"preview " of your weather for 1 he next 24 
hours. 

WEATHER PLOT-Provldes you with ac- 
curate, avera^ weather data for moel of 
the major cities of the United Slates. This 
program includes data files for the Con 
tinenlal U.S. 

This is a chance for all amateur meteo- 
nrfogtsts to generate useful fixccasts and 
weather data. Model 1. Level II. I6K. 
03 I6RD (DUkJ $24.98 



HAIL/FILE 

from Galactic Software Ltd, 
A Mailing List tor the TRS-80 
Model I or Mixlel II 

Instant Software always tries to provide 
you wllh the best software on the market 
Although the Mali/File mailing list prt>- 
gram Is nui published by us, 11 Is so good 
that we want you to try It. 

We have two versions of this mailing list 
Pkg. 5000HD Is tor the Model 1 with the 
5 inch disk drive and Pkg. 5001RD Is lur 
the Model II with the 8-li>ch disk drive The 
programs are essentlallv identical exi-i-pt 
tor Ihe storage media and their respective 
capacities. With the 5-inch drive, vou i-.in 
store up to 600 names per disk wiihiiui 
DOS, or 300 names per disk with IX)S 
With the 8-lnch drive, you can store up to 
2500 names per disk, with or without 
DOS. lit your list Is larger than the single 
disk maximum. It can be distributed over 
several disks | 

The program maintains separate alpha- 
betical and ZIP code files under constiuit 
sort. When you add a name to your list II 
will be inserled Inio Its correct position In 
the (lies. You will never have lo sort your 
list, it will always be ready lo print labels 

The program will record your data In 
nine llelds two for NAME. aiKl one each lor 
ADDRESS. CITY, STATE. ZIP CODF, 
PHONE NUMBER PHONE EXTENSION 
and a flve^haracler CODE field When you 
print labels, you have a choice of three dlf 
ferent labrl formats, a ihrcc-llne label, a 
four-line label or a user-defined label In 
the three-line and user-defined label lor- 
mats, you may include a message line on 
your label. 

The besl feature of this program is the 
son process that lets you delermlne which 
labels will be printed. You may speclfv 
either alphabetical or ZIP code order for all 
or any part of your list. For example, you 
can print labels for everyone on your list 
whose name begins with the letter A, or for 
all of those people who have Ihe same ZIP 
code. You can even print labels for only 
those people named Jones, who are living 
In a given city or stale. INote: The Model M 
version can search tor both (Irsl and List 
names, eg , John Jones.) Furthermore, 
youcanchmwe to print labels by using an v 
single field |i e . specific cities, stale-s, 
phone nu mixers, etc I. You may assign spr 
clfic codes to any name In the CODE field. 
For example. ACT could stand for ailue 
accounts, and INACT for inacllvr .ir- 
counls 11 yiHi wanted to send a letter to ;ill 
of your inacllve accounts, vou would syrt- 
ity the CODE INACT, and labels would be 
pnntcd only for your inactive accourils 
When ynu print labels, vou may speiify up 
lo nine different CODES at one lime II 
your data matches any one (rf the CODES 
a label will t>e printed. 

Files created with the Model I version of 
this program can be transferred to the 
Model 11 version, when vou upgrade your 
hardware. 

Package 5O0ORD requires Ihe lollowliig 
minimum svsiem 

1. A THS-HO Model 1, Level II with 16K 
RAM 

2. All Expansion Interface with t6K 
HAM (or morel. 

3. One lor more] mlni-disk dnves 

4 A eompatlble jwlnler i80 or i:i2 
columns). 

5 TKSUOS Version 2 3 
BOOORD Model I (Dlak) 890.00 
SOOIRD Modem [DUk)S199.00 



BUSINESS ANALYSIS 

(Formerly Oracle-80) 

Business Analysis will provide you with 
analyltcal and torerasllng capabilities pre- 
viously available only In large computer 
and timesharing systems. It Is a flexible, 
profes^onal lime series package that can 
be used In sales analysis and forccasllng, 
product planning, business planning, etc. 
The professional forecaster will recognize 
BUSINESS ANALYSIS as a toed which in 
corporates all the power of the X- 1 1 model 
and extends It. Investors can ai^yze 
stocks, market trends and growth rates 
Financial managers and economists can 
analyze the general economic climate and 
Investigate business cycles. Even families 
can (Ind this program useful In analyzing 
spending or energy consumption trends, 
for II Is Ideal tor anyone who needs to 
analyze and forecast rTK>nthly, quarterly or 
annual data. 

Even though this package uses ad- 
varKedstailsikral methods, you don't have 
to understand higher math to use It. De- 
signed lo be used and understood by the 
typical business person, lis powerful ana- 
lytical capabilities will satisfy even the pro- 
fessional forecaster. All Inputs and outputs 
are wrltlen In plain English and the docu- 
mentation carefully explains all functions. 

Adding, deleting and modifying data Is 
accomplished with a verj- llexlble edll 
Ing routine. Automatic scaling of num- 
l>ers. ability to choose from several 
output fDmiats, a raJrndar formal that 
identifies all your data by monlh/quar- 
ter/yrar, and the ability lo add and sub- 
iracl values while Inputting from the key- 
board provide added user flexlblllly You 
can use several methods— moving aver- 
age, rate of change, seasortal Indices or 
cyclical Indices— lo analyze your data. The 
unique graphing capability lets you 
visualize your historic data or any of the 
modified data series you calculate, and 
direct any chart or graph to your printer. 

Business Analysis will forecast future 
data values using ticnd, moving averages 
or seasonal methods. You may choose 
either constanl unll-lrend or a constant 
percenlage-grawlb-lrend forecast for even 
more flexlbllily 

This Is or>e of (he most powerful and 
useful business tools you will ever use. It 
puts the future In your hands. 

The package requires the following mln 
Imum system. 

1 A TRS-80 Level II with 16K RAM 

2 An Expansion Interface with IGK 
RAM. 

3. One or more disk drives, 

4. Any compatible Disk Operating 
System. 

5. An optional line printer. 

Note: Tape version onfy Is Model III com 
patlble, 

014OR(Tap«)$7B.0O 
01B3RD (Dlak) $99-9B 

LABEL 

Are you tired ol irylng to remember 
which line numbers of your program cor 



respond to which routines In It'/ 

Well, Instant Software ha.^ solved your 
problem! With the LABEL program In 
place, you can forget about such trivial 
things and rely on the names you have 
given the routines, Vou can use LABEL to 
keep Irack of these things for you and get 
down to serious prcfjrammlng. 

LABEL allows you lo use labels In place 
of line numbers In GOTOs, GOSUBs. 
IF THENs, THEN EI.SEs, RE- 

SUMES. ON ERRORS, ON X GOTOs. and 
ON X GOSUBs, 

After you finish with your program, you 
can ha\e It converted Into a normal pro- 
gram (with line numbers in place of the 
labels In GOTOs. etcl and execute it In 
computers without the LABEL program. 
Wllh Ihls conversion you have three 
options, 

1 . The labels are left at the beginning of 
the routines, but changed to line numl>cr5 
In the program statements. 

2. The labels at Ihc beginning of the 
routines are changed to KEM statements, 
and changed to line numbers In program 
statements, 

3.Thelabelsat Ihebeglnnlngofroullnes 
are deleted, and changed to line numtjerv 
when In program siatemenLs 

While you are using LABEL lo wrlle 
your program, you can have 11 list all the 
tines which have label Idcnilfiers llo either 
the video of the llne-prtnler|, \'ou can 
search the program for the line number of 
a panicular label, or you ran use It lo 
delete all the lines thai begin with a REM. 

LABEL Is compatible with TRSDOS 2,1. 
2 2, 2 3 and with NEWDOS and Percom 
MIcroDOS. Model I. Level 11, 16, 32or48K. 
0188R (Tape) $24.95 

ONE-D HAILING UST 

Here Is a mailing list system that can be 
nm on only one disk drive' You can have 
up lo 17 fields of selection for iiame/ad- 
dress retrieval. 

Disk versatility allows yoii loadd, delete, 
or change ihc numerous drialls stored in 
the syslem. 

Features of the Onc-D Mailing List m- 
ilvide 

•Automatic name son Iwilh zip rode op- 
tion) 

■Rapid access in any name on file 
•F.a.sy error correction and ntovery 
•Prinls selective name listings. 
'Revise or update listings at aiiv lime 
•I'p (11 2.'j(X) names on lii«- |wilh 4 drives). 
* Prints a list of all names un file 
'I'nnis mailing labels 

This package requires the lollowing 
minimum svstem 

1 A THS-80 Model I. Level II wllh 16K 

RAM 

2. An Expansion Interiaie wllh to 32K 

memory. 

3 A single disk drive (with automatic 
upgrade for up to three additional disk 
drives). 

4 Any compatible Disk Operating 
System . 

0123RD (Dlak) S24.9B 



USER'S TIPS 

rt'he/i uTlUng BASIC piograrns. place Iht- 
most often used routines ni ihe Jront c^ the 
progrnrn This wiU enable the program, to run 
Jasier. 
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utilities 

for your TRS-80 



OTMAMIC I»VICE DRTVEKS 

An- you tired of workini; arountt <ill nt 
Ihf Utile ■obstaclrs" that arc bmlt imo 
your TRS-80? Ever wish that Ihrri- was 
some way lo repair" ihooe 1m[K.-r1cc- 
lions? 

Well. her« it Is! The DYNAMIC DEVICE 
D!(1VKRS package has all of Ihcsc 
features 

PKCXIRAMMABLE KF-Y DEBOIINLE- 
Yout keyboardcanbc tuned" lo your typ- 
ing si vie. 

PROGRAMMABLE REPEATING KEY 
FUNCTION— Every key has a repeal func- 
tion 

LOWERCASE MODIFICATION SUP 
PORT— You have cimice of standard or 
shift -fur- low crease letters. |A lowercase 
hardware modineallon must t>e Installed.] 
BETTER THAN NOTHING GRAPHICS— 
Graphics characters will be convened lo 
the closest ASCII rharacler. 
PKINTER'SCREEN AUTO SWITCH- 
ING— If your printer Is accldenially turned 
off. your program woiil bomb. 
PROGRAMMABLE PRINTER FORMS 
CONTROL— You roriirol the format for 
primer tnitpul 

PROGRAMMABLE KEYBOAIU3 liJCK- 
Only you will know tile secret cixle lo 
unlock your keyboard. 

With the Dynamic Device Drivers pack- 
age. >'()u can look lurward In working 
WITH your TRS-80. instead of against II! 
ModelL Level II. IBK 
0228lt [Tape) $19.95 
OlMRD (DUk) Sa4.9H 



DISK EDITOR 

Disk Editor Is a )Miwcrful marhlne lan- 
guage iiilliiy profjrani Ihal will alk)w you 
tolal a< i"ess to ANY bvie of inlormatmn iii 
ANY wTliir III ANY 1 rack of your dl^As. h Is 
a fasl. siinple. and eflieieni melhod of 
modifying files — wliclher HASIC pro- 
grams. SYSTEM pro^rurns. or Jiisl data. 
All cnnimatlds arc readily accessible, wilh 
no need lo refer in a iinnmand table. 

Wllh Disk F^itorymi can examine, alter, 
add. ;iiul delete inlorinallon with ease. In- 
fomiuliun can l>c rt-lrleved from (he disk 
by supplying track and sector Infnnnalion. 
or by giving the RlesptT You ran even 
searrh llie disk lor a specific siring of 
chararlers lup lo H characters long). 

If Ji-ou need hard<-opy. use the LINE- 
PRINT command lo send a copy ol the 
\-lde<) display lo your llneprlnter. 

You can transfer command from Disk 
Editor to Radio Shack .•< DEIiUG and Iwi k, 
allowing dynamic debugging of disk lyo 
procedures. 

Disk Editor iscoiiipallt)k- with THS^IXDS 
2 1.22. and 23. as well as with Apparai s 
NEWDOS. It is even capable of reading 
disks made by Pcrconi's Micro-DOS 

There are two i-erskins of Disk Editor; 
one Is for a 35-track IXIS. and the oilier is 
for a 40-irdck IX)S Hnih are ineluded in 
■ his package. 

This jMckagc rcqtitres Ihr ftriknving 
minimum syslcni. 

1. ATRS-80Mo<lrll. Ij-vcl II. KiK RAM. 

2. An Ex|)anslnn Interlace. 
A A single Disk Drive. 

4, Any compatible Disk Operating 
Sysleni 

lO • Instant Software 



(Disk Editor i^ not compnlible with 
VTOS ,1 O). 
OlSORD (Disk) $39.98 



MASTER DIRECTORY 

Wasii 1 il Jii.st vesterday you threw the 
(ill iiiio the wasliing machine Ix-causc yon 
were Irustraled ;il not being able to lliid 
Ihal Adventure thai you saved on disk last 
wifk? Or. was il Just yesterday ihai vou 
lorcc-led that Irfiover Iiol lamale sauce In 
your mother Ill-law because vou had 
searched in vain lor vour baikiip (opv o1 
the Electric Pencil? And you say your 
I hre<' year-old btilll a house □) eai^soul ol 
yinir carcfull\' filed business data disks 
and now you don t know which is which'' 
Well, chill up. lUickv. causi- MASTER 
Dl RECTORY IS herd! 

Ihe MASTER DIRECTORY is a disk file 
slorage pro^Bin Ihal reads the liles on all 
your disks, stores llie file names and ex- 
IcnsKins. and even records ihc lice space 
(HI each disk. All you have lo do is number 
the disks in your library and Ihc MASTER 
DIRECTORY will ki-cp track ol their con- 
Iciiis You can rciid the names, ilisplavcd 
alphabetically, si-iirch the D1RF:x:TORY for 
lllc names and e.ilensions. delete disk.s 
and search for Iree space Yim can store 
50<X) files or 321) disks, whichever comes 
tirsi 

Your disk storage problems are over 
now thai the MASTER DIRECTORY is 
liere. Model I. Ix-vel II. 16K HAM. Expan- 
ston Interface plus 1 disk drive 
OOOBRD (DtskI $29.95 



DISK SCOPE 

Need lo check iHil a disk? Perhaps you 
want losec how the tiles are stored, or vou 
lorgoi your password No problem! Now 
yoii've got Disk Scope' 

If you know iIk- name of the file, the 
FilekK- program will show von w hat tracks 
and se<toi5on ilie disk contain that file, as 
well as how much niemor\- Ihc lile takes 
when loaded uilo RAM. Thi.s works lor 
Imlh program and daia liles. Klleioc ihen 
allowsyou toprlni the Infomiaiion. reslail 
the program or exit lo BASIC'. The infor- 
mation obtained allows vou lo use the 
(DISK program Hlcctlvelv 

CDISK is a powtrtul litlle HASH' ulllily 
and tes( prt^ram II will allow vim to \icw 
any track and seitor on vour disks in 
ASCII, Hex and .screen POKEs It totallv 
disregards prolei tlon codes It can also tx- 
vised to randomly check all 3!iO sectors ol 
>our disk for read errors. 

Yon don't know the whole lllc name if 
yiHi haven't gni ihe password, so the 
PA.SSWORD program has been Included 
in the I>isk Scope package. This machine 
language ullllly iiol only gives you a 
password for files, but for the whole disks 
as well Whctheryou'reanoviciorapro. il 
yon usi- a disk system, vim iirt-d Disk 
Si'opi-. 

This package requires Ihe foiknvlnjf 
mintimim system' 

I A TRS-80 Mixlel 1, i>-vel II. IGK RAM. 

2. An Expansion Inlcrface. 

:i A-singlcdl.sk drive. 

4. Any eompaliblc Disk ()p<ralinB 
Svslem. 

oiasRDCDUkisio.es 



TLDIS ft DLDI8 

You've biiughl a super machine-code 
plXlgiam. but now wonder how it works 
'Maybe you even used a qukk PEEK rou 
tine lo glance Ihroiigh it when II was In 
memory. If so. you definitely noticed Ihe 
complete lack of comments In the code. 
making It almost Impossible for you lo de- 
cipher and undrrsland li. 

Well. InsianI Software's i-abellng [>Kas 
scmblers are Ihe answer lo your jwoblem. 

TLDIS I Tape- based Labeling DISassem 
bier) and DI-DIS (Disk based Labeling D!S 
assemblerl make three passes to assign 
labels (where appropriate) to the routines 
in a machine -language prt^ram Their 
output Is almosl Identical lo Ihal of a hand- 
assembled source code 

You can wnd the disassembly lo a llne- 
prlntcr (Radio Shack parallel port) for 
either TLDIS or DLDIS. (The difference be 
Iween these uttltlles Is the storage mode of 
Ihc disassembly.) 

TLCH5 can send the disassembly lo cas- 
sette tape. DIJMS can send it lo disk: both 
send it to the video monitor. The stored 
disassembly from TLDIS may be reas 
sembled with Radio Shack's ED 
TASM^M-ihe disassembly from DLQIS. 
With Apparafs extension of EDTASM^"*^. 
Because of the use of labels. It is a simple 
matter to change any object code program 
by disassembling il and then making 
changes lo the rcsullani source code, wlih- 
oul losing track of Jump/load addresses. 
Labels start with "AAOO" and Increment 
up. In even numbered steps (AA02, AA04. 
etc ) The odd numbers (AA01.AA03, etc ) 
arc left for you to use for the source code 
during reassembly. 

The printing of the disassembly may be 
temporarily balled by using ((SHIFTJI & 
(]ust as In HASIC) or II may be ended by 
pressing the ((BREAK)) key II also has a 
comments column to display ASCII char- 
acters used in a LD or CP opcode. 

TLDIS and DLDIS may be relocated in 
memory to avoid conflk'l with the pro- 
gram you disassemble. 

The nexl time you need to 'climb 
Inside" a machine-code program, lake 
DLDIS or TLDIS with you We promise 
Ihal II will l>e an easier Journey. Model I. 
Level II, 16K; Model III. IfiK. 
0230R (TLDIS-Tape) S 14.9H 
0331RD(DLDI3-Dlak) S19.9B 

RENUH/COMPRES8 

Add a new command to vour TRS-80! 
RENUM/COMPRESS nts in the top 767 
bytes of memory and you call ii like anv 
BASIC command. 

You forgol an INKEYS routine and 
Illerc's no sjiace for a new line number? 
The comm;iiid allows you lo renumber 
your BASIC program. You can set the new 
Stan ing line number and the Increment or 
(like any good commanrtl il will delault 
automatically to standard v^ilucs. 

^'ou Ihink memory is going lo be lighl'" 
This crmimand allows vou to compress the 
program Instantly by removing KF,M 
statements and any spaces outside ol 
quotes! 

If you're a HASIC programmer, this Is 
the one utility you should have loaded and 
ready to go! Add Ihe command: RENUM/ 
COMPRESS' Note No! disk compatible 
Model!, Ij-vil II. 16K. 
0133R[T«pc) $14.95 



mv 

IRV.oncoflhc most powerful utility pro- 
grams a\ ailable. turns vour keyboard into 
aSLPERKEYHOARD 

.\ow vou can have single key program- 
mttig IRV comes compleic with its own 
keyboard deimitlons. or up to 255 charac- 
ters can tie assigned ioever\- kev. includ- 
ing lENl ER] and (HRKAK]. You can enter 
oflcn used BASIC words, variable luunes 
or even entire lines Even functions, such 
as RUN. LIST, or EDIT can be entered with 
a single keyslroke. 

The relocate leature ol IRV is uniiiue. m 
that il alkiws single line rekicalMMi and 
rcnumlx'niig. You ran merge lines using 
the EDIT lunctioii and a single keyslroke. 

As .1 video editor. IRV is so powertul. 
vou'll wiiTidcr how vou got along wiihout 
it. Full cursor control, blinking cun»or, 
block movemcnl and special crasi- limc- 
tioiis ate ]ust the lieglnnlng. Frctjvienily 
used ildeo graphics blocks can hi- saved 
and used again and again. Even IHVs 
minor virtues are Impressive. You can 
have auto repeat wilh iuiy key, including 
progr.li I II lied funclions ^'ou wool have to 
pull plugs or liddle wnh a i-ontrol box lore- 
wind or lasl lorward a tape. The casselle 
recorder lan be controlled from Ihi- key- 
board. 

If ynii are a creative programmer lor 
wish to Ix'l, you need Ihe power and conve- 
nience ot IRV! Tape version. Model 1, l^vel 
II. IBK Disk version. M.xlell, Level II, 16K. 
E.xpansiun Inlcrface plus two disk drives. 
035OR (Tape) $24.95 
035ORD IDlBk) $29.95 

COMPRESSION UTILITT PACK 

Dii yiiii wan! lo add sound rounncs lo a 
Space Trek program Ihal alreatly uses 
16K? Or maybe yon need an cAlra column 
In thai lliianclal rcjxiil program, but when 
you run ii, you get OM errors? 

Wilh a wave of vour hand, and a little 
help iriHii either ot Ihe COMPRh:SS10N 
programs in this package, your problenis 
arc o\'i-i . 

C0MPKESS-80-Fits in 265 byles. 
delcles spaces, and offers the choice of 
leaving HEMark line numbers in the pro 
gram, or deleting Iheiii allogelher. 
SUPERCOMPRESS-Llses 767 bytes and 
can do everything COMPRESS-80 ciui do 
PLUS, II packs Ihe program Into the 
smallest possible number of multiple 
slalemcnt lines 

Wilh Ihe Compression Utility Pack and 
your own programming skill, you can add 
all ihos*- little extras lo vour BASH pro- 
grams Model 1, Ixvel II, I6K- 
024eR(Tftpc)S19.Sfi 

THE DISASSEMBLER 

This Is a single-pass, hex -notation disas- 
sembler that will send Its oulpul either to 
tape or lo a llneprlnter (Radio Shack paral- 
lel port) The tape output is directly com- 
patible wilh Tandy's EDTASm''"^ Thus, 
you can take an objecl code tape, disas- 
semble and output It to tape. Ihen use ED- 
TASM''"" lo add, delete, change and even 
re-assemble your new version. 

In addition. II ^ows Ihc dlsplaceinenl 
and absolute address ol any relative Jumps 
made by Ihe disassembled program. It also 
displays any ASCII characters used In an 
LD or CP opcode. 

Since Ihe Disassembler works only on 
in-memory programs, it has been made rc- 
locatabte so that you may move it around 
In memory lo avoid conflict with the pro- 
gram you wish to dlsa.saemble. As an add- 
ed option, you may also Jump to memory 
locations and transfer control Ijeiween 
Dlsassenibler and other utility programs 
In your computer. 

The Dlsa-ssemblcr— use II to examine 
and analyze any resident machlnecode 
prc^ram' Model I. Level II. 16K: Model IH. 
I6K 
0232R (Tape) $9.96 



PKOGRAMMER'S PKOfER 

Sometimes thousands of words can 1 
give a clear picturrof complicated Iheortes 
and roncepis. There are times when a 
rharl or picture is worth those kilo-words, 
and more! The novlrr romputer program- 
mer Is offered this breath of fresh air In an 
otherwise stuffy situation — the PRO 
GHAMMERS PRIMEK 

This program functions as a Computer 
Aided Instruction package to Introduce 
the novice programmer to several Impor- 
tant computer concepts. It graphically ex- 
plains the relationship of decimals to hex- 
adpclnials In the Decimal: Hexadecimal 
C'onverslon routines. Data storage Is ex- 
plained with the Subscription of a Variable 
and Three fMmenslonal Arra>' routines 
The logic of prograni How is shown In the 
For-Ncxl Loops flow chart demonslralion 
Finally, the ^hble Sort sorting technique 
Is shown, in a fascinating display of what a 
i-ompuler does best. 

Don't be a "scratch your head m 
wonder" boy aiiy tonger. Let the PRO- 
GRAMMER'S PRIMER package from In 
slant Software help you on your way down 
the primrose path of programming? Model 
I. l,cvcl II. 16K; Model III. 16K, 
034BR(TKpe)99.9B 



PR(X>RAMMER'S CONVERTER 

This package contiuns three prograni^ 
that can aid you m coniertlng to other 
number-base systems. 
IJASECAIXULATOK-Tuni vourTRS-MO 
inlo a calculator. Luiivert numbers to aiiv 
basf from 2 through Iband perform caltu- 
laiions in that base Mtinor>'. sign cliange. 
one B and Iwo's complement are all avail 
able li will even handle iraclions. 
HKXADECIMAL/DKt IMAL CONVEH 
SIGN THAINING-A dual purpose pro 
gratti. First. Us a handy converter that 
changes decimal numliers lo hexadecimal 
notation land vice versa). Second. Us a 
tedching/tesling prograni thai gives you 
practice in making those conversions 
yourself 

NUMBER UASE fONVERSIONS-Con- 
vens any decimal, binnri' octal, or he\a 
diTitnal number (up to SFFFFl. to its 
itiuivaleni value in Ihe other three l>ast-s 
and displays all lotir values simultaneouslv 

Ynu II have a command of octal and ht-.\ 
luMailon— instant Iv' Model I l^vel U IBK. 
Model IIL I6K. 
OOSSRITapclSS.QS 



ULTRA'MON 

Ul.TRA-MON Is a unique and powcrtul 
machine-language inonllor. It Is ROM in- 
dcpcndenl and will iiinctlon in Level II or 
IXe BASIC with ULTHA-MON. you will 
Ix- able to write. ni<Kllfy. study and debug 
lUHihlne-language programs. Plus, voii 11 
be able to avoid the frustration and 
"bomb-outs' usually associated wiih 
machme-languagi- prngramming. LL 
TKA-MON displays, disassem tries, traci-s 
iliardcopy trace disassembly. looN, 
mixliries, relocates memoTN', prints and 
rvrn relocates its<-ll with simple com 
mands. Using interpretive execution. 
ULTRA MON allows you to put brrak- 
[Kilnts In ROM. This [>owcrful monitor can 
even letch, decode, disassemble and 
analyze each Insiruriion Individually so 
thai your program cannot bomb out, 

Ul.TRA-MON Is designed for Ihe begin 
nmg machine- language progr'-jnmer as 
well as the professional The documenia- 
Hon conlalns a Simple Demonstration si'c 
Hon geared to the novk-c. Consequently, 
the program Is a learning device as well as 
an extremely useful programming tool 

II vou are serious alxnit programming. 
you need lo add this powerlul utility to 
your ilbrarv- today Model I, Level 11. 16K 
S0O3R ITkpe} S34.9S 



Education 
for your TRS-80 



TEACHER'S ATOB 

Now you can have the benefits of Com 
puter Assisted Instruction (CAD In your 
own home. The Teacher's Aide program 
will let you create a teaching system fm 
any conceivable subject The program 
allo*-syou tooreair a question and answer 
lesson {you can inpul up to 8O0O charac 
lers per lesson). Yo<.i can then save Ihls 
lesson on the disk and create an entire se 
quence of lessons. 

Your lessons can be tailor-made for vou 
or your students. The options available 
are: 1 1| Review the material prior to taking 
the lesson. (2) provide hints to help answer 
questions, and (3) offer a graphics display 
asarewardfor correctly answering all the 
questions. The Teacher's Aide program 
will even allow for spelling errors! 

Teachers Aide Is perfect for parents. 
teachers, and students who nerd the 
unlimited patience and undivided alien 
tlon that only a computer can provide, 
Readin". Rltin', and Rlthmctlc will never 
be the same— now that you have the 
Teachers Aide package from Instant Soft- 
ware, Model I. Level II. I6K. Expansion In 
terface -• one disk drive. Recommended 
for teachers and parents. 
0ai4RD(Dtok|839.SB 



RECENTLT REVISED— 
NOW BETTER 
THAN BVERIM 



TTPING TEACHER 

A comjriete seven pan package that 
guides you from familiarization of the 
keyboard through typing words and 
phrases to mastery of touch-typing. Your 
video monitor becomes a bottomless page 
for typing practice, and vour own pnvate 
TYPING TEACHER, ready to leach when 
voti re ready lo leam. Model I. Level II. 
I6K: Model III. 16K 
0099R (Tape) 6 1 a .9B 



GIOORAPHT EXPLORER: USA 

The Geography Explorer: USA package 
Is the most la.scliiating (and least painful) 
way of learning social studies Ihal wr ve 
seen yet. 

The program displays computer gener- 
ated maps of the United States. Its seven 
regions, and Its individual states. The stu- 
dent [hen answers questions about the 
states ol a given region. These questions 
may be In Multiple Choice. RecognUlon or 
Fill-in format 

You can learn each states name, capital. 
largest city, nickname, population, popu- 
lation rank, population density and per- 
centage in urban areas, the state's [lower. 
bird, tree, song and motto! Furthermore. 
Geography Explorer hasa unique TEACH- 
ER mode which allows the teacher or par- 
ent to choose mulllple options of how the 
material Is to be (resented This permits 
directed leanUng lor the student. 

The package la also Just plain fun' When 
the student answers the questloiis correct- 
ly, there are a variety of graphic rewards 
that flash on the screen to provide Im- 
mediate, positive reinforcement 

As a bonus, this educational package 
can use a compatible Light Pen! The Light 
Pen can be used to respond to the MENU or 
lo answer mulllple -choice questions: 
simply point to the Hashing square of your 
choice. (If you do not have a Light Pen. or 
you prefer not to use It. all responses can 
be entered from the keyboard.) 

The union ofsophlstlcaled software with 
the speed and novelty of Ihe Light Pen rep- 
resents a milestone In Computer Assisted 
Instruction As advanced as this package 
Is. It can be readily used by grade -school 
students Truly. It Is educational software 
for any age 

We think you'll be equally lmprrs.fed 
once you've explored these United States 
with the Geography Explorer Model 1. 
Level II, 16K, Expansion Interface . one 
disk drive Light pen optional Recom- 
mended age level six to adult 
007 IRD (DUk] $49.95 



ULTRA-MON AND MODEL m 

L'ltra-Mon Is compatible with the Model 111 computer with this short line^nt patch 
Enter the listed code at the designated address. The program must be located al Us 
original loading address. GEOO. 

PUSH Hl- 

PUSH AF 

IN A. (oram 

BIT 5.A 

JR z 7bc:aii 

BIT 7. A 

JR NZ. 7BC0H 

POP AF 

OUT lOFBHl.A 

POP ML 

RET 

NOP 

NOP 

To enter Ihe program from Ultra- Mon's register display irKxle. I y pc the following se 
qucncc (s denotes space barl MM7BBE s E5 s F5 s DB s F8 s CB s6F s 28 s<M s CH s 7K 
s2OsFesFlsD3sF8sEIsC9s0OsO0 (enlcrl. 

Your printer will now operate noniially. Please note that this patch docs not check 
to sec if there Is paper In the printer 

In addition, the documentation desi-nbes 6CC as the way to go to basic Model III 
basic IS more eilectively entered from locallon 1A19, Where the documentation sug 
geststhe command E6CC.4I8E |cnlcr|, you should type E1A1H,418E. 



7BBE 


E5 


7BBF 


F5 


7BC0 


UBFB 


7BC2 


CH6F 


7BC4 


28 04 


7BC6 


CB7F 


7BC8 


20 F6 


7BCA 


Fl 


7BCB 


D3F8 


7 BCD 


El 


7BCE 


09 


7BCK 


00 


7BDO 


OO 



.SAVE HL 

:SAVE AF 

,GET PRINTER STATUS 

:I'HINTER SELECTEly 

SKIP IF NOT 

: PRINTER BUSY'' 

:1.00PIF1TIS 

,GET AF 

:3END A TO PRINTER 

^RESTORE HL 

:RETURN 



SURVETDR-B APPRENTICE 

This program makes applied math fun? 
Actually, wr use the concept ol area every 
da>' You l)ii>' land by the acre, rent office 
space by the foot, and buy advertising 
space b> the column-Inch The Surveyor's 
Apprentice can teach vou Ilic formula 
used to find the area of any plane figure 

Programs cover rectangles, circles, 
triangles, parallelograms luuliiding both 
rhomtnids and rhombuses) trapezoids, 
and polygons This ihrccpati package 
displays on-screen diagrams of all ihc 
figures, glvis Ihe formula lor the' area of 
each figure, and even gives you examples 
of compula lions. You can even request a 
quiz to see how well you're doing 

Here's an excellent refresher course for 
people who use calculations in tlieir work. 
Why not liroaden your area ol t'X]»enise 
wilh ihe Surveyor s Apprcntlii-! Model I, 
Level II, IGK Model 111. 16K Rreommend 
ed age level Jr High lo adult 
0127R(Tape)S9.95 

BEGINNER-S RUSSIAN 

In order lo understand a foreign ciilliire, 
you must know Us language In ii)dav's in- 
lemalional politics and commerce, one of 
the moKl valuable languages to know is 
Russian. The Beginner s Russian [tackagc 
can put you well on the road to learning 
this vilal language. 

The three programs in this pwi kage will 
give you on-screen displays oi the ("vrliiir 
letters, detailed instructions on (heir prop- 
er pronunciation, and cxcrciws that will 
have you recognizing and speaking simple 
Russian words. 

This [lackage Is Ideal for students, busi- 
nessmen, scientists — perfect liir ;uivone 
who IS interested in learning Ihe Russian 
language Model I, Ij-vcI II, 16K, Minlel 111, 
16K, Rci-ommcnded age level lOtoaduU, 
013eR(Tape)S9.9S 

EVERTDAT RUSSIAN 

This package is the second in Insiani 
Software's Russian language si-ries. Ev- 
eryday Rus,slaii will acqttriint you with the 
words for various foods, j)lac-cs lo cat. 
signs, and Ihe names of stores -exactly 
whal a traveller needs to know. You'll also 
leam the order ol Ihe Cyrillic alphalwt. 

Each of the three parts in this pack;ige 
will not only leach you Ihe words bui will 
also present you wilh a qui? as well. Jusi 
pick the words you want to work on 1 he 
computer will score how well you've 
learned your lesson. 

You can even practice typing in Russian. 
The program will allow you to type in the 
letters, or words, using the complete 
Cynllic alphabet. Practice writing words 
such as hold names, tourisl attractions. 
and st:et-l addresses. 

Why be deaf and mute when laced with 
the richness of the Russian language? 
Discover it for yourself with the Everyday 
Russian package. Model 1. U'vel II, 16K; 
Model 111, 16K. Recommended age level 10 
lo adult. 
0137R (T>pc| Sg.SS 

RUSSIAN IH8K 

Beginner's Russian and Everyday Rus- 
sian are available together on disk .Model 
I, Level II, 16K. Expansion Interface ♦ one 
disk drive: Model 111, 16K 
0312RD (Disk) S24.es 
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Games, Simulations 
and Entertainment 
for your TRS-80 



AIR FLIGHT SIMULATION 

Alt fright riil^hl be more likr ii' liiMni- 
mom taki-oOs jiid landings arr no pic nil 
-isk Hnv pilcil — and Ihls compiiln ?ilniiiLi- 
lion IS conalii lo keep you on (he ^-dgl■ ol 
your seal. 

Yoii 11 fcrl (he ddretidlin (lowing, which 
ancnints for Ihc gri-dT popuUrllv i>l flight 
slmiiUlKin Men--. .1 proerdm Ihai pro 
vkies ^ real siiisc ol acioniphshnirm as 
voii pn)Krrss IroTii UikeofTs [o Tallsplob ajid 
from landings 10 loops 

Von txKin wUh .\ lull tank ol gas and a 
llLghl plan Ihiil calls for a simple lakeoll 
and lanclliig — at leant uiUll you get Ihe 
hang of ll I'av elijse attention (o vniir lii- 
slrvinienl pjuHi. rs(iei'lally tfle angle ol a.~ 
ecnt/hank Indlcalor and air speed liidlca 
lor— lixi sleep ii Ijank and vour air spi-eil 
wUI drop like a s!r>ne and so will vo\ir 
plane 

lis about as close lolhr real Ihlnfjasyou 
ran gel this side ol a runwav: and onee vou 
gel some lllghL time under vour bel\. Ihe 
sk\ s Ihe llmlL You lan use the progiaiti to 
fly a course against a map — even try v'Hir 
hand at at roliatic maneuvers^ Kiin foi (lie 
wh(.le lamilv M(Klel I Level 1. Model I. 
Le\el II, KiK Model 111 16K 
0017R(TBpel SB.BS 

ALIEN ATTACK FORCE 

[Fiinncrlv liuadrrh; 

TIh invaders arc coining' ^:.^^th■s lie 
Tenses are dead ciitj): for vour l^iser l>.ise 
VniJi" asslgiiniMil is lo deslrov tlie ap 
prcMchlng MAt:N AITACK FORCK l«l<ire 
it di-slroys K^irth Before Karlh s ■v-nsois 
failed, they [Iflected 550 amied Invaders 
111 space, sjici'ding loward us in 10 attack 
lornirtlions nl bb In each group The sen- 
sors d<ieclc(l (<Hir differenl types of attack 
era/t l-arge Medium Small, and a short 
profile erafl n'hlch is the most dlflicull lo 
deslrov. 11 ycni eaimol stop these space at- 
lackers (hey will stop Earth (or gixnl 
Mort'll l.<Mlll. I^K Model HI. IHK 
0240R(Tapc)S9.95 

BALL TURRET GUNNER WITH SOUND 

Tor veajs ttie I'eiro Resource ("on- 
glomcrjle has allai ked our photon (i>lle( - 
tlon st.ilions and strangled our decp-S|)ace 
trade rcni'is Ibi- I'HC E.xxonerator ("lass 
light fighters (codi- name: Gnall have Ix-en 
their main weajMin Now you can strike 
back, by |nlnln)( the Ball turret Gunner 
Senlce 

Itnagini- yoursell at Ihc (.-ontrol console 
nt an LW-1417 Stratoblazer [Type H Slra 
tfgii- Ijisei Weapon) Your Hindsight I)i 
rector inliimis vou Ihal a Gnat lighter is 
roming In foi ^m attack Vou ptvnl vour 
gigawalt lasir turret until you i an see the 
target on youi monitor The Range Indica- 
tor shows him cwnilng in fasl The Target 
ingC'ompiiler studies his eovjrse and speed 
as vour linger leris«-s over the firing key 
Vr>u know ycm 11 have only a fraction ol a 
second in which to react. The C.iiat 
lighter s evasive maneuvers cause htm to 
dance In your slglUs Suddenly vou see 
the FIRF. crHnniand and you react instlne 
tivclv Vimr l;Lser beam lashes on! and re 
duces the Gnai to an exjxvndlng lull ol 
Ionized gas. Mission accomplished' 

Ball Turret (ninncr. with yoiir choKi ol 
rnulliple levels of illlTlcuky. optional siiund 
effects and su|n-ib graphics. Is more than 
lust a game ll s an adventure Kxi>eririiie 
It' Mo.(.-l 1 I.e. I 11. 1I3K 
0051R(TBpcl 89.95 



JET FIGHTER PILOT 

The Jei Fighter I'llot package lakes vou 
as close lo real c(nnbal flying as possible 
without pulling Gs. 

In this brlltlantlv reallslle simulation, 
you become the pilot of a high perfor 
mam-e, twin turlii>|et Tighter. TolaUontrol 
i>f the aircraft Is yours 

At the Stan ol vour mission, you II go 
through an entire engine slarl prcnTdure 
before your flight (provided your ground 
mainlena nee is up to pari Vour takeiiti will 
l>e from cither the deck of an aircraft lai 
ner [via a steam catapult) or from an air 
field. 

All controls res[x>iid Ihc sami- as thev 
would on a real Jet lighter. You'll lia\e lo 
constantly monitor ycnir display and make 
adjuslmenls to your throttle, flaps, rudder 
arid air spoilers You decide when lo 
retract flaps, landing gear and releasi' the 
auxiharv luel drop-tank.* 

Your onboard navigational computer 
will direct vou lo your selected airport The 
Glideslope/Localizer Informalinn will aid 
you in approaching and landing on an air- 
craft tanier deik or airfield 

The Weapons toiitrol Computer will 
arm your missiles, provide you with the 
range and bearing to a target, and Lell vou 
when to attack And. it things should get a 
little too hot, vou have an e|ection seat 
command Ini egress 

Ftw a carrier based landing, you II have 
lo deploy yoiii lall fioc)k. For a land bas<-d 
landing, yinrll need reverse thrust and 10 
deploy your drag chule 

After you've flown a few missions wllh 
Lhe Jet Fightir i'llot package, soull know 
vouve earned vfjui wings Model 1. Level 
11. 16K Model 111. IbK 

01B9R (Tape) $14. 9S 



SWAMP WAR 

Nour (fornHTlv I Irusly ship. The Srellar 
Spaniel h.is UinilnTed us last Ughtvear 
.^n imfonunatr' eiuounler with a neutron 
star has damaged vour hyperspace drive 
you are stranded on a water-cove red plan 
el. Fortiitialelv vou have managed to 
make II to one ol Ihe nine adjaecnl islaniK 
I hat com [lose I his world's only drv laiul 

On each islanil you discover tlie re 
mains e)f an earlier landing parly Ap 
parenlU . tliey wen- wl[>i-d nut before tliev 
could finish building their supply [r;ins 
porters A hilef izispi-ction reveals thai 
eai ll may salely transport you as far as oni- 
o! Ihe other Islands 

There Is evidence ol all sons ot re()tilian 
hie— some small, some rM)I 50 small, and 
some INTFl.l.KiKNT' You have ^n imeasy 
feeling Ihat your so)oum here may iir>' tji- 
entirely without Ini idem This leeling 
is transformed to Lerror when vou (iiid 
yourself suddenly surraunded by siipli'nt 
swamp creatures shouting at you 

Vour only ho|>e is 10 use your mairiii- 
nance drolds lo col lev t all the t^ansl"orIrT^ 
and lo clear Ihe Islands of the swamp crca 
lures Duck, dodge, shoot back dowli.il 
you musl— bul survive the Swamp \V,ti" 

The Swamp War program Ineludi-s laii 
able levels ol dlftn ulLv aulomalic siore- 
kccping and last pai ed graphiis »llh ri)) 
lional sound ellecLs Model I, i^yel II, KiK 
Model HI, mK 
0312R (Tape) $14.95 



DANGER IN ORBIT 

iFormerlv Asleioid) 

DATE 2S 02.2017 

LOCATION 270 million miles Irnm Tena 

MISSION Maintaining Terras Spaie 

Lanes 

Briefing will follow 

1 1 Your mission is lo destroy any 
asteroids In your srilor and to prevent 
alien spanrraft from Inliltrating lhe Ter 
ran Defenisr Network 

1,2 Your ship is armed with an aiill- 
malter cannon Vou can shoot laige 
asteroids, hui this uuns them Inio many 
smaller aslcmids. each capable of dcsl rov- 
ing your ship 

1 H In addlllon. .illcn ships can make In 
stanianeous hy|*ers]xii-e Jumps Inio your 
area and slarl firing on \ our ship 

1 4 VoviU need lightning reflexes and 
nencs of sIitI to sunlve DANGER IN OH 
iilT We have no use lor n on -sun' Ivors' 

DANGER IN OHIHT, a real time, ma 
chine- language game, teaiiires variable 
levels of difficulty, superb high-sjx-ed 
graphics, soimd ellivts and autnniatic 
91-orekeeping Tape version Mixlcl 1. l^vel 
ll 16K. Model 111, IGK Disk version Model 
l.l.fve!ll. 16K, Expansion Interlace . one 
disk dn\e 

0237R (Tape) $14.98 
0247RD(Dlak)$19.BS 



AIRHAIL PILOT 

Picture lhe Pony Express with wings — 
that s Airmail l'ik)t' In place of hostile 
tribes and highwaymen the pioneers ol 
Ihe airmail routes ta< ed other dangers 
They fought treaeheriHis winds and Iher 
mals sudden stomis. and a conslant bat 
tie with time All ol this to prove early 
airmail service was dependable and 
worthwhile 

Here s a program llial lels you gobai km 
time to the early davs of aviation Vou 
must fly Ihe mall hum Columbus to 
Chicago Your .Jenny, a cloth-covered bl 
plane, must take you through unpredli t- 
able winds and electrical storms. The on 
iKMird clock will lime vour tllghl Ycxi must 
get the mall through In the shortest time' 
[Hissible. 

It's more Ihiin a game. You become lo 
tally Involved In your [jiission Nol only K 
your repulatifjn as plbil at stake, lhe tiilure 
of Airmail — lhe ^xiM new arm of the [xisial 
sen.li.-e— ndes with vou Model I, !^\el 11, 
16K. Model HI. IHK 
010eR(Tapc)S9.e5 



DR. CHIPS 

Wheii (he [iriiblerns o( your world begin 
iti pile up, you lan now turn 10 vour i)wn 
livingroom jwyihlainsl — DR CHIPS 

The good IVicIor Is there whenever vuu 
need him Wrr as long as you need him. He 
may not solve anv ol your problems hut 
were sure you'll be amused ai his 
responses 

Why shoulder Ihr burdens of [lioderrr 
lile in silence'' Put your TRS-80 and I)H 
CHIPS to work lod.iv and fiel It all i>fl vour 
(hesf Mtxie] I Level 11 16K Mrxlel 111 
16K, 
0218R(Tap«| S9.95 



FLIGHT PATH 

E.\penence all asjiects of modem avia 
tion with FLIGHT PATH 
MOLINTAIN PILOT Transforms you inio 
a danng bush pilot as you fly tiadly needed 
supplies to a remote gold mining camp 
You musl cross a hazardous mountain 
range while siniggling with headwinds, 
tncky navigation and diminishing fuel 

Watch vfHir airspeed, altitude and rale- 
ot-( limb or you could stall and crash 11 vou 
deliver your supplies, you must then re- 
turn over those mountains with a heavy 
cargo of gold bullion 

O HARE — A control lower simulation In 
w Inch you beciHiie an Air Trafllc Control- 
ler You are ri-s[)oiislbli for hundreds of 
human lives, as you guide the aircraft 
through yout conliol sntor to a sjife 
landing 

You'll have to deal with dlflcrent aircraft 
require me nls. wind ctiange warnings and 
potential midair coIIIshhis. But no matter 
wlidt happens, vou musl bring in each of 
the 20 aircraft In youi tour ol duty. 
PRECISION APl'HOACll KADAR— Com- 
bines Ihc skills of pilot and Air Traffic Con- 
Iroller You l)ei~ome the pilots' eyes' as 
Ihev lr> to land in limited visibility i«ndl 
lions. Your commands guide the aircraft 
In Its approach to thr- tif-ld and a safe 
landing. 

The fllghl palh [tickage involves you 
111 both sides ol tllghl pm-edtire, from 
tlic thrill of flying to the leiisc draina ol air 
trallic control. Model I, ly-vel ll. 16K; Model 
HI, I6K, 
017IR(Tape) S9.9S 



THE FLYING CIRCUS 

lhe Flying Ciri us ()a< kage coders the 
liHI larige ot flying frcHn old time biplanes 
lo modem day air iralhi control These 
seven progranis ofler vou the daring 
realism of High! 

AIR FLIGHT SIMULATION -Allows vou 
to learn and practice Ihe esiscnttals of 
plloling 

NIGHT FLIGHT A nighttime pholo 
rei.onnaissanci- mission 

AIRMAIL PILOT Relurn to Ihe early days 
of aviation, where lis ]uh! you and vour 
aircraft againsi the elemiriTs 
MfMINTAIN P11.0T-ny lo a remote mln 
log carnp with desperately needed 
supplies. 

O HARE— Transfonns you into an air traf- 
fic controller 

PRECISION APPROACH RADAR-Re 
L|uires the skills of Ixjth an air Iraflic con- 
liullei and a pilot 

JET FIGHTER PIUH - lakes you as close 
10 real combai flving as possible wilh- 
oul pulling Gs You liei-oine Ihc piloi of a 
twin lurbo-jet. supersorric fighter Total 
lonlrol of the airi rail is vours from 
Udtcofls to landings 10 launching vour 
inissilcs and destroying the target. 

YcMr dream of flying tx-i-omes a reality 
with The Flying Circus package Model 1. 
U-vel 11. lek. Expulsion Interiace IbK ft 
one disk drive 
020SRD (Dlak) $39.99 



HOUSE OF THIRTY GABLES 

Giild and trr-,isurcs ten ipnis all. bul only 
lhe slout of b<arl and switt ol mind should 
allempt a trek through the legendary 
Hou«- of Thirty (iables f o bi- alen is 10 he 
sucn-sstnl against llie strange array of 
creatures land othei terrrjrsi waning 10 end 
your quest lor riches Serpents and trolls 
arc merely minor obstacles m this dun- 
gi'on of mvsler\' 

^ ou make your way through ihest dank 
tialls by typing two wnrd commands, such 
as GO WEST. HEAD S1C;N THROW AX, 
etc 'lou'll flnrl v.irious objci is along vinir 
way — some ri( whn h vou niav need In 
order 10 solve Ihe problems endemic trj 
this enigmatU' residence. 

Lest you fofgei, (here are heaps ol 
In asure lo Ix' hail lor the adventurous and 
iially explorer Howevr-r, the real reward 

i.s lhe pird.surr vih; will ha v t* by ou I willing 

lhe sinister inhabitants of the HOCSE OF 
1HIRT'1'GAB1.F_S' Mixlel 1 U-vel II, If^K 
02 19R (Tape) $9.95 
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COSmC PATROL 

Skilled players soon master many dllTi- 
cull computer games, but COSMIC PA- 
TROL Is In a world all its own. The chal- 
lenge intensifies! Supporting graphics and 
sound (optloilall make each encounter an 
exciting new experience. It all adds up to a 
Super 3-S package ... Skill, Sight and 
Sound. 

Scenario: The COSMIC PATROL pro- 
gram puLs you In the command chair of a 
small interstellar patrol craft. Your mis- 
sion Is to defend Terran space and prey on 
the Quelon supply ships which carry es- 
sential parts and kibrlcanls tor that im- 
placaijly hostile robotic force. The drone 
freighters are fairly easy pickings for the 
aceomplished starshlp pilot, but beware of 
the 1-Flghter escorts. They're armed, fast 
and piloted by intelligent robots linked to 
battle computers. Tbey never miss. 

The Cosmic Patrol program is not Just 
another search and destroy game. With Its 
fast, real-time action. Impressive sound 
option and superb graphics, this machine- 
language program Is the best of its genre. 

Don't keep putting quarter after quarter 
into arcade games or spending big bucks 
for video game cartridges. Get COSMIC 
PATROL from liislaiil Software— and gel 
the best for less! Tape version Model 1, l^v- 
elll, I6K; Model III, I6K. Disk version Mod- 
el I, Level II, I6K. 
0223R(T*pe)S14.e8 
0224RD (Dlak) $19.95 



BATTLEGROUND 

Merc Is a program that should inleresl 
you war -gamers 

It Is late 1944, and the Allied Forces are 
sweeping toward Berlin. As General of 
your sector, you have at your command 
tanks, planes, artlller>', irifantry, engineers 
and vehicles— an awesome arrav of light- 
ing men and the machines of war. From In 
telligenee reporls you know ihat the 
enemy General is a shrewd lacllclan. not 
In be underestlmaled. It will take planning 
and strategy to outwit this wily old 
campaigner 

The battle map of your sector will Pill 
with markers, each showing the deploy- 
ment of your forces. You and another 
player will slip into the roles of opposing 
German and American commanders as 
yet another bailie unfolds, flallleground 
allows you 10 experience the total respon- 
sibility of a battle-area command, II will be 
up to you to deploy your forces. On your 
shoulders rests the decision whether to 
call for direct artillery gunfire or to order 
your planes into the air. You will tonslanl- 
ly be watching for an enemy airdrop, al- 
ways carefully maneuvering vour Forces. 
The stark reality of World War 11 comes 
alive in BATTLEGROl.'ND, Model I, Level 
II, 16K; Model III, I6K. 
0141R (Tape) $9.95 



NIGHT FLIGHT 

Participate in one nf the pivotal events of 
World War II— an awesome responsibility 
for you! Ready lo tackle It? 

Us May. 1941, the dreaded Axis tjaitlc- 
ship. the Bismarck, has broken out of the 
North Sea and Is now somewhere in the 
North Atlantic. Your mission: make a 
nighttime photo reconnaissance flight 
over the Bismarck. You can help the Ad- 
miralty determine the extent of damage 
suffered by the Hismarck In a previous 
battle and whether the British Heel has 
a chance of sinking the German pocket 
battleship. 

The Night night program lets you take 
off, fly and land a propeller-driven aircraft. 
Practice approaches and landings with a 
full on-screen display of the landing field 
Information. The program will practically 
teach you to fly. 

Somewhere out in the cold, gray North 
Atlantic, the Hismarck tries to elude her 
pursuers- Your photos are vital. Launch 
yourself into the night sky with the Night 
Plight package. Model L Level 11. 16K: 
Model HI, I6K, 
01 17R (Tape) $9.95 



THE ALL STARS 

Here's a collection of our best selling 
games the ones you'll want lo play 

again and again. It Includes: SANTA 
PARAVIA AND FlU MAC CIO— Become the 
ruler of a medieval city slate as you strug- 
gle to create a kingdom. Up to six players 
can compete to see who will become the 
King or Queen. 

OIL TYCOON— Avoid oil spills, blowouts 
and dry wells as you battle to become the 
world's richest oil tycoon. Two players 
become the owners of competing oil com- 
panies, and there's room for only ONE 
at the top! 

PARADISE TRADER— You're the captain 
of a trading schooner, sailing the Caribbe- 
an In search of profits. As you sail from 
island to Island, tx^ware the dangers nf the 
deep: pirates, ghost ships and hurricanes. 
Good sailing, skipper! 
MILLIONAIRE— Here's SIOOO. Can you 
turn It into a million dollars in fifteen 
(simulated) years? It depends on your 
strategy as you buy and sell properties, 
negotiate bank loans, collect rentals and 
accept sealed blds- 

TIMBER BARON— An in-depth experience 
of the timber business, from dropping 
trees, until the milled lumber reaches the 
market. Your transactions are alTected by 
those unexpected eventualities that can 
upset even the most careful plans. 
BATTLEGROUND— European Theater. 
1944: Your forces are sweeping toward 
Berlin. At your command are tanks, 
planes, artillery. Infantry, engineers and 
vehicles. The battle map will fill with 
markers showing the development of your 
forces and the location of the enemy in one 
day of fighting. This two-player game will 
provide hours of entertainment. Model 1, 
Level II, 16K, Expansion Interface * one 
disk drive 
0213RD (DlBk) $34,95 



SANTA PARAVIA AND FIUBIACCIO 

Buon glorno, Slgnorel 

Welcome to the province of Santa Para- 
vla- As your steward, 1 hope you will enjoy 
your reign here. 1 feel sure that you will 
find It, shall we say, profilable. 

Perhaps I should acquaint you with our 
little domain. It is not a wealthy area, 
Signore. but riches and glory are possible 
for one who Is aware ol political realities. 
These realities Include your serfs. They 
constantly request more food from your 
grain reserves, grain that could instead be 
sold for gold florins. And should your 
justice l>ecomc a tnlle harsh, they will flee 
to other lands. 

Yet another concern is the weather. If it 
is good, so Is the har%'est, Bui the rats may 
eat much of our surplus and we have had 
years of drought when famine threatened 
our population. 

Certainly, the administration of a grow- 
ing city-state will require tax revenues. 
And where belter to gather such funds 
than the local marketplaces and mills? 
Yoii may find It necessary' to increase 
customs dunes or tax the Incomes of the 
merchants and nobles. Whatever you do, 
there will be far-reaching consequenc- 
es and, perhaps, an elevation of your 
noble title. 

Your standing will surely be enhanced 
by building a new palace or a magniPicenl 
cnlledrate You will do well lo increase 
your landholdings, if you also equip a few 
units of soldiers. There Is, alas, no small 
need for soldierj' here, for Ihe unscrupu- 
lous Baron Peppone may Invade you al 
any lime. 

To measure your progress, the olTi- 
c ial cartographer will draw vou a 
rriuppa. From it, you can see how much 
land you bold, how much ofit is under the 
plow and how adequate your defenses are 
We are unique, in that here, the map IS the 
territory. 

I trust that 1 have been ofhelp. Signore. I 
look forward to the dav when I may ad- 
dress you as His Royal Highness, King of 
Santa Paravla. Buona fortuna- or, as vou 
say, "Good luck ", 

For Model I. Level II. 16K. 
0043R (tape) $9.95 



PERFECT PONG 

The last bastion of propriety lias been 
breached. You. Ihe staid, serious TRS-80 
user are about lo enter a world where no 
jXTson can resist the lure, the excitement, 
Ihe frenzy of the Arcade. Yes. you are 
about lo meet- PERFECT PONG! 

Instant Eioftware presents Perfect Pong 
lo add some zip and /.est lo your computer 
life. Enough of those math, bill paying and 
ulllily programs It's time lo add some fun 
to your life! 

Perfect Pong is iwo programs offering 
nine dilTerent game boards and sound. 
Written in machine language, they are 
both fast and tricky. You control the pad- 
dles— but can you control your emotions 
in Ihe middle of a musing contest? 

Why perpetuate the "slulTed shirt " im- 
age? Unleash the force of Perfect Pong and 
ytRir computer will never by the same. 
Model 1, Level 11. IHK; Model III 16K. 
0120R (Tape) $14.95 



OIL TYCOON 

What would it be like to be one of the 
world's biggest oil producers? You and 
your friends can find out with this acllon- 
fjacked simulation as you compete lo be- 
come one of the oil Industry's wealthiest 
tycoons. 

Beginning with 82 million, and amicd 
with information from geologists' reports, 
you'll explore for new wells, exploit ex- 
isting wells, and invest heavily In research 
and development in an effort to make your 
oil the most competitive available. 

Once you have oil to sell, you can name 
your price— but don't gel too greedy, or 
you'll find the demand for your product 
dwindling till the prices become more 
attractive. 

The game Involves elements of both 
strategy and chance. Whether you wind 
up as one of the world's wealthiest men. or 
the bankrupt victim of too many oil spills, 
blowouts, and dry wells, you're sure to 
find Oil Tycoon txilh challenging and ex- 
citing. Model I. Level II, 16K: Model ill. 
16K, 
0023R (Tape) $9.96 



Home and 

Personal 

Programs 

for your TRS-80 



aSL MANAGER 

Did you remember to send a QSL card lo 
the op you worked last week? Maybe you 
sent a QSL, but can't recall getting one In 
return. The QSL Manager program will 
help you set up a computerized log txxjk 
for insiant access to your records. 

Make complete log entries which In- 
clude: date, time, call sign, name, band, 
both the Sent and Received signal reports, 
the mode, QSL sent/received, and any 
remarks you may want to add. 

No more fumbling with index cards dur- 
'"S a QSO, because the QSL Manager has a 
built-in search fimctlon to locate and 
display information on any call sign in 
your records. You can even list all the 
QSO's for a particular date, time, band 
worked, mode or a specific signal report. 

The program will automatically check to 
see how much memory you have In your 
system. If you have a two disk, 32K sys- 
tem, you may have a maximum of 1000 
entries in your log 1500 entries if you have 
a single disk system), A 48K system limits 
you to 1400 entries. 

These limits are caused by the fact that 
you have only 350 sectors on a disk. Each 
entry used 1/4 of a sector, thus the 1400 
entry limit. 

The program has built-in editing 
features that help you keep your log book 
up-to-date. 

There's also a command that lets you 
output your log entries to a printer for hard 
copy. 

In the next QSO. knock their socks off 
with your Infallible memory. Model I, 
Ixvel II, 16K, Expansion Interface -t one 
disk drive. 

0151RD (Dlak) $19.95 



USER'S TIPS 

Keep disk and tape cassettes away from 
magnetic fields 1 transformers, speakers, 
AC motors, magnets, etc.]. Strong mag- 
netic fields will deslroy Information on 
disks and tapes, 

USER'S TIPS 
When using a disk drive system, always 
fxjwcr up peripherals (expansion inter- 
lace, disk drives, printer, etc.) before you 
lurn on the TRS-80 CPU/kevboard. 



MUSIC MASTER 

This quartet of programs lets you make 
beautiful music— or shall we say. YOUR 
kind of music, 

MICRO ORGAN— A machine language 
program that enables you to turn your 
TRS-80 Into an electronic organ or harp- 
sichord. You can choose from a range of 
four octaves and three voices, 
KALEIDOPY-A combtnallon kaleido- 
scope and player piano. Your computer 
creates a repeating pattern on the screen 
and then plays it as music A special 
"messing around" section encourages you 
to modify and improvise the program. 
COMPOSER— You generate "loose" or 
quasi-random music. You leam how to 
create music and how to control certain 
aspects of It. Also contains a "messing 
around " section. 

KEYMANIA— It's Gamctlme! Up to four 
people can compete, as Ihey try to 
remember and reproduce a random com- 
puter composition. It's a multi-level game. 
In which you set the tempo- 
Bring harmony into your life with Music 
Master! Model I, Level II. 16K: Model HI, 
16K, 
0084R (Tape) $9.95 
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Games, and 
Simulations 

Entertainment 
for your APPLE 



PADDLE FUN 

Tli« new Applf diik package requires a 
sdMdv fvc ant) .1 qiiH'k hand at Ihe gdint 
[Mthllrs^ \Vc Vf iru ludcd four diHemil 
jlrtrnes lo ehallni^e and amvisr vmi They 
I Ml hide. 

INVADERS— Ymi niiisl deslroy an lilvad- 
lri|; lied of S5 llyln^ Miiueers whili- ilodglll^ 
Itie lurpel of tjorntis (hey drop Keep a 
war\' eye for the iiinlhtT ship dirfiling the 
irlc-iirMon Your lK>riib shellers will help 
yt'ii — for a while' (hir version ol a well 
kmmn arrade (J.inie Requires Applcsofl 
111 ROM. 

HOWITZER— This is a one- 01 two-person 
a.iiiie in whieh yon nuist fire upim jnother 
hc)wit/er [Xisilion 1 his program isviriiien 
in lllGH-RESOLliTlON graphles, using 
dlllerent lerrain loul wind coil<lllliiiis i-arh 
rriuiid. 10 make iJils a demanding game. 
The diniculty level ran be altered lo soil 
ilie dbililv of I he players. Rei]uires 
Applfsofl in HOM 

SrAfH WARS— This prt^ram has Lhree 
piirfs 1 1 1 two (lyin^ saucers meet 111 laser 
iinTibat- for iwn plavei?*- |2| iwn saueeni 
roiinirlc lo see whu li can shoot iHit Ihe 
nnjst stars — for two players, and 131 one 
sautxT shoots the stars in order (o gel a 
higher rank— for one player only Requires 
Applesoft. 

CfO]. F— Whether ymi win or lose, you're 
bound to have ton on our IH-hole Apple 
(loll course. Choosi- your club iuid your 
direction and hop<- 10 avoid the saodtraps. 
I^fsin,; too niany strokes In Ihe water 
ha/Mrds? Vou ran always inerease your 
handleap. Gel oti Ific lee and onlo the 
grn-n with Apple Golf. On^ oi its nicest 
features IS you'll never need in eaiKel a 
gi)lf dale due in rain Requires Applesoft. 
The minimvini system requlrenicnl (or 
this package in an Apple II or Apple IE Plus 
euniputer wilh ^2K of memory and one 
minidisk drive. 
Disk Ijased version. 
0163AD (Disk) SlS.gS 



DOCTOR CHIPS 

DH CHIPS is. I ^.re.ii icebreaker ai cock- 
lail parlies, .-^nd li ll»- need arose, he lould 
entertain your larly arriving guesis while 
you Ilnlsfied dres.sing' Your friends will be 
a.skliig you how ilie guy got into the com- 
puter 

Whv shoulder ihe burdens 0I modem 
life III sllencc'P E'lil your APl'LK and DR. 
cull's to work liKlav and gel It alUill vour 
chest' 

You 11 need an Apple 11 lor II I'lusl. one 
disk drive, and 20K ol RAM. 
02S4AD (Disk) $14.95 

HIMIC 

Mow good Is your memon,-^ Here's a 
chance to find ouil In Mimic, your Apple 
will llash on the screen a sequence of fig- 
uies on a 3 X 3 grid. You'll have to respond 
with exactly the s^une sequence. 11 sounds 
easy, but don't be liwled. There aie five dif- 
ferent. Iiicreasinglv difficult versions of the 
game. Including one chat will keep going 
unitl you're ready lo quit. Mimic is px- 
ctilng. fast -paced, and challenging— a fun 
^ame for family and friends. You'll need 
Inieger BASIC and at least 24K of R.\\l 
OOaSA CTapeJ SS.SH 



APPLE FUN 

We ve taken live ul our mosi p<.)pular 
programs and mmhined (hem iniu one 
Iri-inendous package luii ol Inn .uul e\ci(e- 
nieni. This disk based package now oilers 
vou these great games 
MIMK." — How EiK>d is your memory'? 
Here s a chance lo llndout! Your Apple will 
display a sequence of figures on a 3x3 
grid 't'ou must respond with exactly the 
same sequence, within Ihe time limit 

There arc five dilTereni and iiK reasingly 
dilTiciill versions of the game, including 
one that will keep going indehnitcly. 
Munk- isexcitme. lasi-pacedand 1 halleng- 
ing- tun for air 

AIR FLIGHT SIMLLATION-Vour mis- 
sion Is to lake oil and land your aircraft 
without crashing. Vou re flying blind, on 
instruments only. 

Vou start with a lull tank of fuel, which 
gives you a maximum range ol approx- 
imately 50 miles. The computer will con- 
stantly display iii>dates of your air s{)eed. 
i-oinpass heading and allilude Vour most 
irnixirtdnl instrument is the Angle of 
AventyBank Indkator. [t will tell il Ihe 
plane is climbing or descending, whether 
banking into a right or left tuni 

After you've acquired a few hiHiis living 
time, you can lr\ Hying a cireull against a 
mapordoingacioh-memaneuvcis. Witha 
111 lie more flight lime under your l>elt, the 
sky s the limll! 

COLORMASTER-Test your powers ofde- 
duellon as vou tr\' to guess the seiret color 
eixte in Ihis Mastermind-typc gami- There 
are two levels n( illlTiculty. and Ihrre op- 
tions of play 10 vary your games. Not onlv 
ran you guess Ihe compulers (olor code, 
but It will guess youri! It will also si-r^e as 
refiTee in a game tx-lwcen two human op- 
IMinents. Can you make and break the col- 
or code? 

STARSHIP ATTACK-Your niKslon is to 
proicet our orbiting food station satellites 
fniin destruction by an enemv starship. 
You must capture, di'stroy or drive off the 
attacking ship 11 vou fail, our planel is 
doomed. 

TKll.OGV- This fascinating contest of 
logk- has its origins in the simple game ol 
lie taetoe. 1 he ohjitt of the game is lo 
place three of your colors In a row into the 
delta-like, multi level display. The rows 
may he horizontal, vertic-al. diagonal and 
wrapped around, through ihe "third 
diiiienslon". Your Apple (or human oppo- 
nent) will be trying to do the same, and 
there are many jwihs to vieton- Vou can 
even have >our Apple play against Itself^ 

Minimum system requirements are an 
Apjite 11 or Apple 11 Clus computer wilh 
32K of memory and one minidisk drive 
MiiiiiL requires Applesoft in ROM. all 
others run m KAM or ROM Ap[)lesoft 
0161AD(Dlak|$ia.SS 



GOLF 

Without leaving the comfort of your 
chair, you can enjoy a computerized 18 
holes of golf with a complete choice <rf 
c-liil)sand shooting angles. Vou need never 
cancel because (rfrain. One or two players 
can enjoy this game on the Apple, wilh Ap- 
plesoft 11 and 20K. 
001SA(TBpc)SB.gB 



SK'TBOHBERS n 

Two countries, separated by The Big 
Green Mounl^n. arc at war. [)oth nations 
ate equipped with onlv one mriina of at- 
lack-SKYBOMBERS. 

You and your opponent, each represent- 
ing the nations at war, command opposing 
fleets of nghter bombers armed with 
iKimbs and missiles. As enemy command- 
ers, each of you has specillc orders Cross 
thai mountain and bomb the enemy block 
house Into oblivion! 

Flvingover that innocent-looking moun- 
tain is not easy for either air force. Thcalr- 
eiali can Ore missiles ai each other. If that 
falls, they can ram each other. Sometimes, 
aircraft encounter falling bombs and are 
blown to pieces In flight. Desperate pilots 
can even crash Into the enemy block- 
house. 

Kllght personnel are sometimes forced 
to jiarachute from badly damaged aircraft. 
As they float slowly to eailh. they become 
helpless targets tor (he enemy to destroy in 
midair. 

The sounds of battle are there to remind 
each commander of his grim responslblll- 

'y- 

Kxplosions are graphically displayed for 
both commanders The scores Inr tioth 
countries are constantly updated at the 
bottom of the display screen. 

I'lylng these missions develops Into a 
gripping fascination. Air warfare l>ecomes 
a vivid reality, as you both play the deadly 
game of Skybomlwrs II. 

Tape version retjuires 16K RAM & Ap- 
plesoft or Integer Basic. Disk version re- 
quires 32K ftAM «t one disk drive Both re- 
quire an Apple II or Apple II plus and game 
paddles. 

01H3A(T«p«) 89.98 
0271AD(Dlak)S19.9B 



SANTA PARA VIA AND FIUMACCtO 

Boon giomo. SIgnorc! 

Welcome to the province ol S.mta Para- 
yla. As your steward. I hope you will enjoy 
your reign here. I feel sure thai you will 
find It. shall we say. profitable 

Perhaps 1 should acquaint you with our 
little domain. It is not a wealthy area. 
SIgnorc, but riches and glory are possible 
tor one who is aware of political realities. 
Thi-se realities Include your serfs. They 
constantly rcqin'St more food from your 
grain reserves, grain that could Instead be 
sold for gold florins. And should your 
justice become a trtllc harsh, they will flee 
to other lands. 

Yet another concern Is the wcaiher. If It 
IS good, so is the harvest. But the rats may 
eat much of our surplus and we have had 
ve.irs of drought when famine threatened 
Diir population. 

("ertainly. the administration of a grow- 
ing city-state will require tax revenues. 
And where better lo gather .such funds 
than the local marketplaces and mills? 
Yovi may find It necessary to increase 
customs duties or tax the Incomes of the 
merchants aiid nobles. Whatever you do. 
there will be far-reaching consequenc- 
es and. [perhaps, an elevation of your 
noble title. 

Vour standing will surely tx- enhanced 
hy building a new jialace or a magnillcent 
ccilledrale. You will do well 10 increase 
your landholdings. If you also equip a few 
units of soldiers. There is, alas, no small 
need for soldiery here, for the unscrupu- 
lous Baron Pepjxine may invade you at 
any time. 

For the 48K Apple with Applesoft in 
ROM 

0174A(Tap«)$9.9B 
033gAD [Disk] $19.95 



ADt FLIGHT BIMULATION 

Your aircraft is on the ninwnv loaded 
wilh fuel. Inslniments feeding Ihe com- 
piiicr a constant stream of information. 

A glance at your tlight screen gives you 
■lirspeed. altitude, and compass heading. 
Alter you take off. Ihe all Important 
Asjeiil/Descenf Tiiru.'Bank Indnator will 
lell yiju the aliunde of your am rait at a 
[il.iiic e. whether vou are climbing or div- 
iii|j. uhether you are banking in to j lelt or 
right turn. 



\'riijr mlshion Is a short one Yrni haic a 
iTi.tximum possilile range ol about 50 
mili-s. on one prciHius tank of luH. Your 
ohj<-i.ti\e is to lake <i(\. (ly the alrerafl. and 
land without crashing. 

Sinte you may not have been at Ihc con- 
trols of an aircraft before, the basic flighl 
Insliuctions enclosed will be Invaluable. 
Included are explanallons on bask- aerody- 
namics and principles of lllght. plus illus- 
trations telling you how to recover from 
dangerous maneuvers 

Vour aircraft will respond rapidh 10 the 
riHiinils. and your movements must be 
deliiate Too much airj^ed and yinir air- 
i rait tould expkide from overslress. II the 
rtirspeed is loo slow, you might stall and 
1 rash. A clumsy luni. and you might find 
yourself fly Jng u|»slde down, lighting to re- 
gain control. 

With Air Flighl Simulation and enough 
llighl lime, the skv s the limit' 
Requires 16K of KAM A Appk-sott 
0148A (TmpC) sa.aii 



SAHARA WARRIORS 

Now you can enjoy all the gntty realism 
ol desen warfare with the Sahara Warriors 
package. COMMANDO— You must send 
vour commandos to trap a Gcniiail gener- 
al and cut him off from his troofis. You'll 
have the choice of two levels of dlfUculty. 
FRENCH FORKI(.'.N LEGION-The Ijattal- 
ions of the French Foreign Legion are in a 
race with the Arabs Which side will gel its 
battalions Into ihe oasis in ihe shortest 
lime'' You and a friend can find oul This 
game has lour dilterent versions, which 
even include an mi asional sandstonii. 

NOTE: Both programs in this jvickage 
require an Apple wiih at least HK and In 
leger BASIC. Thi French Foreign legion 
pri)grain requires tlic use of game paddles. 
0080A (Tape) $9.9B 



OIL TYCOON 

l^'ould you be the world's wealthiest oil 
magnate? Find out with this aciion- 
jiaoked simulation of real-world, cutthroat 
competition. 

tleginning with two million dollars, and 
armed with the geologist's rrpons. you'll 
explore for new wells, exploit existing 
wells and Invest heavily In research and 
development. 

Once you have oil to sell, you (an name 
your own price Don't get loo greedy, or 
the demand for your oil may dwindle until 
prli-ra become more altractive 

When the game Is over, you may find 
yourself the wealihiesl tycoon around— or 
you may be the bankrupt victim of too 
many oil spills, blowouts and d a wells. No 
mailer how you tare, you're sure to find Oil 
Tycoon both challenging and exciting on 
vour Apple. Requires Applcsoll in ROM. 
16K. 
0079A (Tape) $9.98 



for your 
HEATH 



MENTAL GYMNASTICS 

Pit yiKir mind against the challenge of 
iheac ancient ganies. 

HKVERSl— As you and a friend lor the 
eoniputer) place your pieces on the board. 
you must each trv to capture the oppo- 
nent's pieces The score can Huctuaie 
wildly, and nobody can tell who'll win un- 
til the last move. 

WARl— You can play a friend or the com- 
puter in this simple yet intriguing game 
The two players take turns removing 
pieces from one (up and placing Ihcm in 
the other cups. As play continues, the 
number of pieces decreases. The last 
player who has a piece to move wins the 
game To enjoy I hese ageless games, you II 
need the Heath H 8 with 8K above Eiemon 
Hartxir Extended BASIC. 
0087H (Tape) $9.99 
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SOLAR ENERGY FOR THE HOME 

Willi \hr pritf of lucls nsmg lo itstro- 
nomlcili ticlghls. solar sgkatt- he-alin)^ sys- 
tems ait- sianlng to Ixtoitic \cr\ atirac 
llvi- Hue. how do you know II a solar heal- 
ing, tTisIallalion will Ix- I'lonunikally fra- 
slljle? This program rmi annwcr thai 
qkirslkiii. 

All yoii do Is supply iln' kxiilloii, size, iii- 
Icrior dtlails and thf aitioiiiil ut witiiinw 
space In your home The pro|(rani will cal- 
ctititi' Ihe cuirenl heal loss of your home 
ciiid Ihe amuuni of hi-M gained from aii\ 
soulti-latmg window^ Then, eiilcr ihe 
(latatur Iht- lonlernpliili-dsnLir heating in 
Mallatioii The program will i-ompiite the 
nel heating gain and give vou llu- i-oal ul 
using i.'Uriveiilional tuels ler^us using 
solar heal. It will even cakulale Ihe pay- 
iMrk ptnod and show yon If your conleni- 
plated tnveslmeni in solar healing will 
savi- you money. 

For anyone sehoiisly rnosklerliig t he ad 
vantages and economics iil a so'ar conver- 
sion, this package can provide practical 
guidance. Kor professionals designing and 
inslalling solar systems. It sa must. 

Hi'tjiilres Applesoft KASIC. a single disk 
drive and a minimum o(2flK ol RAM. 
023SAD (DlBk) $34.S9 



ASTROLOOr 

Astrok^' Is at once a science and an art 
The heavenly bodies are believed to cxcil 
an Influence upon the desliniesof each in- 
dividual— a destiny prcdelermlncd by a 
universal order resulting troiti lor coin- 
ciding with) the position of Ihe planets In 
our solar system. 

The astrological chart, or horoscope. Is 
drawn as a map of Ihe heavens at the exarl 
time of a person's birth. A liuroscope Is an 
tlluslmtkin of (1) the "planels" and their 
location within (2) Ihe (welve signs of the 
Zodiacal Circle and (31 the twelve houses 
through which the heavenly bodies must 
pass. The sign which Is in the ascendant 
(Kastenl Hortzonl at the lime of birth is 
also of greal significance 

This program draws your astrological 
chan using either the tropica] or sidereal 
zodiac. After you enter yiiur birth data In 
response to Ihe on-screen prompts, your 
Apple will calculate and then display vour 
individual horoscope. Once the horoscope 
has been cast, the program will lisl the 
angular relationships (aspectsi of all of Ihe 
"planets ". 

Note: This program makes no altempl to 
Interpret the multitude ol facts and rela- 
tionships of a specific horoscope. For Ihls 
iiifonnation. we recommend that you con- 
sult a standard text on astrology or an ex- 
pcrli-iiccd astrologer. 

Knowledge of Astrology a necessity to 
use this program 

Minimum System: Apple 11 lor 11 Plus]. 
our disk drive. 2SK of RAM and Applesoft. 
0242AO [Disk) S1S.9B 



for your 
PET 



for your 

NORTHSTAR 



TRAFFIC ACCIDENT ANALYSIS 
AND RECONSTRUCTION 

by Halm Retzes 

Highway accidents, resulting in falall- 
llrs. injuries, and property damage, gener- 
ally lead to prolonged litigation The Traf- 
fic Accident Analysis and Reconstruclion 
(TAAR) Syslcm will provide you with pro- 
grams and analytical techniques to solve 
Ihe equations Involved In motor vehicle ac- 
cidents. The System will present a recon- 
struction methodology utilizing physical 
evidence at the scene and a conclusive 
deiennlnallon of the probable cause. 

The purpose of this system is to provide 
accurate conclusions regarding the opera - 
llona] factors and dynamks contributing 
to highway accidents The TAAR System 



deals with the basic calculalions of Ihe 
conimiHi types of accidents aitd also ex- 
plainii and applies Ihe various formulas of 
automobile kinematics. 

The TAAR System is the result of Mr 
Retzes' 25 years In the accident Investlga 
lion Held. These programs are Invaluable 
to insurance casually companies, accident 
investigators, plalnllfi and defense attor 
neys. fleet safety directors, and police offi- 
etais handling automobile at-cldcnt cases. 

This package requires ihe North Star 
Horizon II microcomputer with 48K of 
menKiry. two disk drives and the North 
Star Disk Operating System (DOS) version 
50 
0173ND (Dlmk) S4B9.0S 



Texas Instruments 



SANTA PARA VIA AND FIUMACCIO 

The year is AD 1400. and you are the 
ruler of a tiny Italian city-state. You are 
ambitious by nature and Intend to build 
your little city-state Inio a powerful 
kingdom. 

So be^ns Santa Paravla and Fluinacclo. 
where you and your fetkiw players ixiin- 
pcte as rulers of neighboring cities. You 
control Itie grain harvest . feed your people, 
set tax rates, exercise justice, artd Invest In 
public works. 

Life was short back then, and you'll 
hnve only a limited amount of time in 
which to build your kingdom. The lives of 
yoiir serfs will depend on your dcclskin. if 
they are wise, then your city-stale will 
grow and you will acquire loftier lilies. If 



your rule Is incompetrni. your people will 
starve and your city-state may be Invaded 
by your neighbors. 

You can play the game yourself or up lo 
six players may compete al oi»e lime. Ei- 
ther way. you're sure lo find your route lo 
Ihe throne a challenging road 

How will you rule youi kingdom? Will 
you become unscrupulous and follow ihe 
examjrfe set by Nkcrfo Machlavelll in his 
iMiok on government. The IMnce— or will 
you be a benevolent ruler--an iron fist 
in a velvet glove? Only you can answer 
that question— with the Santa Paravia 
and Fiiimaccio progiam. For TI9S'4 
Microcomputers. 
0273TI(T>pc)8e.Ba 



COI» NAME: CIPHER 

Now you tan enjoy the leellnjiof Inlrtgue 
with Ihe CODE NAMF, CIPHER software 
package. This enigmatic quartet of pro- 
grams Is a puzzle lover's delight. They 
Include: 

MEMORY GAME-The computer will 
shiiflle a deck of cards and lay them out 
face down. You take turns choosing two 
caids and trying to malcti a pair. You can 
adjust the computer')i "IQ " so thai ils 
incmor\' is as fallible as yours. 
CODEMASTEK— One player lypes in a 
woid. phrase or senii-ncc and the PET 
translates it Into a cryptogram The other 
player must break Ihe code and solve the 
cryptogram In the shortest lime possiljle. 
The computer keeps score and will offer 
hints— but you lose (xiinis if you accept 
Iheni. 

DECEITFLL MASTERMIND— This Lsn'l 
your ordinary maslenulnd type of game 
You musi guess Ihe live lelteis in the hid- 
den code word. The computer will give you 
hints as to how close your guesses arc. Bui 
II can [optionally! give you false 
hints . up to nine per game, thai can 
lead you astray. For one player. 
CODE BREAKER— Cracking this code 
won't be easy. The computer lor a human 
opponent) will enier a s<'quence of three. 
foul or five secret symbols. You'll have lo 
guess which symbols are used and their 
correct sequence. The fewer guesses, the 
higher your score. If you want lo pit your 
witsagalnsi the relentless logic of the com- 
puter, then Code Name Cipher Is for you. 
Requires an 8K PET 
0112P(TMpe)6S.BB 



PET UT1L1TT I 

This two-program package Includes: 
Mt)NITR— You can edit, save and verify 
any machine-language program while still 
allowing you access to DASIC II allows 
you to: (1) display or modify memory In 
hexadecimal notation. |2) disassemble 
memory, (3| execute programs. (41 save, 
verify or load machine language tapes, 
and (5) move back and forth Ijelween 
hash: and MONITR ii uulomatlcally dls- 
play.s register contents and processor 
status bits whenever it encounters a BRK 
iiisiructlon. It resides in high memory, so 
It is compaUble with UASfC (Old ROM 
only.l 

PROG RAM MERS CALCULATOR- This 
program will do more than the Texas In 
stniments' Programmer t^ak'ulator. Nol 
only will the program convert numtiers in 
lo binary, octal, decimal and hexadecimal 
systems and function as a lloating point 
calculator, but il will also display all four 
numbers. slmuttai>e(Hisly It will handle 
numbers so large. Ihry're limited only by 
Ihe size of your screen! lElther ROM.) 

The PET UUllty 1 [lackagc, a tool for all 
your tomorrows. For 8K PETs. 
OlOBP (Tape) 9B.9S 



DUNOBON OF DEATH 

"Thos*^ who seek the Holy Grail 

Mustjlghl and walk a forluotis trail. 

Eleivn rFKirisfcrs (hou iiiusl/lghl, 

H'hIlsf searching through eternal 
iilghl 

Count Stan ol Santa Paravia 
AU 1360-1402 

Thus begins your quest In search of the 
Holy Grail, wherein you must descend 
thrfiugh Ihe twelve levels of the Dungeon 
of Death, find Ihe Holy Grail, and return to 
the surface with It. 

The Holy Grail is guarded by Smaug, ihe 
most fearsome monster of all, and ten 
lesser breeds of mon.slers These gruc' 
some beings will challenge your every 
slep Vou can only survive by using all Ihe 
powers al your command 

You'll be able lo casi magic spells, drink 
pol Ions that may or may nol help you, and 
open cliestit In search ol gold or Items that 
will help vou flghl Ihe niuiisleis. 

Step softly in the darkin-ss Treasure or 
sudden death Is only a footfall away in the 
Dungeon of Death' Requires an SK PET 
0(W4P (T^ie) 8B.BB 

gUBIC 4/GO HOKU 

I'iay two ancient gaiiu son your modern 
I'E'r. The two programs included are 
QUBIC 4— Flay a mult I'd inicnsional game 
ol Ik'tac-toe. 

GO MOKU — Line up live ol your men 
while blocking lh<- PET's moves, 
Ihc^.- one player games retjuirc 8K of 
iiii-mory 
0038P (Tape] 5B.9B 

Mime 

Test your memon,- and retlexes with the 
five different versions ut this game Ynu 
niusi match the sequence and location of 
signals dis^yed by your PET This one 
player program Includes optional sound 
elfecls with the PET 8K 
0039P|Tapc]89.BS 

SANTA PARAVIA AND FIUMACCIO 

The year Is AD 1400, and you are the 
ruler of a liny Italian dly-slate. You are 
ambitious by nature and intend to build 
your little clly-siate Into a powerful 
kingdom. 

So begins Sania Paiavta uritl Fiumacclo. 
where you and your fellow players com- 
pete as rulers of neighboring cliies. You 
control the grain harvi-st. Iced your people, 
set lax raies.exerclse)ustk-e. andlnveslln 
public works. 

Life was short back ihen. and you'll 
have only a limited amount of time In 
which lo build your kingdom. The lives of 
your serfs will depend on your decision If 
they are wise, then your cltv-stale wit! 
grow and jou will acquire loftier titles. II 
vour rule Is Incompetenl. your people will 
starve and your city-state may be Invaded 
by your neighbors 

You can play the game yourself or up in 
^ix players may compete al one time. 
Either way, you're sure tu llnd your route 
to the throne a chalk-nging road. 

How will you rule your klngdiun? Will 
vou become unscrupulous and follow the 
example set by Nkcolo Machlavelll In his 
biK>k on govemmeni. The Prince — or will 
vou be a bcncvrrieni rulei -an Iron list in a 
i-eivet glove? Onlv vou can answer that 
queslK>n — with the Santa Paravia and 
Fiumacclo program 

This classic program will give you hours 
ol enjoymcni. Your sultwarc library' Isn't 
complete without Santa Paravia and 
Fiumacclo Requires a 16KPET. 
0175P(Tape)SB-BB 



AIRMAIL PILOT 

The Cblc^o Sun 
July IS. 1922 
—WANTED— 

Airmnil pilot h>r the 
CJitumbiis III Clucago run. 

Must be iiHllIng tojiii in 

everif Kind of uvather Only 

Ihe foolhardy need apply. 

Let the Airmail Piloi package take you to 

the early days ol aviation historv-. Your 

plane i.s the Curtis JN4 D, atfectionaieU- 

known as Ihe Jenny. You miisl fly the mall 

Irom (.:oliimbus to Chicago. 



Thi- Jenny carries only 26 gallons ol 
fuel. You'll have to stop along Ihe way. Bad 
weather may force vou down Electrical 
storms mav turn vour aircraft into a mass 
of naming wreckage, or ice may (omi oo 
your wings and plunge you to certain 
deaih below. Bui. the mail must get 
through. 

Experience the Ihrillsof flying, when alr- 
crafl were mere fragile rnachincs of wood 
and fabric, with Ihe Airmail Pilot package 
iSiarf and flying helmei optional! All you 
need IS your T199/-1 iniciiKOmpuler. 

0274Ti (Tape) $9-95 
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19 95 


10 


ULtHS [D-skt 


OI31RD 


19 95 


10 


Hynamir [Jrvlcr Drivrts ITapf 1 


M2SH 


19 95 


10 


IDekl 


0I99KU 


24 95 


10 


Irviraprj 


O2S0H 


24 95 


10 


inoki 


03SORU 


29 95 


lO 


MaalFi Dim-lory iniskf 


SOOSHn 


29 95 


10 


Programmrr s Coo verier tTaprl 


005SH 


995 


11 


Programnirr s Primer (Tapcl 


024!iH 


995 


11 


HrnumTumiirrM (Tapf 1 


UI33H 


14 95 


10 


TLDIS ITapcl 


0230H 


1495 


10 


L'llra Mon (TaprI 


bOOSR 


2415 


11 


TRS-aO EDUCATION 








PrsfrBiii Name 


Order No. 


Price 


Page 


Lti-Kiri™ r » Hii«ian ( laprl 


ULUiR 


S9 95 


11 


Ki.-ndaf HiiMian (Tapcl 


I1I37IJ 


9 95 


11 


(HMigiapliy Kiplorrr USAIDiskl 


007 IHl) 


49 95 


II 


Kusslaii aiak intski 


0'Ji:'Hll 


24 95 


11 


Survcyoi » Apprrmirp (Tapel 


0177R 


9 95 


II 


Trac'hrrn Aldp IDlskI 


U214RI) 


:i9 95 


II 


1 yplnn Traiher ITape) 


OmWH 


12 95 


1 1 


TRS-BO GAMES. SIMULATIONB AND ENTERTAINMENT 






ProgruB N&die 


Order No. 


Price 


P«<e 


Air Klljjhl SlmTilalion ITapi-t 


0O17H 


S9 95 


12 


Airmail Pllol (Tupet 


OlOtiK 


9 95 


12 


Alien Aliai k Fnrre (Tape 1 


0241)H 


9 95 


12 


The AllSlar*IDtskl 


0213RI) 


34 95 


13 


Ball Tiirtri Cjunnf r ITapil 


(X):i 1 N 


9 95 


13 


ElaulFf^rDulJd ITapcf 


(II4IK 


9 95 


13 


cr<amli PflUol ITaptI 


0ai3H 


14 95 


13 


IDi<tk) 


0224 RD 


19 95 


13 


CanKri In Orbll ITaprl 


0237k 


14 95 


13 


Dragnnqurst ITapr] 


S006R 


1595 


2 


[[>i-AI ModH 1 


5007 RD 


21 95 


2 


(DiskI Model III 


S0l<»i3D 


21 95 


2 


Dr (')■«(» ITaprl 


021BH 


995 


13 


niKht Paih ITaprl 


aj7iH 


995 


12 


Tlxr Flying Citrus (t)iskl 


O20SRI) 


39 95 


12 


Houie al 30 tiaWM ITapcl 


0219R 


995 


12 


Jrl Fighter Pllol (TaprI 


01S9K 


14 95 


13 


Masler Kevrrsi llUlkl 


0378HD 


29 95 


3 


NIghl Flight ITapf 1 


OHJR 


9.95 


13 



1 rTapei 



OllTirocilTap.-) 

Fetlcrl Pong [TapFl 

Sanu Paravia A Fiunidii iij ITaprl 

space Shutl^ (Tape) 

Swamp War [Tapr; 

Trmplr ol the Sun rTip'-l 

IHi-ikl M(«li-I I 

TRB-aO HOME AND PERSONAL 
Procram Nunc 

Musi. Mailn ITapel 
QSL Mdnagei lllitkl 

ATPLE EDUCATIONAL 
Pragiam Name 

raiillall/almnlDnkl 
RuMlan Ui.sk invsVI 

APPLE CAMBft. SIMULATIONS • ENTCRTAINUEHT 
Pregraai Name 

All Might Simula I 
Apple Fun fDlskl 
Dr Chips (Olikl 
Uolf (Tapel 
Mimic (Tapri 
Oil Tvroon (Tappl 
Paddle Kun iDiskI 
Sahara Warriors ITapi-! 
Sanla paraiu A FiumacdotTapel 
(Dlskl 
Skybomljirs UlTapel 

innki 

APPLE HOME AND PERSONAL 
Prafrain Nunc 

Solar Etu-rgy lor thi- Home (Ihskl 
Aslrolugy (Dl^kl 

PET 

Prograin Name 

[-■idr Ndtnr Cipher rTappJ 

Dungeon ol l»eath ITaprl 

Mimic I Tape I 

pel IJillllv 1 (Tapel 

gubu- */Gn Mokll (Tape) 

Sanla Paiaila a Fm ma rcio (Tapel 

TEXAS INSTRUMENTS 
Pt«gramNBBu 

AllRlall Pllol (TaprI 

S^nla Paravia & F.umamo ITapel 



HEATH 

Prograip Name 



NORTHSTAR 
Prograiu Nacpe 

T A A H IDlSkl 



0O23H 


9 95 


13 


0120K 


14 95 


13 


0043H 


995 


13 


0333H 


1195 


3 


03I2R 


1495 


13 


S012R 


19 95 


3 


50nRD 


29 95 


2 


Older Ns. 


Price 


Pa<* 


OOMR 


sy 93 


13 


0151R1) 


19 95 


13 


Order Ns 


Price 


Pace 


1J339AD 


S24 95 


2 


0283AU 


24 95 


2 


NT 
Older N». 


Price 


Pace 


014SA 


S9 95 


14 


OlblAD 


1995 


14 


0354 AD 


14 95 


14 


001 SA 


9 95 


14 


0O25A 


9 95 


14 


0O79A 


9 95 


14 


0I63AI) 


1995 


14 


0O8OA 


9 95 


14 


ol 74A 


9 95 


14 


02J4Al> 


19 95 


M 


IllH.lA 


9 95 


14 


027IA1> 


19 95 


14 


Order No. 


Price 


Pace 


0-2.*3AI) 


83J95 


15 


1I242A1) 


19 95 


15 


Order Ha. 


Price 


Pat* 


01 12f 


S'l '.tfr 


15 


UOMC 


9 95 


15 


0()39P 


995 


IS 


0I05P 


995 


15 


003BP 


9 95 


IS 


0175P 


995 


15 


Order No. 


Price 


Pace 


02;4T1 


69 95 


15 


02J3TI 


119.1 


15 


Order Ha. 


Price 


Pac* 


0087H 


S9'>5 


15 


,OTdci No. 


Price 


Pace 


0173.ND 


8499 93 


IS 



PRICES SUBJECT TO CHAVCJE WITHOLT \OTICE 



Whether you use your microcomputer for business, 
science, education or in your home — 

Whether you have an Apple, TRS-80*, PET, OSI, 
IHeath, Atari, KIIVI or another system^ 

Whether you are a beginner, intermediate or expert 

Kilobaud Microcomputing is for you. 

Each month the pages of Kilobaud Miciocompuling are filled with the mosl up-to-date infofmation on 
microcomputing. Lasi year Kilobaud Microcomputing had over 2,500 pages. So you get ail that information at 
less than a penny a page. 

You can expect Kilobaud Microcomputing to bring you . . 

•articles on everything from investment tracking to games 'up to-date industry news 
"reviews of new products "and hundreds of dollars worth of useable programs 
Whatever afea of microcompuling you are in, Kilobaud Microcomputing helps you explore il — so subscribe 
today with our no-risk oiler. If you are no! satisfied with the first issue, wfitc cancel across your tnvoice and 
send tl back. The Kilobaud Microcomputing is yours to keep. 

YES, I want Kilobaud Microcomputing. 

Bitt me S25.00 lor a year's subscription. Bill my AE MC VISA 

Canadian 1 year only/US lunds $27.00— Foreign 1 year only/US funds $35.00 
Kilobaud Microcomputing • PO Box 981 • Farmingdale, N.Y. 11737 



Check enclosed. 



Name 



Address 



\ 



City 



Card# 



\ Signature 
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GENERAL 



A compilation of wisdom on when and when not to compile. 

A Macroprocessor 
For Basic— PartV 



J Alan Olmstead 
J. Olmstead Financial 
Engineering Systems 
3843 West Street. Moritz Lane 
Phoenix. AZ 85023 



The MetaBasic compiler consists of 
three program modules. The first pools 
all literals; the second generates Assembly 
language source code from the MetaBasic 
commands; and the third posts public 
names (if any) to the external reference file. 
Prior to assembly, but just after all program 
modules in the group have been precom- 
piled, the external reference generator uses 
this file to compute linkage addresses 
among all the various concurrent program 
modules. 

Literal pooling is a feature common to 
nearly all compilers. Numbers, such as zero 
and one. are used continuously throughout 
the program as are certain character con- 
stants. Since their repetition consumes 
considerable space in main memory, the 
compiler sets them up once as a data con- 
stant and thereafter substitutes the compil- 
er-generated name wheneverthe same liter- 
al appears again in the user's source code. 
The maximum length of a character literal is 
48 bytes, and the maximum magnitude of a 
numeric literal is 99,999,999.99. 

The generation of source Assembly lan- 
guage from the MetaBasic commands is 
actually the easiest part of the entire com- 



pilation task. The generated code consists 
of a call followed by address definitions. 
The calls are to service routines contained 
within ZMonitor and are automatically de- 
fined as external to the user's program. The 
external reference generator will resolve 
them just prior to assembly. 

If the Assembly language generator 
encounters DEFPUB annotation to any 
equate statement, the third compiler pro- 
gram Is called autonnatically. It posts the 
name of the program module and the name 
which was declared to be public. The ad- 
dress Is not computed at this time, however, 
on the presumption that changes to the pro- 
gram will be made. Similarly, if any refer- 
ence is found to an external name, the pro- 
gram posts the module name as containing 
references needing to be resolved prior to 
assembly. 

The Last Language: MetaBasic 

MetaBasic Is not merely an attempt to 
smooth out the simplification of general in- 
to detailed code, or to add new commands 
to the repertoire. It Is an attempt to end the 
development of new languages and new ex- 
tensions of old languages by making 
language itself a nonproprietary compo- 
nent of the computer. In simplest terms, the 
goal of MetaBasic is to make the con- 
struction of command words which do not 
exist possible, without modification of the 
compiler itself. In this sense, the command 
words resulting from the precompilation 
stages from interpreter Basic are only the 
JOFES suggested commands; they can be 



changed at the user's will. No compiler can 

be all things to all users, and it is vaulting 
ambition to make such an attempt. To real- 
ize this goal, the very nature of compilation 
must be changed. 

Changing Its Nature 

Traditionally, a compiler searches an in- 
put source program file for recognizable 
command words. Finding them, the com- 
piler creates an output file In a cycle of ac- 
tivities described as "This — Equals— 
That." As long as the compiler must search 
for recognizable command words in the 
source file, however, the compiler fails to 
meet the needs of some users. 

Alternatively, consider a compilation pro- 
cess in which the compiler did not recog- 
nize command words but command syntax, 
or a sequence of symtjols which collectively 
comprised a command. It could then con- 
sult a library of commands prepared by the 
user and, from the library, complete the 
compilation process. In this way, the user 
could revise and extend the compiler to 
adapt to the continuously changing hard- 
ware and applications environment of mod- 
ern microcomputing. The capability might 
actually extend the life of an older model 
computer by several years, where It is ser- 
viceable except for its ability to be pro- 
grammed In a new way. 

Although the concept sounds exciting, 
there is a serious hitch in the rope that ties 
it all together. Making up new command se- 
quences is easy; programming their long 
and detailed Assembly language service 
80 Microcomputmg. November 1981 • 243 



"The solution is to recognize reality 

and open the hush-hush 

inner sanctum of the operating system. 



subroutines is the worK of a professional 
systems programmer. How does one Basic 
programmer, with little more than a begin- 
ner's Introduction to Assembly language, 
make use of such a device? The solution is 
to recognize reality and open the hush-hush 
inner sanctum of the operating system. 

A MetaBasic compiler works precisely 
because all the elemental Assembly lan- 
guage subroutines needed are already con- 
tained in the operating system and are 
available to the user through the Call com- 
mand. There is a specific repertoire of such 
subroutines, documented in programming 
manuals and well known by systems pro- 
grammers; they are the first subroutines 
programmed during the development of a 
new operating system. Those TRS-80 Model 
I users who have written disassemblers 
know where these TRSDOS subroutines are 
located and how to use them. The only dif- 
ference introduced by JOFES' ZMonitor op- 
erating system is that this detective work 
has been obviated by publishing the infor- 
mation up front. 

Given that essentially no Assembly lan- 
guage programming will be needed beyond 
the trivial to use the MetaBasic compiler, 
the modestly capable Basic/Assembly pro- 
grammer may set up virtually any kind of 
high-level command he needs. The only re- 
strictions include data formats and syntax. 

Formatting both numeric and character 
data in memory is a picky and nasty busi- 
ness. After every step of program operation, 
the status of referenced data elements 
must be reviewed and updated where 
changed. Because of this, data formats are 
recognized and managed by the MetaBasic 
compiler. While limiting the general user in 
the same manner as traditional compilers, 
the trade-off given is freedom from a truly 
exasperating maintenance function. 

The syntax problem is much simpler. The 
next few pages illustrate MetaBasic syntax 
by making up a new command and showing 
the library module which would be prepared 
for the compiler if the command were really 
used. 

MetaBasic Syntax 

The MetaBasic Compiler is actually not a 
compiler, but a "parsing macro processor." 
With very few exceptions, MetaBasic does 
not recognize command words. Instead, it 
analyzes or "parses" a command format 
before using the parsed elements to 
specialize a standard JOFES macro library 
module. The MetaBasic command line for- 
mat is in Table 1. 

The MetaBasic Compiler will process vir- 
tually anything which conforms to this for- 
mat, In the following steps: 

1. The MetaBasic line is read from the in- 
put file. 



2. The line is determined to be a com- 
mand line, or: 

3. Comment or Assembly language line, 
the latter two t>eing written directly to 
the output file. 

4. Command line is parsed into its func- 
tional components and arranged in a 
macro call argument table in memory. 

5. A final check is made for certain non- 
macro call elements. 

6. The called macro is found In one of the 
macro libraries. 

7. The macro lines are specialized from 
the command line arguments and writ- 
ten to the output file. 

8. Return to step 1 until end of input file. 

Before reviewing these steps in detail, it 
may be useful to exannine a typical MetaBa- 
sic command line which is not available but 
for which a particular user has great need. 
His application consists, in this example, of 
retrieving a large numt>er of customer ac- 
counts at random times in a large number 
of programs. He decides to invent the com- 
mand: 1000 iFETCH ACCOUNTS FROM 
FILES ON DRIVES. The command word is 
Fetch. ACCOUNTS is functional element 
one, From is element two, FILES is element 
three, On is element four, and DRIVES is ele- 
ment five. He might also have designed the 
command syntax: 1000 :FETCH ACCOUNTS 
(FILES.DRIVES) in which case there would 
be only the command word and a single 
functional element ACCOUNTS, associated 
with parenthetical modifiers. The analysis 
of these lines proceeds as follows: 

• Step 1— Read Input: A MetaBasic in- 
put file is an ASCII-format sequential disk 
file. Each record isalineof the program. All 
characters tietween the first position and 
the first blank space on the line must be a 
numtier from 1-99999. If any character is 
not 0-9, and if the number is not terminated 
by a blank space, the line and the job will be 
aborted. 

• Step 2— Determine Line Type: The first 
nonblank character after the first blank on 
the line must be one of three kinds: a colon 
(:) to signify a MetaBasic command line; a 
semi-colon (;) to signify an Assembly lan- 
guage comment line; or a capital letter (A-Z) 
to signify an Assembly language command. 
Macro call commands ('MACRO = NAME) 
are not permitted in the input file; such calls 
must be processed prior to compilation 
through MetaBasic. (The Precompiler, 
however, will permit macro calls without 
disturbing them.) Assembly language and 
comment lines are written directly to the 
output file. Unknown line types are flagged 
for a Bad Form message and converted into 
comments. Only the MetaBasic commands 
remain for subsequent processing. 

• Step 4— Parse MetaBasic Command 
Line: the first nonblank character after the 



colon twgins the parsing process. Note that 
the position of the command elements is 
not as important as their sequence. For ex- 
ample, wherever a blank character appears 
any number of blanks may appear. The in- 
terpreter searches for the next nonblank 
character until the end of the line. The first 
nonblank character after the colon must be 
a capital letter; any other character will 
abort the line. This first character begins 
the command word, which continues until 
the next blank space. The command word 
may be any length, comprised of A-Z, or 
0-9, and the special characters !,#,©,$,%,& 
and period (.) and is terminated only by a 
blank space (any other character will cause 
an abort). All but the first six characters will 
be truncated from the word, and the remain- 
ing 1-6 characters will be examined for the 
exclusive values JP, CALL and RET. If a 
perfect match is found, the line will be con- 
verted into an Assembly language line and 
written to the output file. If those values ap- 
pear in a larger sequence, however, they wilt 
not be recognized. For example, JPHERE, 
CALLME and RETURN will fail this ex- 
amination. 

Returning to the blank space which ter- 
minated the command word, the compiler 
will search tor the next nonblank character, 
which must also be a capital letter. This 
character signifies the beginning of the first 
functional element, the end of which is ter- 
minated by a blank space, a comma, or any 
of the symbols +,-, *./.<,>.<>, x,< = , 
= <,> = , = >. In addition, a semicolon will 
terminate because it is the beginning of an 
in-line comment; a colon will terminate 



Formal 






Elomont 


DetcripUon 


Stilut 


1 


line number 


required 


2 


blank space 


required 


3 


colon 


required 


4 


command word 


required 


5 


blank space 


required if not end 


6 


funciiona' element i 


optional 


7 


le'minator symbol 


required it not end 


8 


lunclional elemenl 2 


optional 


9 


teimmalo' symbol 


required it no! end 


10 


'unclional element 3 


optional 


11 


lefmmalo' symOot 


required if not end 


12 


funclional element 4 


optional 


13 


terminator symbol 


required if not end 


14 


functional elemenl 5 


optional 


15 


terminator symtwl 


required it not end 


16 


Ignctional elemenl 6 


octional 


17 


terminator symtjol 


required if not end 


18 


tunct'onal elemenl 7 


optional 


19 


terminator symbol 


required if r^ot end 


20 


functional element 8 


optional 


21 


lerminalor symbol 


required if not end 


22 


functional element 9 


optional 


23 


lermmato' symbol 


required if not end 


Table 1. 


MetaBasic command line format. 
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Poor 

Man's 

Floppy 



HIGH SPEED CASSETTE SYSTEM 



Now the vfidefy acclaimed 
JPC Cassette System is available 
tor your TRS-80* computer. 
The price is on/y t90.00 

TC-8 CRSsene System 
JPC Products 
Albuquerque, NM 
Kil: $90 
Assembled: $120 




FOR TRS-80 



[Reprint ot June 1980 Review, 80 Microcomputing] 

lOADN and LOADN'Tilename". except it is 

for use with system tapes. 

OPEN: Required before cassette input or out- 



by Cari A. Kollar 

1 guess I don't have to tell any TRS-80 owners 
how frustrating the cassette system that 
comes with the computer can be. Even with the 
factory mod that's available, the annoyance of 
loading and checking programs becomes just 
barely tolerable. 

If you're like mc, after you've just plunked 
down a chunk of money for a Level II 16K ma- 
chine, "you ain't got nultin left" for even one 
disk drive at SOO bucks apiece. So you suffer. 

A reasonable alternative is the Exatron 
Stringy Floppy (ESF)- This will cost you about 
250 bucks and totally eliminates your loading 
and saving problems, automatically and fast. 
I've had one of these for about six months and 
love it ! 

But, if the price is still too steep, have I got a 
device for you! 

The Device 

The February 1980 issue of Microcomputing 
had an ad that intrigued the hell out of me. It 
was a high-speed cassette system by JPC Prod- 
ucts acclaimed as a "poor man's floppy." It 
made all sorts of seemingly ridiculous claims 
such as "loads five times faster," "stores 50,000 
bytes on a lO-minule cassette," "less than one 
bad load in a million bytes with the volume con- 
trol anywhere between one and eight." 

All this for a measly [901 bucks? Mow could 
this be? A call to Albuquerque answered a few 
questions: Yes, it had its own power supply, 
and, it stored programs five times faster be- 
cause it utilized higher density data. The com- 
puter outputs the information at a higher rate 
out of the rear keyboard connector. 

The ad had even claimed anyone could build 
it even if you have never soldered before. JPC 
would make it work, if you couldn't— for free. 
I was sold. I placed my order, and it arrived 
about two months later (parts shortage). 

1 work in electronics, so I found the unit ex- 
ceptionally easy to build. It took about an 
hour. The manual is superb. (That's better than 
great.) It was clear, concise and exact with no 



ambiguities. Important pans placements are 
stressed (polarity markings on electrolytics, 
bands on diodes, etc.). 

JPC was right! With these instructions, you 
couldn't go wrong. Tlie board quality is excel- 
lent. It is double-sided and parts locations are 
clearly marked on the component side of the 
board. There are no jumper wires to install. 
JPC utilizes PC traces and piated-through 
holes for connections to traces on the other side 
of the board. 

Also, there are absolutely no adjustments or 
settings to bother with. 

The documentation is a sheaf of 8 '/j x 1 1 pa- 
pers stapled together. It is written in the nicest 
formal I've seen in a while. Each command 
and/or subjects is covered on its own sheet in 
large type. All explanations are in easy to read 
English — not computerese. 

Commands and Features 
SAVE"niename": Saves your BASIC pro- 
gram on cassette. 

LOAD: Reads the next BASIC program from 
the cassette. 

LOAD"niename": Searches for and loads the 
specified file from cassette. 
LOAD? and LOAD?" filename": Reads file 
from cassette, and compares contents to mem- 
ory. 

LOADN: Prints a list of all the programs on a 
cassette, until interrupted by the "break" key. 
LOADN" filename": Same as above except the 
tape will stop at the end of the program named. 
KILL: Removes the file manager program 
from memory so that ihe extra memory can be 
used by large programs. 
RSET: Allows the operator to rewind and posi- 
tion the tape on tape recorders that have these 
functions tied to the motor control jack. 
Rl]N"niename":TC-8 searches foraspecified 
program and runs it immediately. 
PUT"niename": Same as SAVE "filename", 
except it is for use with system tapes. 
GET: Same as LOAD, except it is for use with 
system tapes. 

GET"niename" : Same as LOAD "filename", 
except it is for use with system tapes. 
GET? and GET?" filename": Same as LOAD? 
and LOAD?"filenamc", except it is for use 
with system tapes. 
GETN and GETN"fnename": Same as 



put of a data file can be attempted. 
CLOSE: Required to end a cassette data file. 
PRlNTiC; Allows numerical or siring data to be 
output to a cassette file. 
INPUTiC: Allows numerical or string data to be 
mput from a cassette file. 

I haven't counted them, so I don't know 
about the "one load in a milhon bytes" claim, 
but my son, Anthony (age II), loaded about 30 
of his programs from his Radio Shack format 
tape to a new TC-8 format tape. He's run them 
all and found no bad loads. 

Unlike the standard tape system, you can po- 
sition your tape anywhere before the program 
you want and not have to look for a blank spot 
between programs. The TC-8 patiently wails 
for the program you want and then starts load- 
ing without getting confused by the portion of 
the previous program you just fed it. 

Try that on your regular cassette system; 
you'll wear out the reset button.! 

ORDER NOW 

To order your TC-8 kil, send your check or 
money order for $90.00 plus $.3.50 postage 
and handhng to JPC PRODUCTS CO., 12021 
Paisano Ct., Albuquerque, NM 87112 (New 
Mexico residents add 4P?ii sales tax). Credit card 
orders accepted by phone or mail. Personal 
checks will delay shipment. We will otherwise 
immediately ship you the TC-8 kil, the cabinet, 
the ribbon cable, the power adapter, an instruc- 
tion manual, and a cassette containing the 
software. 



ly JPC PI 



u-'190 



PRODUCTS CO. 
Phone (505) 294-4623 
12021 Paisano Ct. 
Albuquerque, N.M. 87112 



^S»» Li»l of AUvtnistrs on pagt 40? 
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". . . JPHERE, CALLME and RETURN 
will fail tliis examination." 



Argument 




Number 

1 


Contents 


command word 


2 


line number ot source inpul (ile 


3 


nth time this command has been used in this program 


4 

5 
6 

7 
8 
9 
10 


number ot lunclional elements in this call 


Functional element numbef 1 


11 


numtjer of parenthetical sutielements in this element 


12 


subelement number 1 


13 


sut^element number 2 


14 


sut>element numt)ef 3 


15 


subelement number 4 


16 


subelement number 5 


17 


subelement number 6 


18 


terminator symbol which ended this functional element 


19 




20-29 


Same as 10-19, for functional element number 2 


30-39 


Same as 10-19, for functional eiement number 3 


40-49 


Same as 10-19, for lunclional element number 4 


50-59 


Same as 10-19, for functional element number 5 


60-e9 


Same as 10-19, for functional element number 6 


ro-79 


Same as 10-19, for functional element numtjer 7 


80-89 


Same as 10-19, for functional element number 8 


90-99 


Same as 10-19, for functional element numtjer 9 




Table 2. Macro call structure. 



because MetaBasic allows only one com- 
mand per line. The colon will be converted 
into a semicolon without comment or error. 
If a left parenthesis "(" is encountered while 
searching for the terminator symbol, the 
compiler will search only for a right paren- 
thesis ")" before resuming search for the 
terminator symbol. The first functional ele- 
ment will be separated from Its parentheti- 
cal unit (e.g., "ABS(A)", where "ABS" will be 
separated from "(A)"), and the functional 
element will be truncated to six characters 
If It is longer. It will then be examined for an 
exclusive match against "EQU." If a match 
Is found, the line will be converted into an 
Assembly language command and written 
directly to the output file. 

If a parenthetical unit was found at- 
tached to the first functional element, It will 
be examined internally for one to six subele- 
ments. A parenthetical subelement may 
contain the same character range as the 
command word; multiple subelements 
must be separated only by a comma. 

Returning to the symbol which terminat- 
ed the first functional element, the compiler 
will search for the next nonblank character 



OVER 75 TRS-80 PROGRAMS ON TAPE 
EACH YEAR... 



For the MODEL I III: 

OI' Ebenezer Cload wiped his glasses off — and grabbed for his 
gold pouch I With CLOAD Magazine, he could use and enjoy 
his computer for the price of a turkey with stuffing I And he could 
send Bob home early, since the programs did not have to be 
typed in I 

He now gets a 30 minute tape each month with 7 or more 
practical, tutorial, utility, and game programs to CLOAD and 
run. While he CLOAOs the programs, he reads the editor's 
babblings that come with each tape. 

Don't let ghostly images cloud your TRS'80's screen. Get a 
subscription to CLOAD Magazine! 

Ttw Fln« Printf The Bottom Unci 

Issues are sent Fifst Class Mail. I year (12 Issues) S42.00 

All issues from Oct. 78 on available — 6 months (6 issues) S23.00 

ask for list (24 Level I issues also). Single copies — 

Programs are for 16K Level II, I6K Back issues SS4.50 

Model III, and occasionally for disks. Good Games #1 SI2.00 

Calif residents add 6% to single Adventures #1 SI3.00 

copies and anthologies. Ovefseas — Anthology #1 SIO.OO 

add SjO to subscriptions, S5 to Anthology #2 S15.00 

anthologies, and S] to single copies. TRS-tO is a trademark of Tandy Corp. 

Sent AO rate. MasterCard/ Visa/ Gold also welcome 

• 80 Microcomputing, November 1981 




PO, Box 1448 Santa Barbara, CA 93102 
(805J 962-6271 
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". . . an external name needs to be 
defined only once for the entire program." 



as the beginning of the second functional 
element. Its analysis will continue in the 
manner described above for the first func- 
tional element. There may be as many as 
nine functional elements. 

The Macro Library 

The internal macro call table is essential 
to implement compiler command lines. The 
macro library module providing the Assem- 
bly language used by the compiler must ref- 
erence these syntactical elements; it does 
so according to the standard JOFES 99-ar- 
gument macro call structure (Table 2). 

Standard macro writing procedures, 
referencing these argument numbers, will 
include the correct Assembly language In 
the compiled program. For example, the 
MetaBasic command line, 1000: FETCH AC- 
COUNTS {FILE$,DRIVE$) where ACCOUNTS 
is the functional element associated with 
two subelements FILES and DRIVES, will t>e 
serviced by the macro library module: 

1000 MACRO = FETCH 

1010 FT&&02 EOU S ;L1NE &&02 



1020 'BOOL«i&00)=(1)) 

1030 FETCH EOU D0O0H;DEFEXT 

1040 'ENDBOOL 

1050 CALL FETCH 

1060 ■BOOL((&&04)=.(1)) 

1070 DEFW iilO 

1080 ENDBOOL 

1090 'BOOL((&&04K >m 

1100 :'■* ERROR IN ACCOUNT NAME"" 

1110 ENDBOOL 

1120 'BOOL((&&11) = (2)) 

1130 DEFW&&12 

1140 DEFW4&13 , . 

1150 'ENDBOOL 

1160 'BOOLHiillK >(21) 

1170 ;"'ERROR IN FILE NAME OR DRIVE 

NUMBER"- 
1180 'ENDBOOL 
1190 'ENDMAC 



The result of this command will generate 
the Assembly language. 

The entry tag FT1000 was generated from 
argument two so the source-code program- 
mer could refer to this routine by a constant 
name. The same information appears on 
the end of the line in a comment. Because 
this is the first time this macro has been 
called In this program, the external refer- 



ence Is generated at line 1010. in a second 
or successive call this line would be 
dropped out; an external name needs to be 
defined only once tor the entire program. 
The address for the data variable AC- 
COUNTS has been truncated to the most 
significant six characters, "ACCOUN." 
Since the names of the file and drive were 
not longer than six characters, they were 
defined in their complete form. If the ac- 
count name had been missing, or If either of 
the file name or drive number parameters 
had been missing, the appropriate error 
message would have been included in the 
program Instead. 

The program Fetch called in this sample 
has been assumed to be external to this 
program and, therefore, flagged with the 
DEFEXT Indicator. If it were another macro 
called into this program in source form the 
macro programmer would not have includ- 
ed the DEFEXT comment on line 1030 of the 
macro module. Instead, a macro call to 
Fetch would appear elsewhere in the pro- 
gram, and the program would have passed 
through the Assembly language macro pro- 



. . . FOR UNDER S0.75 (that's SIX BITS) APIECE I 

For the COLOR COMPUTER: 



You just spent your vacation money on the Extended 
BASIC Color Computer, and now you want to buy 
softwareiipv? 

Don't skip meals — get CHROMASETTE Magazine! Each 
month your computer will get a balanced diet of 6 or 
more programs on cassette (just load and run!). Along 
with the tape comes some notes on the programs, along 
with tidbits on the Color Computer world. 



The Fine Print: 

Issues are sent First Class Mail 

Alt issues from July 81 on availdble — ask for list. 

ProgranTs are for the Extended BASIC nxxilei only 
Calif residents add 6% to single copies Ovefseas — 

add 110 to subscriptions, add $1 to single copies 
Sent AG rate. 

MasterCard/Visa welcome! 





Chromasette Magazine 

PO. Box 1087 Santa Barbara, CA 93102 
(805)963-1066 ^32 



Chromasette Magazine 

for those who relish every byte (that pun even hurt me). 

The Bottom Line: 

1 year (12 issues) $45.00 

6 months (6 issues) $25.00 

Single copies $5.00 



^ 5«« List of Advertisers on page 402 



. the manufacturer who insists upon continuing 

to do every iittle thing for its customers 

will defeat its own purposes." 



cessor before compilation. This illustrates 
a major difference between macro process- 
ing in Basic and in Assembly language. The 
Basic macro processor recognizes com- 
mon macros and calls them into the pro- 
gram only once during each specialization 
run. It also arranges the various macros at 
different locations of the program. By con- 
trast, the MetaBasic Compiler Includes 
every macro exactly where It Is called, every 
time It is called. The macros Intended to 
function as common within the Assembly 
program must be brought In expressly by 
the programmer; the Compiler could not 
otherwise know when a macro is intended 
to be internal or external. 

A good way to become accustomed to 
writing Assembly language macros is to 
compile a small program, list It, and then 
list the macros in the macro libraries used 
during specialization. The names of the 
macros are the first six letters of each 
MetaBasic command word. Thus, Load is 
both a MetaBasic command word and the 
name of a macro library module. 

Much of what Is called "common sense" 



is information acquired through noninstltu- 
tionalized education— Just twing around 
the subject and around other persons In- 
volved in that subject. Thirty years ago, 
there was no common sense surrounding 
the subject of computers. Today thousands 
of people have their own computers, get 
together in a variety of commercial and 
social contexts, and exchange their knowl- 
edge. The appearance of a body of "com- 
mon sense" about computers Is the hall- 
mark of a maturing, socially Integrated 
industry which will take a new shape and 
direction of its own, essentially tMyond the 
control or influence of any manufacturer. 

While it was formerly required that the 
computer hardware manufacturer provide a 
broad range of assistance devices In the 
software sphere because of the general 
lack of common sense In the user communi- 
ty, that Is no longer true. Like a parent who 
cannot adjust to the maturity of his or her 
child, the manufacturer who insists upon 
continuing to do every little thing for its cus- 
tomers will defeat Its own purposes. It Is not 
unfair to state that the single greatest limi- 



tation on the usefulness of microcomputers 
today, and those microcomputers in the 
TRS-80 Model t class In particular. Is the linv 
Itation imposed by the "helpfulness" of the 
manufacturer. 

Optimal economies cannot be achieved 
by so many different kinds of users until the 
manufacturer— or soma other source— pro- 
vides tools which continue to help in a dif- 
ferent way. The t wenty-f I ve-y ear-old "child" 
occasionally needs help, but not In the 
same way he needed help at age ten. The 
user community stands in this posture to- 
day as we seek optimized economies in the 
application of our microcomputers. We do 
not need to be told what to do and how to do 
it at every turn. 

MetaBasic is one, perhaps the first, at- 
tempt to move into this new sphere of ma- 
ture support for the microcomputer user. It 
will not be the final solution to this need. 
With another five years' experience, the 
community as a whole will determine new 
and vastly improved devices for acquiring 
that support appropriate to contemporary 
economic need.B 



COOSOL DISCOUNTS 



^n 



PRINTERS 




CPU— TERMINALS— SOFTWARE 

ADDS COWPUTEfl SYSTEMS 

• MU1TIVISION3 Step 3 516-019000 $11,275 

• MUl T (VISION 3, Step 2. 516-018000 S' 0,172 

- MULTIVISION3, Step '. 516-017000 S 9,070 

• MULTrviSION? 516-020000 S 7,520 

• MUITIVISION 1 516-006000 S 3,31Z 

• ADDS ACCESSORIES S SOFTWARE CALL 



ALTOS MTU/FLOPPV/ HARD DISK 

^^^^^^^^^ • eOOO-/M!U 1MbFL 17 2MT S12.H8 

^ 

HARD FLOPPY DISK 

20eK RAMSSP- 10.10Mb S HARD DISK 

• 1M0 H'l7 2 MT8000-10MTU S 9,616 

• IMh t loppy SOOO-100 S 7,875 

Epson MX80 8541-0001, S4e9 CALL • 1.2Mti Floppy 8000-10 S 7 A38 

Epson MX70 B341-0COS S999CALL • ALTOS Accessories ft Softwafe CALL 

Epson MXaO'GRAFTRAX 8541-8915 »S*»CALL 

Epson MX80 FT 8fi41-0001. SS9»CAt L TELEVlOtO TERMINALS 

EpsonMXBOF.TGBAFTRAX 854 1 -0075. S&**CALL .910C SS95 -9120 . .. S7C5 

Epson MXlOO 9624-0024 SWfrCALL ■ 9?oC. , , , S750 " 9500 S959 

Epson caDles ana cards CALL , tElEV-DEO Accesso.** CALL 

NEC Sprnwr,ter 55t0 1 S2495 

NECSpinwriler SSiS- 1 S249.S 

NECSpinwrler 5520-1 S2880 NEC COMPUTER SYSTEMS 

NEC Spin*riter 5525-1 S2950 • NEC Computer PC-6001A SI.OM 

NECSpinwnler 5530-1 S2495 •NEC lO Unit PC-8012A S 6Z6 

NEC Accessories CALL .NEC~lOPoft PC-B033A S IM 

AN ACQ M Parallel ANC150P Si 195 • NEC- DISK DRIVE PC-803'A S 1.056 

ANACOMSERIAL ANC150SS119B .NEC DiSK DRIVE PC-8C32A S 931 

• NEC Gi Monitor JB-1201 S 220 

■RegiMcred Tiaifcmark o( Tandy Corporation .NEC Col Monitor JC-t2Ce S 995 

■FACTORY DIRECT ' NEC Accessor.es ft Software CALL 

COOSOL, INC. P.O. BOX 743, ANAHEIM, CALIFORNIA 



"COOSOL DATA LOGGER 




tractor feed. b8 column 

• heavy dutv-continuous use 

• 5 x 7 up to 10 x 14 character dot matrix 

• upper lower case 

• Bit plot graphics 

• SERIAL AND parallel INTtHFACES 





Part No. 


Prica 


Kit 


101B-80KE 


495 


Assembled 






& Tested 


101B-80E 


S545 



COOSOL 48 COLUttN PRINTEftS 
ARE AVAILABLE AT S3SS 



COOSOL CABLES 

Parallel S29 00 

Serial S29 00 

TRS-BO Model r SG9 00 

92805-0743 (714) 545-2216 



248 • 80 Microcomputing, November 1981 



INTRODUCING PMC-81 




A New "Workalikc" Computer In The PMC-80 Family 



The PMC-81 is a disk oriented computer 
which maintains software compatibility 
with the disk-based Level II TRS-80* 
Model I computer as well as its sister 
PMC-80. 

The PMC-81 starts with 16K of memory, 
14K of ROM, utilizes a Z-80 micropro- 
cessor and contains a complete stand- 
ard keyboard, built-in amplifier and 
speaker for sound, cassette interface 
and video monitor interface. Like the 
PMC-80, the PMC-81 uses the same 
EXP-lOO Expander to add 32K more 
memory and interfaces for mini floppy 
disks, printer, RS-232C and S-lOO bus. 

As a woricalike computer, the PMC-81 
offers some extras over the original TRS- 
80 Model I. First, the PMC computers 
are still in production and being sold as 



brand new units with software compati- 
bility to all previous Model Is. Second, 
we offer S-100 bus interface as an option 
in our Expander. Third, our PMC-81 has 
a user callable keyboard routine that 
provides upper and lower case charac- 
ters with an identiflable blinking cursor 
for each case plus automatic repeat for 
each key and a print screen command. 
Fourth, the PMC-81 has both a Host and 
a Dumb Terminal routine in the ROM 
which work with the optional RS-232C 
interface in the Expander to permit 
communication between two PMC-81s. 
The Dumb Terminal routine also may be 
used to communicate with timeshare 
networks or with bulletin boards. 

Best of all, the price for either the PMC- 
80 or PMC-81 is below the price of our 
competitor's offering. 



'TRS-80 is a trademark of Tandy Corp. 

Personal Micro Computers, Inc. -- 

475 Ellis Street, Mountain View, CA 94043 (415) 962-0220 



TECHNIQUE 



For those of you w?ho must edit and run. 



Chain Command 
Implementation 



Roger L. Pape 
7545 Marble Drive 
Liverpool, NY 13088 



Have you ever wanted to change a pro- 
gram after spending much time enter- 
ing variables? This article describes a pro- 
gram chaining that will allow you to edit 
programs and continue execution without 



(40A4/5) 

(40F9/A) 

(40FB/C) 

(40FD/E) 





RESERVED AREA 




I/O BUFFER SPACE 




B4S/C PROGRAM 
SOURCE STATEMENTS 




SIMPLE VARIABLES 




ARRAY VARIABLES 




FREE SPACE 




STRING STORAGE 




PROTECTED AREA 



losing previously entered or calculated 
values. 

The routines are designed primarily for 
cassette-based systems. The chain com- 
mand is essentially equivalent to the 
CLOAD and run commands, including an 
optional file label character or starting 
statement numt>er. 

The procedure used to save variables 
while modifying source code in the current 
program is spilt Into two function calls. The 
first call moves the variables to upper 

4000u 



(40A0/I) 

(40BI/2) 

PROTECTED AREA 

TOP OF 

MEMORY 

Fig. 1. RAM Memory Organization and Pointers In TRS-80 Level IL 
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memory and protects them. Then control 
returns to the command level. Use existing 
system commands to delete, insert or edit 
lines. After all modifications are made, a se- 
cond function call restores the variables to 
their normal position and resumes execu- 
tion at any point in the program. The second 
function should only be permitted if the 
variables had been moved earlier. Unique 
keywords should be defined for the three 
functions. The choice of Chain is obvious. 
For the command to protect variables 
before modifying the program, I selected 
Change. Restart was selected to denote the 
rerunning of the program. 

Because the preserve-white-editing fea- 
ture might be used at any time, these rou- 
tines will remain in memory. Therefore, the 
package is as compact as possible and in- 
stalled in protected high memory. Finally, 
this version is self-installing, relocatable 
tielow any other patches already loaded in 
upper memory. 



Calling Convention 

The standard system commands and 
functions are converted to single byte to- 
kens when statements are entered. This 
process not only saves space, but also 
eliminates the time required to match 
strings of characters to a table of keywords 
when the program is executed. When addi- 
tional commands are included, you should 
also use tokens, particularly if the com- 
mands are inserted in program statements. 
Otherwise, the character strings in 
each statement must be compared to the 
additional keywords as the statements are 
Interpreted, slowing down execution time 
significantly. Unfortunately, though, almost 
all the possible 128 token values are used in 
the TRS-80 Level II software and there is no 
provision to extend the set with a second 
token byte. 

Rather than add functions as separate 
commands, treat these functions as exten- 
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The jury is in and the verdict is . . . "outstanding!" 
Reviews from all of you who purchased MAXI 
MANAGER (not to mention raves by many top 
microcomputing magazines) have heralded it as the 
definitive data base managing system. We knew that 
business owners and hobbyists demanded the finest 
data base managing system available. To all of you 
who praised us for MAXI MANAGER, we extend our 
thanks. And to those of you who have yet to try MAXI 
MANAGER, we invite you to experience this incredible 
system today. But don't take our word for it (or our 
jury's). Judge for yourself. 



JUST CHECK SOME OF THESE FEATURES 

Supports six different relational search techniques. 

Comes with progFammer's interface. 

Over 120 pages of documenlation. 

Supports up to 20 user defined fields of 40 characters each. 

Record length up to 800 characters. 

Files can be up to four disks m length. 

Compatable 35, 40, 77 & 80 track drives with proper 

operating system. 

Has calculated equation fields. 

Complete report generator. 

V\/orks hand in hand with any word processor. 



MODEL 1 version requires TRSDOS 2.3 and is compatable with 
NEWOOS 2.1 & NEWDOS 80 

MODEL 3 version comes on TDOS. a special version ol the DOSPLUS 
operating system. 

Requires 48K of RAM and one disk drive minimum 



Order 




"The routines are designed 

primarily for cassette-based systems." 



sions of an existing command. Certain 
commands include "hooks" in the reserved 
RAM area to provide for changes. At some 
point in the processing of these commands 
program execution jumps to the RAM area. 
The default code stored there at power-up is 
simpiy a Return instruction. However, it can 
t>e modified to a jump that transfers execu- 
tion to an area where the extensions have 
been loaded. One of the modifiable com- 
mands is Run. Therefore, it was decided to 
invoke the functions with Run Chain, Run 
Change, and Run Restart as the form of the 
commands. The patch will be entered only 
when a Run command is tielng processed, 



not as each line of code ts interpreted. 

DMcrlption of Routine 

To obtain the compactness of Program 
Listing 1, 1 used existing Level II system rou- 
tines and pointers stored in the reserved 
area. All the code to be installed is "position 
independent" so that it can t>e automatical- 
ly relocated below existing routines. Re- 
turns to the system assume Level II (cas- 
sette-based) operation. Modifications 
would be required to operate with a DOS. 

Code to Install Patch 

The first portion of Program Listing 1 



simply assigns labels to the various entry 
points in ROM and the storage locations in 
the reserved area where values and pointers 
needed in the routines can be found. Lines 
440 to 610 are used only when first loaded to 
move the routines up into the highest avail- 
able memory space, install the vectors to 
the patches and set the memory size point- 
er to protect the relocated routines. The in- 
stallation code is not protected, so It will be 
overwritten later by the string storage. The 
value in the ORG statement Is arbitrary. It 
may be any convenient starting point in 
memory where the machine code can be 
stored temporarily as it Is loaded from tape. 
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Fig. 2. Chain Sequence 
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AUTHORIZED TRS 80® DEALER #R491 





26-1062 

Model III 1BK RAM 
Model III, BASIC 




26 - 4002 

Model II, 64K 



TRS-80' Color Computer With 
Extended Color BASIC 

$825.00 

WE ACCEPT CHECK, MONEY ORDER, OR PHONE ORDERS WITH VISA OR MASTERCARD. SHIPPING 
COSTS WILL BE ADDED TO CHARGE ORDERS. DISK DRIVES, PRINTERS, PERIPHERALS, AND SOFT- 
WARE-YOU NAME IT, WE'VE GOT IT. WRITE OR CALL FOR OUR COMPLETE PRICE LIST. 

C& S ELECTRONICS, LTD. 32 EAST MAIN ST. MILAN, MICH. 48160 

{313)439-1508 (313)439-1400 "'^^ 

C & S ELECTRONICS MART IS AN AUTHORIZED TRS 80^ SALES CENTER STORE #R491 
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Software 



FEATURE SPECIAL RliWk s CuDe Dy Elf II 

A in»cro aaspuuon ot me immensely popular RuCNk's Cutoc 

by Ideal. Six sides are diiplayed simultaneously- Saves current 

cube to tape for later play Requtred equipnnem. 9S. Lvi II 

orNi. )6K 

Ructiks Cube . . Stock #403 

Introductory Special S6.95 |I lb.) 

MASTER GUESS BY Fl/ II StockNoAOl 
wtfi TRS graphtcs for more concemrationi 
(See our Septennber ad for more detaiil 

SriUiu$TS6 95|Ilt).| 
Required Equipment R S. Lvi It or IIJ. 16K. 



REFLECT— TRS aVFLFil StOCK fNJo. 40^ 
me exctting new "Minder Binder' game 
(See ouf October ad fof con^jlete irtormatiOfil 
S9 9S for me cassette (1 Ib.f 

BILUST TWF HOVE MAMAGfcMtNT TOO. 

Stock ISh3 400 

(See our September ad tor all tetsi Required Equipment 

R S. Lvl II or tfKvitn 16 K Si' 9S 



J 



Hardware 



FEATUfTE SPECIAL... HARDWARE BOOKS 

Self Te.irrir>g guides ttw: (n^itte t soax^cnmofeftjn. 

CHOtCE OF TWO tX)th ternficl 

TRStiO'SASIC games, qraph'Csandpr?ct)calapplications 

Stock Mo 600 (reg. Sfl <5J S7 95 

MORE TRS'" 90 BASIC ejipiains ait TRS-80 (ewei tl Basic 
statements, commands and features not covered In aoowe. 
Stock fSto 601 (reg S8 951 S7 95 

MANY OTHER TITLES AVAiLABLf — CAU OR \X^ITE 
FOR LIST 

COMPUTER EQUIPMENT 

Stock 

No. Printers Price" 



903 PiastKLbra7casefor8 (I ib.| S 4.99 

CALi FOR BEST PRIC ES ON . , . 
PfcPCOMA^JDMORE 

RIBBOMS AND WHEELS 

Stock No. Rfcbons 



Price Weight 



500 ZippackLPI. N. IV 

Muftistnke cardan 

501 Oiabtorv^VP^ 

502 Oume 

503 NEC 



S 16-00 

$ 12 95/3 

$ 995/3 
S204S/3 



IIP. 
lb. 

lb. 

lib. 



MAGNETIC MEDIA -QUANTITV DISCOUNTS -CAUJ 



200 
211 



212 
201 
203 
204 
205 
207 
213 

904 

905 



OklOdta Micrckline BO 

THE NEW Asl OKIDATA 82 A 

120 cps FAST . Bidirectional 

wim LC decender 

83 A I with 13 inch carnage) 

Okioata Microiine 82 

Tractors 

RS-232-25AcrwDuf 

RS-232-2Kcharduf 

Centronics 737-1 fJISO OO Rebate! 

Cemronia 739-t 

with dot addressable graphics 

Novation C. A. T 

Movatlon D. C. A. T. 



$38900 



$575 00 
$84900 
S559 00 
S60X 
SI75X 
S255 00 
S69900 

S849.00 
S145.00 
S155.00 



Stockist Verbatim w/D4tai(fe 

(wrth hub rings) 



Pftce Weight 



103 MD52S-01 526 9S It) 

104 MD 52501 w/pia$iic case $27 95 I b 

105 MD 52510. -16 $2695 lb 
MD 525-10, 16 w/pla$lic case $2 7 95 lb 

109 FD 34-8000 539 93 2 b 



110 viith hub ring 

and hard box 



(XIOS360 00) 
$43 95 2 b 

[xioMoo.ro) 



MEMORYCHIPS— CLOSE OtTTI 

Stock No 



Price 



Weight 



CC>MPUTcff ACCESSORIES 



900 Flip icfl. c« ryftf fki.sUK' t;f storage 
fcr5C-6CDrs«ctte5[^'-'4'discsJ $ 23 95 

901 Same |tor 8* discs) $ 24 95 
907 PiasTir library rase tor 5" (lb) S 2 99 



800 Motorola Ceramic 16 K 200 rn 
memory chips for 

Modi, El. Mod 111 519 95/8 2 lb- 

NO BETTER 2X MS CHIPS • n ■ , 
AVAiLABLEl 

801 SnuntsforModI $4.00 lib 



SHIPPING INFORMATION 

• WE PREPAY Aa ORDERS OVER S50 00( 



NOTE . . . these are our prices at me lime of puDlcation 
because of 2 months delay in publkiation they 
could tie even less . CALL! 



SHIPPING • S2 SC ffi' tifit 3 to 554 eacn for adflfticna ids 
RATES • COO s add $2.00 JU S onlyf 

• Foretgn orders. 5300 ID. surface. S7 00 to. Air PP 

• P O. Bows — include phone number tor UPS 
Please aMow one uj two weeks for checks to clear 

DISCOUNT j ?% Cash Discount from total (incluoing shipping 
1 and handling) 
^Casn. Chedc MO. or COD 



P.O 8c« I56A Wheditidge, Colorado 80034 

Colorado Re^denLs c«;d 3> Sates Tan 

CALL COLLECTI 24 HOUR LINE T-303-43I-4I54 




/VTA INC. 



**Sm Ltt of *i/mnmn cnpmg9 408 
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® 



GRAPHICS 



512x240 RESOLUTION 



forTRS-80® model II 

Also for Zenith Model 89 & Superbrain'" 



XCEl GRAPHICS UNIT— Acofnpletely assembled hardware relrofft package providing high resolulion graphics 
display, normal video display or both displays simultaneously. $895.00 




$175.00 



xceC" 
< 



SYMBOL GENERATOR— Subfoutnes !□ 

genetaie characlets aid slnngs wiih bold 
lace ant) 90' relation options cuctes arcs 
vectors rectangles, area tills iwth reverse 
video option All callable Irom your programs 



$175.00 



XCEl' 



GRAPH PLOTTER-Cnoice Ot four repiesen 
laiions (line grapfi fiistogram bar grapf" and 
scatter ploil with automatic annotation ot a»es 
and auiomatir M;aling rfiat a^ows any numt>er 
ol lunclioos 10 be displayed on one set Ol axes 
AM callable trom your pfog'ams ^ 





XCEL' 
< 



$345.00 

3-D GENERATOR— User accessible rou- 
tines (Of crealio" eOiring and jiewmg wire- 
trame obtects from any angle and in any 
orieniaiion wilii scaling zoom andaqraptiics 
editor 



$395.00 

XCEL^" SURFACE PLOTTER-TfuepeiSDeclive view 

Willi tuii hidden line renx)val ot curved 
Surfaces trom a user oet.ned viewpoint 
callat^e trom your programs "^ 

$395.00 

XCEL^" GRAPHICS TERMINAL— Emulates a subset 
of ihe Tektronii® 4010 Series Graphics 
Terminal litnctiixis Simple menu driven key- 
board commands 'or corttgii'aiKin and doi- 
aasf and erase mode vectors 




XCEl '" sottwarp packages operate under CPM® and utilize Ihe Microsoft parameter passing mechanism fof 
compatibility wilh high level languages, such as BASIC. FORTRAN, COBOL, PL1 . and PASCAL XCEL software can be 
loaded into high memory and called from your programs onntegraled directly inio your programs through use ol the 

Microsoft linking loader 

FOHADDITONAI PRODUCT INFORMATION (800) 421-1423 



IN CONTINENTAL US CALl TOLL FREE: 



IN CALIFORNIA CALL 



Zfe\ 



(213)320-6604 
MAXTEKJNC 2908 Oregon Court.Torrance, CA 90503 -586 

-r CPW reg.sleteOJcaOemari. Digital Reseatcr 



TRS aO-'eQi'.ii-'<-'-3 iraaenari Tgniti Coip ' Supeftnain irademafk inieflec Daia Systems Tektrori. fegisieted tiadpmaik TekTro-i 



'. . . any absolute memory reference 

to the table must be avoided 

if tfie code Is to be relocatable. . . " 



After moving the stack pointer temporari- 
ly to the I/O buffer area, the routine points 
the HL register pair to the end of the code as 
loaded from tape and points DE to the last 
available memory location as determined 
from the value stored in the reserved area. It 
then performs a block transfer from the end 
to the start. Jump Instructions are then 
loaded Into the appropriate reserved area 
locations to provide for the Run command 
extension and to Intercept the return from 
the CLOAD routine. Finally, the value of the 
first location of the code that was just in- 
stalled is again loaded into HL before re- 
turning to the system software in ROM. 

This re-entry point corresponds to the 
code following the memory size dialog, so 
the value In HL is decremented and stored 
as the new memory protect value. The 
string storage area and stack are also re- 
located below this point. This is a conve- 
nient technique that can be used when any 
machine language routine Is loaded in high 
memory. Simply load the address of the 
lowest location to tie protected into HL and 
jump to 00E7H when returning to Basic. 
This will automatically protect the routine 
and relieve the user of having to rememtier 
what memory size value to enter. 

Scanning a Keyword Table 

The remaining part of the code in Listing 
1 represents the routine that remains resi- 
dent in protected memory. Lines 630 to 880 
check the characters following Run for the 
new keywords used In this patch. Although 
the table of new keywords Is stored within 
this portion of code, any absolute memory 



reference to the table must be avoided if the 
code Is to be relocatable in any area of 
memory without modification. 

This feat is accomplished by the Call Get- 
PC statement. A short routine in ROM is 
called which simply POPs the return ad- 
dress from the stack Into HL and jumps 
back, so that HL contains the address fol- 
lowing the call statement on return. 

The keyword table Is set up in the same 
way as the Basic keyword table in ROM. The 
first character of each keyword has Its most 
significant bit set. After the last word, a 
value of 80H Is used to terminate the table. 
By defining the keyword In this manner, we 
can use the same routine in ROM that Is 
used to scan Incoming statements for 
Basic keywords. This system routine at- 
tempts to match the character string 
pointed to by HL to tfie keywords In a table 
pointed to by DE. If a match is found, a 
value Is returned in both the B and C regis- 
ters which corresponds to the Index of the 
keyword in the table plus 80H. A value of 
80H is returned If Chain Is found, 81 H for 
Change, or 82H for Restart, if no match is 
found, we can exit from the patch. 

When a keyword match occurs, the point- 
er to the remaining characters of the line 
must be saved for later, in case a file name 
and/or line number is Included In the com- 
mand. When Restart is encountered, check 
to make sure that a Change command had 
t>een Issued earlier. If not, the command is 
invalid and Is ignored. 

Moving the Variables 

Lines 890 through 1360 are common to 




80 Microcomputing does not keep 
subscription records on the premises, 
therefore calling us only adds time 
and doesn't solve the problem. 

Please send a description of the prob- 
lem and your most recent address 
label to: 

BO Microcomputing 
Subscription Oept. 
PC Box 981 
Farmlngdaie, NY 11737 



T^anl< you and «njOy your subscnplion 



BIG CP/M* 

programs 

on TRS-80* 

MODELS 1&3 



Pluggable Board (no SOlde'ingi wi(h 4&'&4K 
Ooeraling System S/O Density 5'«' on Mod. 3 
plus 8" on Mod 1 Meiriory eioandfid by 
overlaying ROM with RAM Date/clockw/batlery 

48K CP/M' (minimum system) $199. 

64K CP/M* M«mory A clock $490 

46K CP/M* (ira •xpandable) $340. 

C.O.D. Visa or Masl«rcharg« 



F.E.C. Ltd. 



P.O. Box 2368 Woburn. Ma. 01886 oeSB 

(617) 944-5329 



'Taridy Corp. 
"DHl'tal Rasearch 



At Immt tn INVADLKS gMla OCXID Er<XKiH ta 
ba o«*sml by 5S1. I< you liha famt novlng 
action, hlqri lnt»f-a«t, and ctiallvnqa, ttill- 
Iculty Dt play tram b»ginn»r tn SUPERfiTW. 

m m ««i_xEN ZNS/Aoena * • 

««^'S H«-T«p« ai^.^S S3K-01»V *2*.*S 

m » ONE o X «K uaeRS • * 

Mo> yiK. can hav* a utility prograa triat 
Hill givD you nn* of tria rKnt infiDrtant 
•dvantagss o* ■ultl-di«fc uKvr*. Copy «i« 
flla at a tlaa fron an axlctlng disk- to a 
na« ayslira disk Hlthout copvinQ tha Hhola 
dlak. Uaa ICOPY ar>d mtV.» your atmk ayitaa 
•s vBTkatile as aultl-Oikt. ubarc. 
ICOPY 7IK on« Dlak lap* •14.<W 

In Dlac* orilvra <Qlbl- S2A--431 > 
HOVRCI DlflKETTC <10 ) 9 1/4- CaV.VS 

m-ioo pitiMtD) M/cMLE aon.TC 

DKIDATA niatOLltm PftlKTER M/CMLE.. . .•TTT.«!I 
9HIPPINB h HaHW-IWB FOR PftlNIDW • IS.OO 




UPERIOR 

OFTWARE 



*il SUITE SAltS IM 

►^403 

Write SSI for inrorMllcn abovl Hrkattnt jout 
program: ^.D. *o> 11676 lUxtK [ltv. to t*>)8 



|MMM CHEAP CHIfS ARE NO BARGAIN ^^ 

I BUYING ADD-ON MEMORY? 
I GET THE BEST!!! 

I Mamory tiiluns cost you timt jrx] monay. jjpar>«e I6I( 

I RAM i!\^s hjva jonfl-lo tan n-scrvct liilurs rilJOloU S 

^ chips-lrorr a study Dy R Andarson, Computat Div . 

^ Hewlatl-Packard . raponad in Tin FeoMMlif, 4-26-SO 

5 Weottar 4116 Chips by Fujiisu, NEC, HUacfii, Toshitu 

^ ana MilsuSrsfit lor inosl popular cofnpulff^ »fW 

< aipinsjon mamory Mlrds, includmg 

I 'Appli *AI TU-H'l -NMi Pat 'Htith H-ai 

% 'Suparbraln 'Eipaatfanat 'Mwir (Mm 

° IIIIDTHAIICMIIS THEIEST 

g ;00nsa<: Plastic $23.70. Caiiate 137.19 

"^ tSOnsac Plastic S30 95 

A STATIC UMS 

° 2114 450ns«: S3 30. 300nsac 13 90; 2101 t; 90 

z OTDHE (450 rsac std. ailc to' hi-spaad it raqulrad) 

_ 2708 (4 BO, 2716 bV*12V »9 40, 2716 5V 19 70, 

S 2732 118 90 

a> 

_i Wall Mat any itgitimJe pnca lor comparaoie tfiips Hi- 

voluma usars.daalars. oiclubs. asli lo' quanlity discounts 
SHIPPING 10 I2S J?, to ISO. it ovw (M, FBEE 
COD +t1 40 

DISCOUNIS ON TOTAL ovar 1100, SK, ova' t200, 10K 

MINIS i MICROS INC. • 29416 Tnlwiy 

'96 Agoun, CA. 91301 • l?13| 991-7433 

CA. mtdtnti add GK iibt tii 

2 YEAR WAfiftANTY • CALL US ANYTIME 



% Shii 
I COD 

I DISC 

L 



IS m 
I. " 

J 



I MAXELL' °" ODysm 1 

P A 
^^^^^^^^^^^^^^^^^^^^^^ 

■ i 

T 8-SINOLI «IW u 

R DOWLX DWWITV aoi of 10 1<» SBO e 

§ 8' DOUSLI ttom R 

a DOUBLK DmSITY SoiDi10torl70 A 

^ 8^' MINI Bo. ofWfof S80 ^ 

B SfH'MIM Bo>o( B (n SS8 M 

M (Sp*cHy-B-SoflorHaniS*clar/5-SonorHMSac*Drt * 



COD IIOO AdaHkmBl 



^* ^H ^^^^W^^^^^^^^P^^^^^^^^^B^^^' w^^^^^^^^^^ M^ 



238 EXCHANGE STDEET 
CHICOPEE, MA. 01013 

4I3-Sfl2>4761 

■alabUthatf IMO . cioMtf monaa^i 
I ATARI ^^^im T)/99 4 ^MBM 



PET I 



i^Smt Usi ol AtJv9rtisers on oaoe 402 
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". . . some string variables may be located 
within the Basic statement storage area." 



the processing of both the Chain and 
Change commands. After saving the cur- 
rent token, this section moves all variables 
to the upper portion of memory and pro- 
tects them. Remember that some string 
variables may be located within the Basic 
statement storage area. These must be 
moved to the string storage area; otherwise 
they will be lost when new statements are 
loaded or the memory references will be in- 
correct if statements are moved in the edit- 
ing process. Fortunately, there is a system 
routine in ROM (part of the FRE command 
processing) which pacits the string stor- 
age area before reporting the remaining 
space available. Normally, this routine 
would only operate on strings in the string 
storage area. However, we can also pull 
strings out of the Basic statement area sim- 
ply by changing the beginning location for 
the scan to the start of the Basic state- 
ments before the packing routine is called. 
The code given in Listing 1 does not 
check to ensure that the other variable area 
is not overwritten as the strings are moved. 
This could be a problem if a lot of strings are 



HAVING PROBLEMS? 

Are you having problems with your 
Model I. II or III TRS-80 Radio 
Shack software? Is it you or is it 
actually a problem with the pro- 
gram? 

Avoid unnecessary frustration and 
send today for a complete list of all 
known software problems for Radio 
Shack programs, included in this list 
is the latest version numbers. Do 
you have the latest version? 

All for an unbelievable 52.50!!! 
Order Today!!! 

Software Solutions 
220 Village Drive East 
Carmel, Indiana 46032 .,597 

• BONUS • 

First 200 orders will receive a patch to 
remove 2 backup limit on Mode! Ill 
Scripsit/Visicalc 



L 



Program Listing 1. Assembly Language Routine for Chain. 







•8118 I 


COPYRIGHT (C) 1979 








■8120 : 


R. L 


. PAPE LIVERPOOL 


NY SEPT. 1979 






80130 ; 










BBfB 




BB14B GETPC 


EQU 


BBBBN 


ENTRY 


FOR ROUTINE TO GET PROGRAM CO 


UNTER 














eeE7 




B0150 HEKSET 


EQU 


8BE7H 


REENTRY POINT IN LVL II TO SET MEMO 


Ri LIMIT 












1A19 




B816B RESTRT 


EQV 


1A19H 


RESTART POINT FOR LEVEL II BASIC 


1B8F 




88178 INITM 


E^U 


1B8FH 


ENTRY 


FOR INITIALIZATION ROUTINE 


IBPE 




88188 KWSRCH 


EQU 


IBFEH 


ENTRY 


FOR KEYWORD SEARCH ROUTINE 


lUlG 




80191 XEQ 


EQU 


IDlEil 


RETURN POINT TO START PROGRAM 


1D91 




88200 RECTOR 


EQU 


1D91H 


ENTRY 


FOR DATA RESTORE ROUTINE 


lEAC 




0B210 RUNLN 


EC J 


lEACH 


ENTRY 


FOR RIjN with line NUMBER 


28E6 




88228 STHPF 


EQf 


2BE6M 


■ENTRY 


FOR STRING PACKING ROUTINE 


2C1F 




08238 CI^AD 
80240 : 


EOU 


2rJFH 


FHTkY 


FOR CLOAD ROUTINE 


*»M 




88250 SSTR 


EQU 


48A0H 


; RESERVED LOC FOR ?TART OP STRING SP 


ACE 














4BA2 




ei26i LNNUH 


EQU 


4BA2H 


.RESERVED LOC FOR CURRENT LINE NUMBE 


R 
48A4 




08278 SSRC 


EQtl 


4BA419 


jRESERVnD LOC FOR START OF BASIC SOU 


HCE 














4001 




80280 HEHLIM 


EQU 


40B1H 


; RESERVED LOC FOR MEMORY PROTECT POI 


NTEB 














4flDl 




08198 LSTKN 


EQU 


40D1H 


;UHUSED LOC FOB SAVING TOKEN 


4806 




88388 CSPTR 


EQU 


4BD6H 


; RESERVED LOC FOR CURRENT STRING STO 


RAGE 


POINTER 












4flDB 




88 318 INPTR 


EQU 


4BDBH 


iRESERVED LOC FOR INPUT POINTER 


teop 




eB32B SADDR 


EQU 


40DFH 


; RESERVED LOC FOR START ADDRESS 


4Br9 




0B33B SVAR 


EQU 


40F9H 


jRESEBVED LOC FOR START OF VARIABLE 


STORAGE 












4IFB 




08348 SARR 


EQU 


4BPBH 


J RESERVED LOC FOR START OF ARRAY STO 


RACE 














4eFI> 

T. 




80 350 SFRE 


EQU 


40FDK 


; RESERVED LOC FOR START OF FREE SPAC 




88368 ; 










4IB5 




8H37B CLDHK 


EQU 


41B5H 


iBOOK 


FOR CLOAD RETURN 


41 C7 




08388 RUNHK 


EQU 


41C7M 


;HOOK 


FOR RUN XXXX COMMAND 


42E8 

A) 




08390 inPSTK 


EQU 


42E8H 


STEMP 


STACK START (IN I/O BUFFER ARE 




00 480 : 














88418 ; FOLLOWING SECTION INSTALLS MOD IN HIGHEST AVAILABLE MEM 


0R1 SPACE 
















08428 ; 


AND 


AUTOMATIC ALLY PROTECTS ITSELF 






08438 ; 










6888 




88448 


ORG 


6000H 


;SET ORIGIN TO ANY CONVENIENT FREE M 


EHORy 












6»at 


31Ea42 


80450 SETUP 


LB 


SP.IWPSTK 




;SET STACK IN I/O BUFFER SPA 


CE TDfP 












688!) 


21E661 


B0460 


LD 


HI.,XIT+2 




jLOAD HL WITH CURRENT ADDR 


F LAST BITTE 












b886 


EQ5BB14B BB47B 


LD 


DE, iKEMLIH) 




iLOAD DE WITH ADDR OF LAST A 


VAILABLE LOC 












ee8A 


eiDPBB 


80488 


LD 


BC,XlT-RUm:+3 




;PDT LENGTH IN BC 


G0ID 


EDBB 


86498 


LDDB 




;HOVe CODE 


eeer 


EB 


80S0B 


EX 


DE,HL 






eeiB 


23 


80510 


INC 


HL 




|HL NOW POINTS TO START OF R 


ELOC 


CODE 












sail 


E5 


00528 


PUSH HL 




I SAVE FOR LATER 


fiei2 


3EC3 


00538 


LD 


A,BC3H 




;JP INSTRUCTION CODE 


6814 


32C741 


80548 


LD 


(RUHHKl ,A 




;H0OK FOR RTJN COMMAND EXTENS 


ION 














6B1T 


22Ce41 


80550 


LD 


IRUNHK*1| ,HL 






eeiA 


BI928B 


88568 


LD 


BC,CLRTN-RUN> 




jOPFSET 


GBID 


Bi 


80578 


ADD 


HL.BC 




I TO POINT HL TO CLRTN 


601E 


32B541 


80588 


LD 


[CLDHK) ,A 




;HOOK TO INTERCEPT CLOAD RET 


URN 














6821 


22B6 41 


0059B 


LD 


(CLDHK+1) ,HL 






6824 


El 


00608 


POP 


HL 




; RESET HL TO START OF CODE T 


PROTECT 












GB2S 


C3E7«e 


80610 


JP 


KEMSET 




jREENTEH LVL II, SETTING MEM 


ORY LIMIT 
















8B62B : 










6B2B 


EB 


8 9638 RUHX 


EX 


DE.HL 




jSAVE INPUT STRING POINTER I 


N DE 














6029 


CDBBBB 


80648 


CALL GETPC 




;HL WILL POINT 2 LOC BEFORE 


TABLE BELOW 












6e2C 


1813 


80650 


JR 


SCAti 




;SKIP OVER TABLE 


6i2E 


C3 


80660 KHTBL 


OEFB BC3H 




jlST CHAR OF KEYWORD HAS MSB 


SET 














682F 


48 


00678 


DEFM 'HAIN' 




;fiEST OF KEYWORD 


6833 


C3 


806 B0 


DEFB 8C3H 




;2HD KEYWORD 


6834 


48 


806 98 


DEFM 'HANGE' 






6839 


D2 


80700 


DEFB Bd2H 




;3PD KEYWORD 


G83A 


ts 


80710 


DEFM 'ESTART' 






GB4B 


SB 


88728 


DEFB SBH 




;TABLE TERMINATOR 


6141 


23 


81738 SCAN 


INC 


HL 






6142 


EB 


00748 


EX 


DE.HL 




iSWAP POINTERS FOR NEXT ROUT 


THE 














6843 


CDFEIB 


00758 


CALL KWSRCB 




jCHECK FOR KEYWORD MATCH 


6846 
UL 


EB 


00768 


EX 


DE,HL 




(PUT STRING POINTER BACK IN 


6B47 


7B 


88770 


LD 


A,B 




;PUT TOKEN FROM SCAN IN A 

Program continues 
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moved from a program which nearly fills 
memory. After the strings have been 
packed, the routine checks to see If the 
lower limit of the string space must be 
moved down. 

The variable storage area can now be 
moved up Immediately below the string 
area. Although the entire area can be 
moved as a block, the offset to the start of 
the array variables must also be computed 
In addition to the total length. The simplest 
way to save these lengths is to locate the 
stack immediately below the temporary var- 
iable storage and push the two values on 
the stack, along with the old memory pro- 
tect pointer. The value of the stack pointer 
Is then stored as the new memory size 
value. 

If the command was Run Change, we 
have completed the necessary steps at this 
point, if the current token Indicated 
Change, exit from the patch back to the 
command mode In Basic. The only other 
command that would have brought us to 
this point is Chain. Before jumping to the 
tape loading routine (CLOAD), the string 
pointer in the line being interpreted is 
restored in case a filename character is in- 
cluded In the Chain command. 



Returning from CLOAD 

The return from the CLOAD routine is in- 
tercepted at lines 1380 to 1430 because of 
the hook installed when the patch was ini- 
tialized. The section will also be entered 
when a normal CLOAD command is issued 
<as well as the continuation of the Chain 
command). The first thing that must be 
done at this point Is to check the current to- 
ken. If It does not correspond to Chain, the 
patch is exited immediately. Otherwise, the 
string pointer Is again saved in case a line 
numtwr is Included in the Chain command. 

Restoring ttM VarlabiM 

Lines 1440 to 1640 move the variable 
block from upper memory back to Its nor- 
mal position immediately following the end 
of the new program statements. This is 
done automatically as part of the Chain 
command processing or is initiated by the 
Restart command after completing the 
statement editing (following a Change com- 
mand). The steps performed in this section 
are essentially the reverse of those when 
the variable block is moved to upper 
memory and protected. By setting the stack 
pointer to the bottom of the protected area, 
one can then POP off the memory protect 
value and the block lengths. 

A block transfer instruction moves the 
variables back. At the end of the transfer, 
the DE register pair will point to the start of 
free space, so Its value is stored in the cor- 



". . . one can then POP off 
the memory protect value and the block lengths. " 



Program 


conilnumi 








6148 


B9 


BB78B 


CP C 


IB AHD C SAME IF HATCH 


6I40 


m 


Ba79B 


RET KI 


rRETURN IF NO HATCH 


6I4A 


23 


08808 


ISC HL 


jSKIP PAST LAST CHAR HATCHED 


GIIB 


22DP4I 


B8£10 


LO (SADDR) .Hh 


(SAVE STRING POIITTER 


6I4E 


21D14I 


88828 


LD HL,L&TKN 


jPOIIfr HL TO TOKEN STORAGE 


GISl 


PE82 


■ 8830 


CF 82H 


;CHECK IF CURRENT TOKEN IS R 


EPEAT 








6B53 


2SI5 


08848 


JR NZrSVTKH 


tIF NOT, SKIP OVER FOLLOWING 


GB55 


9G 


08858 


SUB (HL) 


ICBECK IF CHANGE CCWHAHD EAR 


LIBR 










GISS 


3D 


B88G8 


DEC A 


;IP SO, DIFFER£MCB 18 1 


GB57 


2871 


08878 


JR Z.UNPK 


(CONTINUE BELOM 


GI59 


C9 


00880 


RET 


;ELSE RETURN 


GISA 


77 


0BB90 SVTKH 


LD (11L},A 


I SAVE TOKEN 


GI5B 


31eB42 


08900 


LD tfL.TMPSTX 




GISE 


P9 


0B9I0 


LD SP,HL 


(RELOCATE STACK 


GB5P 


2AAe4l 


08928 


LD HL,(SSTR) 


(GET START OF STRING STORE A 


REA 










GBGZ 


E5 


88930 


PUSH HL 


1 AND SAVE 


eflG3 


2AA440 


0B948 


LD HL,(SSRC) 


(REPLACE WITH START OF BASIC 


SOURCE 








etee 


22AB4B 


00950 


LD (SSTR) ,KL 




eiG9 


CDEG2B 


00960 


CALL STRPK 


;PACK ALL STRINGS AT TOP OF 


HEHORY 








GflGC 

S 

6IGF 


2ADG40 


80970 


LD HL.ICSPTB) 


(GET BOTTOH OF PACKED STRING 


EB 


809BB 


EX OB.HL 




6170 

RT 

GB71 


El 


80990 


POP HL 


(GET ORIG STRING STORAGE STA 


DF 


01008 


RST IBH 


r COMPARE VALDES 










Prognr" continuws 



D & M SOFTWARE .^393 
1610 SOUTH 97TH 
iTACOMA, WASHINGTON 98444 



;WHEN OUR PROGRAMS 
TALK PEOPLE LISTEN 



FREE: COMPUTER 

CATALOG 
UPON REQUEST 



fPHONE 






CROSS REFERENCE DICTIONARV 

The largesi known cross reference manual for use wiih the I 
TRS-BO'! Voice Synrhesizer No need lo spend more long hours 
learnir>g another computer language Want your computer to say a 
word? Look up the English spellmg. Right next lo it you'll fmtJ the 
phonetic spelling thai your synihesizer needs lo say il correctly 
Included is a large list of commonly used phonetically spe'led 
phrases ar>d sentences ready to type into your program Invaluable 
as a time saving device 

SPELLING BEE (A 3 PART PROGRAM) ^^^ 95 

The comouter administers a lesson consisting of ten words When 
the student has learned them he is given an oral quiz in true spelling 
bee fashion When the lesson has been completed siuOeni may 
sdvance to next lesson. The program is structured so thai an un- 
limited number of lessons can be gived with progresively greater 
degrees of difficulty Excellent for any grade or age level Includes ten 
sample lessons of ten words each The second part of the program 
allows one to create his own spelling lessons on cassette for much 
needed flexibility A third part enables one to practice creatmg new 
words using the phonenc spellings needad by (he synthesizer Error 
trapped and bug free 

MOD 1 16K L II S1995 

!»94 



UTILITIES 



A MUSTFOn ALL 
DftOORAMMERS 



PROGRAM INNOVATIONS 



Modal II Dlsass«mbl»r ^^n 

Output in ASCII or hex to printer or screen ONLY S73.95 

Data Fila Utility (Model 1 Level II, 16 K min.) Creates/Updates/Sorts ANY disk file 

in dependent o l your program DlakonlyS61.98 

Modal II Macro Aaaamblar Incorporate fast, time-saving macros Into assembly 

language programs ONLY S74.9S 



LOOK! (1) CLS 


(2-A) LQ a ,3H 


(2-B» 


RST 8 


PRINT MSG, 1^.13 


LD A. 8 




LD A, 36 


JP2D0S 


RST 6 




AST 8 


MSG DEFM ■ ITWORKS!!" 


LD HL, MSG 


MSG: 


DEFM ■ITWORKSM' 


END 


LD B, 1# 
LD C,#bH 




END 



Both programs produce the exact same code. Program <1) was created with the Macro Agsemblar. 
Save 40%-80% time while reducirfg error probability! 

QRAHO OPIHINO S^CCIAL.10% 0« Ul Orders rK«ivad by 11-lMl "MASTER CARD AND 

OUa OUAHAMTKK All programs will worh as idvertised or your money (eFunded VISA WELCOME" 



SeHDORoeRSTO: 



PROGRAM INNOVATIONS 



P O Bo> 1 368 LiifTtberton. NC. 2a3S8 
Phone 19 191 7 39 321 7 N<qh( 7 39 36 80 
NC RESIDENTS ADO 4 c SALES TAX 



>'S»9 Uat of Atlnrtlttrt on page 402 
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"Once installed, the routine remains 
resident in protected high memory." 



Program continiMd 








6072 3Bei 


eieii 


JR CRSSTR 


;IF CARRY, HL IS LOWER 


6an EB 


01020 


EX DE,HL 


lELSE SWAP Kim DE 


GB75 22Mte 


01030 KSETR 


LD (SSTRl ,HL 


;PESET STRING STORAGE START 


TO LOWER VAL 








6078 ED52F948 
GE 


01040 


LD DE, (SVAR) 


(GET START OF VARIABLE STORA 


6%H: 2AFD4e 


010^0 


LD HL,{SFRE) 


jGET START OF FREE SPACE 


681? B7 


01060 


OR A 


(CLEAR CARRY FLAG 


eiee cd52 


01070 


SBC HL,DE 


iCALC SIZE OF TOTAL VARIABLE 


SPACE 








5062 44 


01080 


LD B,H 




60S3 4D 


01090 


LD C,L 


iTRANSPER SIZE TO BC 


6064 2AAe4B 


0110B 


LD HL, (5STR] 


jGET START OF STRING SPACE 


6087 B7 


01110 


OR A 




fiSat) ED42 


B1120 


SBC HL,BC 


iCALC START FOR RELOCATED VA 


RIABLES 








SIBA F9 


01130 


LD SP,HL 


; RELOCATE STACK BELOW BLOCK 


60SB E5 

LC 

60BC 2AFB40 


01140 


PUSH HL 


ISAVE POINTER DURING NEXT CA 


01150 


LD HL, (SARR) 


iGET START OF ARRAV STORAGE 


60eP B7 


01160 


OR A 




6090 ED52 


01170 


SSC HL,DE 


(CALCULATE OFFSET FROM START 


OF VARIABLES 








6092 E3 


011BB 


EX ISP] ,HL 


(PLACE ON STACK, RESTORING P 


OINTER IN HL 








6093 C5 


B119B 


PUSH BC 


(ALSO SAVE TOTAL LENGTH OP V 


ARIABLES 








£094 7B 
OONTl 
6095 Bl 


01200 


LD A,B 


(TEST CONTENTS OF BC (BYTE C 


01210 


OR C 




GB96 2803 


0122B 


JR Z,SVML 


(SKIP BLOCK TRANSFER IF iERO 


6B9S EB 

K 

6099 EDB0 


01230 


EX De,HL 


(SWAP POINTERS FOR NEXT IHST 


01240 


LDIR 


(RELOCATE BLOCK OP VARIABLES 


609B 2AB14e 


012S0 SVHL 


LD HL, (KEMLIH) 


(GET OLD MEMORY PROTECT POIN 


TER 








Ge9E ES 


0126B 


PUSH UL 


;SAVE OM STACK 


609P 210000 


BU7B 


LD l]L,0eB0H 




GBA2 39 


01280 


ADD HL,5P 


)CBT CURRWT STACK POINTER V 


ALUE 








60A3 22B140 


B129B 


LO (K2MLIK) ,HL 


(PROTECT ALL ABOVE 


GeA6 22A040 


01300 


LD (SSTB) ,HL 


(ALSO RESET STRING SPACE STA 


RT HERE TEMP 








GiA9 3AD140 


01310 


LD A, (LSTRK) 




eiAC FEBl 


0132B 


CP eiH 


(CHECK TOKEN AGAIN 


60AE CA191A 


01330 


JP Z.RESTRT 


(IF CHANGE COMMAND, DONE( RE 


EKTBR BASIC 








60B1 2ADF40 


01140 


LD HL, ISADDR] 


, RESTORE STRING POINTER IN H 

Program coniinuts 



responding reserved area locations. The HL 
register pair will be pointing to the start of 
the string storage space and the stack is re- 
located there. Finally, the start o1 the array 
storage is computed and saved. 

Starting the Program 

Lines 1650 to 1730 perform the necessary 
initialization before program execution and 
reenter the ROM after the point where the 
variable storage pointers are reset. In this 
way the current variables in the storage 
area are preserved. The line number stored 
in the reserved area Is reset to -1 (FFFFh). If 
no line number is specified in the command 
string, execution will start at the beginning 
of the program. But if there are more char- 
acters in the command string (as deter- 
mined by the RST 10H Instruction), they are 
assumed to be the line number at which to 
enter the program. The alternate return in 
this case is the point at which the GOTO 
statement processing interprets the line 
number. 

Therefore, we have provided the option of 
specifying a starting line number or starling 
at the beginning of the program by default if 
no line number is given. 

Using the Routine 

After the routine is assembled and saved, 
it can be loaded after any other patches, 
such as a keyboard detwunce or special de- 
vice driver, have been installed. The setup 
portion must then be run {by typing a / and 
Enter after loading) in order to install the 
routine. Once Installed, the routine remains 
resident in protected high memory. The 



5,000,000/20,000,000 BYTES 

From Micro Mainframe 

10 MEGABYTE HARD DISK DRIVES, with REMOVABLE Cartridges, For Models I / II / III ($5,995/S8990). 

SERIES III H. Model 111 with 5,000.000 byte hard disk drive(s) ($6,995/59,095) or add to your Model I/Ill (S3,795). 

SERIES III F. Model III with a controller board (available separately) and operating system which allows you to start 
with, or move up to, dual-headed or eight-inch floppys. 

From AT-80 

GLB8 — S149 — Radio Shack General Ledger 1.1 with over 30 added features; including a general ledger, classified bal- 
ance sheet, check register and options to use an "automatic" account number or re-do an entry or document. 

ARM — S199 — Radio Shack Accounts Receivable 1.2 with automatic posting o1 standard monthly amounts. 

GL/MI — *49 — Convert your General Ledger 1.1 to GLM. Typical user comment: "Takes half as much time." 

AR/Ml — $49 — Convert your Accounts Receivable 1.2 to ARM. Typical user comment: "Saves hours." 

GL/Ml and AR/Ml require proof of purchase of the original programs, or, send a disk copy of the original programs for 
conversion at no additional charge. Documentation (apply to purchase) — $5.00 each. 

FTOEMDBO - $12 — Displays and Executes the NEWDOS/80 Appendix A programs/keyboard entries. Requires 32K. 

NEWDOS/BO - $135 LDOS - $135 EPSOM MX-70/80/FT - $Call FRICTION KIT - $49 

AT-80 3827 Dismount Dallas, Texas 75211 (214)339-0498 
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LOW PRICES ON TRS-80* 

From Radio Ranch. Inc. 




In business 27 years at the same location pro- 
viding electronic equipment and service. 

We Are Better Equipped To Provide 



TRS-80 

COMPUTERS & 



Accessories 
Sottwdre 



TRS 80 Mod II b4K 3440.00 

TRS-80 Mod III - .12K, 2 Dr 2195.00 

TRS-80 Lrne Printer 6 1020.00 

CORVLIS- * S-10 20 M Hard Disks . . . Call For Prices 
"CORDOS" and "OASIS" operating systems 

Full F;ictory Wamnty - Complete Service Department 

J^/juolia J^a/nch,. 3no. .33 

Cert. Check aHK Wtf^ l Route 3, lUdki Ranch Airport 
Caihjers Ck. SMUiW Polo, Knob 61064 

Call Toll Free 800^35-8310 In ■. Cal 815-946-2371 

■Trademark larxJy Corp "•TrademirV Corvm Syilpms. IrK. 



MODELS l*"°lll 

ALL PROGRAMS USE TESTED 

MICRO - TYPIT A text editing prograa that uaea the keyboard 

-as is~ liKe a typawriter. All edit and prompt functions are 
"built in" so instruction or iBaming ia ainimuBi. Test can be 
generated three pages at a time and printed either numbered, or 
unnumbered single or double spaced. Also, right justification 
is optional. Doss not require aubatitution of • for conmaa or 
any other character revision. Slowest function ia transferring 
text to and from tape. Neat error free text with large print 
titles. Excellent for apecifi cations, agreementa. Instructions, 
form letters or annnuncements. Complote with sound for TBS-80 
Kodel I or III and Microteck printer easily adaptable to most 
other printers. PRICE $25.00 

CLIENT FILES Allows keeping several contracts for up to 20 
clienta. Enter contracts including either payment amounts or 
percentages. As bills are sent out and payments received, the 
program is a record by contract of amounts outstandirig and not 
billed including a sunmary of receivables and work in progress. 
Works well with one to 3 projects for a doien or so clients. 

PRICE $25.00 

EKGinEERING PROGRAMS 

LIGHTING CALCULATIONS Calculates the required number of 
fixturea for a room given the dimensions and reflectances by 
the lone cavity method. Three standard fixtures are "built in" 
so that 8 room calculations are made to compare results such as 
watts, footcandles and number of fixtures, PRICE $30.00 

HVAC PROGRAM This program calculates sensible and latent 
coolinR and heating load by zone each two hours of the typical 
hottest and coldest days. Equations per 197? ASHRAE Fundaaiental 
Guide page 25.2. Three programs are: Calculations, Geographic 
and Variable Data and Dala Generator. PRICE $35.00 

All tapes furnished with full documentation and instructions. 
Documentation, Instructions and Source Liat alone $15.00 

All programs on tape require Level II and I6K . Printer is 
reQUJred for MICRO-TTPIT and optional on all others. Do not 
forget to include the Model Number (I or III) with your order. 

Send Check or Woney Order (no COD's please) to; 1,^52 

Coolidge & Aseociates 

)3IT S CONGRESS « lO AUSTIN, TEXAS TST04 (912) 443-5329 




SIGMON 

5K3MON is a complete machine Languase develop- 
ment tool for your TRS-80 Color Computer and it's 
super powered 6809E microprocessor. 

Features: 

MONITOR: Display memory in HEX and ASCII, Direct HEX and 
Decimal entry into memory/ registers, Move, Find, Tape Head and 
Write, Output to printer and more. 

DISASSEMBLER: Display Addresses, Opcode operand, 
Mnemonics, and Address expressions for specific range of 
instructions. 

MINI ASSEMBLER: Allows you to enter irvstructions in Symbolic 
form and have them converted to Machine Languase 

DEBUGGER: Allovsn Stepping and Break point execution of 
Machine Language programs. 

With SIGMON you can awaken the awesome powers that lurk 

within the dark recesses of your color computer. 

Cassette and Source Code 

for the TRS-80 Color Computer $29.95 

S.E.C.S. 

(Screen Edit Control System) 

SECS adds new power to your TRS-80 Color 
Computer, If you have been waiting for Enhanced 
BASIC and it's capabilities, then you are ready to take 
the next logical step. 

Features: 

FULL SCREEN EDITOR: Full Cursor control with auto repeat, 
insert, Delete, Join lines. Relocate lines and Audible error warning, 

HI R£S GRAPHICS: Two modes of Hi Res graphics, Set point. 
Set line, Set color, Set programmable character. Set screen, and 
Toggle tsetween Low Res and Hi Res/Normat and Inverted 
Screens. 

HI RES CHARACTER GENERATOR: Sixty-four definable charac- 
ters, Save and Load Characters sets to and from tape. Define 
Characters, and Place on screen in any color and in any position 

The entire system is linked into BASK and is compJetely 

transparent to the user As a BASIC programming tool, SECS is 

unsurpassed. 

Cassette for the TRS-80 Color Computer $99.95 

Software Utilities for the 
TRS-80* Color Computer 

Order tfirough your local software dealer or send checK or 
money order plus S2.00 Shipping & Handling tO: 

^407 




"^B/ COMPUTER SOFTWARE 
19519 Business Center Drive, Northridge, CA 91324 
(213)701-5161 

■TRS-80 a a ressccred trademarti cA Rado STmcK « dMsioo of Tandy Cofporaioji 



•See List ol Advertisers on page 402 



80 Microcomputing, November 1981 • 259 



"// Basic encounters a syntax error during 
program execution, it will automaticaiiy 
put you in the Edit mode." 



added commands can then be called at any 
time as needed. 

To chain from one program to another, 
any of the following forms may be used: 



RUN CHAIN 
RUN CHAIN "f" 
RUN CHAIN "f In 
wttere t Is th« filename cttaraciar used to save the 
pfogram on tape 
In is a valid lirw numtier 



In the first case, the next program on tape Is 
loaded and execution will start at the begin- 
ning of the program. In the second case, the 
specified program will be loaded (if found) 
and will start from the beginning. In the 
third case, the named program will be load- 
ed and entered at the specified line numtrar. 
(tf a starting line number Is given, the 
filename character must be Included.) Any 
of these Chain commands can be Included 
as a statement In the first program. As the 
Chain routine Is executed, it will be typed 
out Ready when the second program has 
been loaded and automatically start this 
new program. 

In order to preserve the values of vari- 
ables while a program is being modified, 
two separate commands are used. Before 
any editing, one must first type Run Change 
to protect the current values. This routine 
moves all variables to upper memory, pro- 
tects them, and returns control to the com- 
mand level of Basic. Then use any of the 
standard system commands to change the 
program statements, or use Edit to modify 



Progrmm conUnue<i 








L 
GIB4 


220848 


B135B 


LD {INPTR) ,UL 


IRESAVE IN LOC USED BY C1X)AD 


6BB7 


C31F2C 


B]ieB 


JP CLOAD 


IJUMP TO CLOAD ROUTINE 


6eBA 


21D14B 


B13eB CLRTN 


LD HLpLSTKS 


(NORMAL COHKANDS ENTER HERE 


ALSO 










GBBD 


7E 


B139B 


LD A,(HL} 


F CHECK TOKEN STORAGE 


6eBE 


FE8B 


B14B0 


CP 80 H 


IIP CBAIN, CONTINUING PIUM A 


BOVE 










6ec0 


CB 


B1410 


RET HI 


;ELSB RETURN 


GflCl 


ED5BDe4B 


B1420 


LD DE, IINPTR) 


(TRANSFER STRING POINTER 


fiBCS 


GD53DP4B 


B1430 


LD (SADDR] ,DE 


(TO OTHER STORAGE LOCATION 


GflC9 


AF 


B14 40 UNPi; 


XOR A 




GflCA 


77 


B145B 


LD tBLI ,A 


(CLEAR PLAG 


6BCB 


2AB14B 


014Gfl 


LD HL,(KENLIK) 




eecE 


F9 


01470 


LD SP,HL 


(PUT STACK AT BOTTON OF PROT 


ECTED AREA 








6ecF 


El 


B1480 


POP HL 


(RESTORE 


60DB 


22B14B 


B149B 


LD (KEHLIH) ,tIL 


( OLD HEHORY PROTECT POINTE 


GBD3 


2ie4BB 


B15BB 


LD HL,0BB4II 




GBDG 


39 


B1S10 


ADD KL.SP 


iBL POINTS TO START OP RELOC 


VARIABLES 








6BD7 


ED5BF94B 


01520 


LD DE,(SVAR] 


(GET END OF NEM PROGRAM 


GBDB 


CI 


B1530 


POP BC 


(GET LENGTH OF VARIABLE BLOC 


GBDC 


78 


01540 


LD A,B 


jCHECK BYTE CODNT 


eSDD 


Bl 


0155B 


OR C 




GBDE 


2BB2 


01560 


JR Z, RSTPT 


(SKIP TRANSFER IF lERO 


GBEB 


EDBB 


B1570 


LDIB 




GBE2 


CI 


01580 RSTPT 


POP BC 


(GET OFFSET TO ARRAYS 


GBE3 


ED53FD4B 


B159B 


LD (SFRE) ,DE 


(DE POINTS TO START OF FREE 


SPACE, STORE 








GBE7 


22AB4B 


B16BB 


LD [SSTR) ,HL 


(BL POINTS TO STRING SPACE, 


RESET POIOTER 








6BEA 


F9 


81S1B 


LD SP,HL 


(ALSO RESET STACK THERS 


60EB 


2AP94e 


0ie2B 


LD HL,(SVAB) 


(CALCULATING 


GBEE 


09 


B1630 


ADD HL.BC 


( START OF ARRAYS 


GBEF 


22FB4B 


Bie40 


LD (SARR] ,HL 


( STORE 


GBF2 


21FFFF 


01G50 


LD HL,0PFFPH 




60F5 


22A24B 


01(60 


LD [LNNUH] ,HL 


(RESET LINE HDKBER 


GBFB 


CD8F1B 


B1G70 


CALL INITM 


(MORE INITIALIZATION 


GBFB 


CD911D 


01660 


CALL RE5TOR 


(RESTORE DATA READ POINTER 


GBPE 


2B 


B1G90 


DEC HL 




GBFP 


D7 


017B0 


RST IBH 


(GET NEXT CHAR FROM INPUT ST 


RING 


AND TEST 








GIBS 


C2AC1E 


01710 


JP NZrRUNUI 


(IF MORE, HAY BE LINE NOHBER 


G1B3 


EB 


B172fl 


EX DErHL 


(ELSE POINT BL TO START OF P 


ROGRAH 








61B4 


C31E1D 


B173B XIT 


JP XEQ 


(AND START EXECUTION 


GBBB 




B174B 


END SETUP 





^^ SUPER"-5ViV 
ISA's DATABASE 

T/is only DBMS with all these leatures: 

* PROVEN jnoneyearoftestmarketing 

* TOUGH, reliable file structure 

* MENUdnvenforsJmplicityandeasyuse 

* ARITHMETlCwithsloredcalculations 

* FAST set-up and report formating 

* CLEAR usar-oriertted documentation 

* PRINTStolal5& subtotals-mail labels 

* REFORMATS and merges data riles 

* MULTI-DISK tiles: Up to 128K records 

* SORTS tull disks on up to 40 fields 

* PRODUCTION input of repetitive data 
it COUPLEStowordprocessor&statistics 
■k POSTS transactions to master tile 

■k SEARCH by strings, ranges, comparisons 

* DATA COMPRESSiON; Over twice as 
many labels as the other system 

ForT1t8-80* Modela 1. D. S ttl - 290.00 

Atk your D*ml*r or Writ»y 

tiMtHute for BclcnUnc Analyri*. Inc. 

P. O. Box 71M, D«pC n-l 

Wilmington, DE 19S03 (215) 3SB-373S 



TM. TanayCorp. 



^596 



thb publicQtion 
is QVQikible in 
micrafofm 




University Microfilms International 



300 North Zeeb Road 

Dept P R 

Ann Arbor. Ml 48106 

USA 



18 Bedford Row 
Dept P R 

London, WC1R4EJ 
England 



™TRS80 color 

From tw January 198) is<u« o( lh» CSRA Corrnutar 

Chitii 

Thare was som« arnusefTwnl at th« Novem- 
b«r meeting when the Radio Shack repre- 
sentativss stated that the software in tne i 
ROM cartriijges cooW not Oe ccpied. This 
rrxxUh's 68 Micro Journal reported Ihey had 
dWatsemWed the p'ogiamj on ROM by 
oovsrkig »ome ol Die cooneooi pins with 
tapa.TSeypromisadMalsnexImonth Never 
M a hobbyiit lomMKng un't t>e done' TTts 
magazirte Marm to t>« the onty source so tar 
ol tachnkal informaeons on (he TRS-SO cotor 
compular^ Devoted to SS-50 8800 and 
B809 rnachin«s up lo now, G8 Micro Journal 
plans to indude the TR3-80 8809 unit in 
future Issues. 



To gel the MOST from your 6809 CPU - This is tie 
BEST SCXJRCEt The ONLV Magazine fey Die aeos 
Corrpular Months AAead d Al Otiersi 

68 MICRO JOURNAL 

5900 Cassandra Smith Rd. 
Hixson, TN 37343 

USA 

IVr-JIBSO IVr-S3250 3 Yj - J« SO 

-FofBgnSwIwiAOiiiizVF loUSAPma 

Fvven til UbI am t3S Vi to us* Pnu 

■CaruOt 1 MMco Md t5.S0 Yr. lo USA Price 



y9^ 
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Dosplus 3.4 upgrades will be available for all registered and/or legitimate 
owner's of Dosplus 3.3 or 3.38 starting January let, 1982 

Those owner's who have sent in registration cards will receive a letter telling them of the upgrade. 
Those owner's who did not receive a registration card must use the following procedure if they do not receive 

an upgrade letter by January the 1 5th. 

1. Send in proof of purchase. 

and 
Your master Dosplus diskette. 

2. Send in the upgrade fee. 
Registered owner's will only be required to send in the upgrade fee. 

The upgrade fee will be $25., and will includeanewdiskette, AND the new expanded manual. The Dosplus 3.4 
manual also includes a new technical section that has complete I/O calls and DCB organizations. 



M-ZAL Disk Assembler 

THE FINEST MACHINE LANGUAGE DEVELOPMENT PACKAGE MONEY CAN BUY. 

A complete development package for the machine language programmer. 
Novice and experienced programmer alike will recognize the superior features of this excellent package. 

The heart of the system is CAU's M-ZAL disk assembler. 

This includes: 

1. A full screen text editor. 

2. A super fast assembler with optical relocatable code. 

3. A linking loader for use with this relocatable code. 

Retail price on the M-ZAL package is $149.00, and is available Model I (single or double density) and Model III 



More programming power than you will find 

ANYWHERE ELSE IN THE WORLD 
Demand will be high so order yours today! 




specializing in the Tandy Line 




(305) 983-3390 



5846 Funston Street 
Hollywood, FL 33023 



CALL TOLL FREE FOR FAST SERVICE 

(800) 824-7686, OPERATOR 193 

FOR VISA/MASTERCHARGE/C.O.D ORDERS 

Cahtornia dial (800) 852-7777, Operator \ 93 
Alaska and Hawati dial (800) 824-7919. Operator 193 
TOLL FREE UNES WILL ACCEPT ORDERS ONLY! 

Fof Applications and Technical mtofmation, call 
(305) 983-3390 Of drop us a card 



VISA 



Dealers inquiries invited 



". . . one can often segment a very large program 
into a sequence of modules whicti will fit 
in a modest sized machine." 



>L!Sr 

10 X=l I Y«1PHZ=999 

^0 AS-"THI5 IS A TEST OF CHAIN" 

HtADY 

'RUN 

HEADY 

>HUN CHAIS 

READY 

SFAKTING NEn PRUURAU 

THIS I-S A TtbT [tF CHAIN 

I I M 999 

HEADY 



>LIST 

10 X=l t Y"10«Z=999 

2IA K%="Tt\\S IS A TEST CIE CHAIN" 

KEADY 

>RUN 

HEADY 

»HUN CHAIW'B- 30 

READY 

I I U 999 

HEAOf 
>LI5T 



NErt HROGRAM" 



10 PHINT"srAHTIN: 
*^0 PRINT AS 
30 PRINT X, Y,*:; 
HEADY 



Program Listing 2. Examples of Chain Command Usage 



existing lines. Then restore the variables 
and start the program with the following 
command: 

RUN RESTART In 

1n is the line number at which to resume 
program execution. If no line number Is 
entered, it will restart at the beginning by 
default. The Restart command will be ig- 
nored if a Change command was not issued 
earlier. 

If a line number is included In either the 
Chain or Restart commands, It must be a 
number that exists in the current program 
or else the program will terminate with an 



error message. The line number should also 
be chosen to bypass any Clear statement or 
avoid redimensioning any variable array 
that had been spectfied earlier. 

Sample Runs 

In Listing 2, the first program simply sets 
the values of the variables. This program 
loads the values Into the storage area. The 
A$ variable is a test of strings imbedded In 
the source statements.) The Run Chain 
command is typed to load the next program 
on tape. A Ready message indicates that 
the second program has loaded. This pro- 
gram automatically starts running and 
prints out the variables from the first pro- 



>LIST 

10 INPUr'ENTER X AND Z"lX,Z 

^|^ AS»"TE5TING CHANGE AND RESTART" 

30 PRINT AS 

40 PRINT X.Y.Z 

READY 

>RUN 

ENTER X AND Z7 3,1 

TESTING CHANGE AND RESTART 

3 R I 

READY 

>HUN CHANGE 
READY 

>3b INPUT"ENTER Y"lY 
>flUN RESTART 3b 
ENTER y? 2 

3 2 1 

REAW 



Program Listing 3. Example of Chain and Restart Command Usage. 



gram. A listing of the program shows that 
the new statements were loaded and that 
the variables printed out were Indeed trans- 
ferred from the first program. The second 
part of the figure shows a similar exercise, 
except that the command Run Chain "B" 30 
causes the chained program to start execu- 
tion at line 30, bypassing the first two print 
statements. 

Program Listing 3 illustrates the case of a 
program with an error that needs to be 
corrected. When the program is run, the 
printout Indicates that the value of Y had 
not been specified. To fix the problem, type 
the Run Change command to save the 
values that had been entered via the Input 
statement. After line 35 has been inserted, 
restart the program at line 35 by typing: 

rajN RESTART 35 

The final printout shows that the first three 
Statements are skipped over and that the 
values of X and Z, which were input in the 
earlier program, have t>een retained. 

If Basic encounters a syntax error during 
program execution, It will automatically put 
you in the Edit mode. Type Run Change and 
then return to the Edit mode. The variables 
must be protected before any changes are 
made. 

Summary 

An optional filename character can also 
be entered to specify the file to be retrieved 
from tape. The second program can be 
started at any specified line number (or de- 
fault to the beginning If none Is entered). 
With this added command, one can often 
segment a very large program into a se- 
quence of modules which will fit in a mod- 
est sized machine. 

The Chain routine is installed before any 
Basic programs are loaded since the code 
is position Independent. A total of 239 bytes 
of memory are required for these three com- 
mands. 



A Parting Note to DOS Users 

The Implementation presented is for a 
cassette-based Level II TRS-80. To modify 
this routine for a disk-based system, several 
system entry points would have to be 
changed. In particular, the hook to the 
CLOAD routine would be replaced by the 
corresponding routine which retrieves a 
program file from disk. Since the patch is 
entered as the Run command is processed, 
be familiar with the CXJS extension for this 
command. Also, because DOS extensions 
are overlaid in lower RAM memory, it is 
more appropriate to install this patch in the 
DOS area, rather than waste space in upper 
memory. ■ 
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FREE PREMIUM! 
1982 subscribers will 
receive the special 
MATHl package ot 
PC programs. You 
qualify to receive 
this valuable tree 
gift if you check 
either box 2 or 3 
below! Don't delay! 
Get started learning 
how TO enjoy your 
pocket computer to 
day. Use this handy 
subscription card! 



SUBSCRIPTION FORM 



D 1981 Charter Subscriber (Issues 1 - 10). $20.00 for U.S. 

delivery. (U.S. $24.00 to Canada. U.S. $30 00 elsewhere.) 
G 1981/82 Charter Subscriber (Issues 1 - 201. $40.00 in 

U.S. (U.S. $48.00 to Canada. U.S. $60.00 elsewhere.) 
D 1982 Regular Subscriber (Issues 11 - 20), $30,00 in U.S, 

(US, $36,00 to Canada. U.S, $45.00 elsewhere.) 
D Sample issue. $3.00 in U.S, (U.S, $4,00 elsewhere) 

Orders must be accompanied by payment in full. We do not 

issue invoices for the POCKET COMPUTER NEWSLETTER. 

Thank you for your remittance. 

Name. 

Addr: 

City: State: Zip: 

MC/VISA # Expires: 

Signature: 



V0RK10 

BASF-DPS 

WORLD STANDARD TAPE 







• PROFESSIONAL 5-SCREW SHELL 

■ UNIVERSAL INtHISTBY ACCEPTANCE 

DATATRAC- C-10, C-20 
MUSI TRAC - 0-45, C-90 



, to C ^e' 
,cass« 






ce '° _ pa' 



oac- 



''^'^3^^ 



s^^Sr^ 



DO' 



^ >P^'^' >**« 






t6e< 



lor' 



,the 



.OP^* 



etics 



I -YOUVE TH/ED TH E REST, NOVi BOY JHE BEST" 

Call: 213/710-1430 for MycnATE SHIPWENT on CrMUt Card Ordari ^ 






pevs^' 



I ORDER NOW,.. Mail to: VORK lOComputefUJOre 

24573 Kflndge Si #80B, Canoga Paik CA 91307 

n Cti«* or M □ tndosal n CJuffle to n»(>«H Cva 
^ VISA □ W«TEfl CARD EipfK OOe 



LnciH louei looffii 

CIO n •«) D '** 


fiitM. 




C.» □ 1000 D ISOO 




c-ii □ uoo o »«• 




c-» □ :i 75 a 39m 
sueioim 

CaH 'BMnn iiMfr%««ilB 
STiforq i mi ~i! 2itai S3 W 





101 W. 





WHnfc KIH OUANTITV DISCOUNTS 
US* onli Wt cjimof 5hio 10 P &inR 



M»V 



RAM $18.99 



ONE YEAR GUARANTEE. INCLUDES RAM TEST AND INSTRUCTIONS 

Premium 16K high speed ram tof TRS-80 MODEL lll/l, anO COLOH COMPUTER. 
MODEL 1 owners add 2.00 lor 2 dip shunls 

COLOR COMPUTER SOFTWARE 

SUPER "COLOR" WRITER 

Al last!' Fasi, 'ull featured, cfiaracier onenleO worfl processing (or the TRS-60TM 
COLOR COMPUTER and any prinier FEATURES • 32K compalible • choice o( 
disolay color ■ Key beep • fielp command ■ woids typed 5 words led * tab hey ■ 
repeat key • word wrao arourid • Oloch rnove • Ouplicale & ilelele ■ giot>a> search A 
replace ■ quick paging • paragraph scrolting • line scrolling 

SPECIAL FEATURES aulomalic linking o1 cassette text Mes to' hands-oft 

coriiiruous print. r.g • unique movable window for wrewing any pari of the text 

PRINT FEATURES send printer conl'ol codes, along wilh leil. to primer • Full use 

□ ( printer s Special (ealures during normal prmiing ■ sel margins, line tenglfi, line 

spacirvg. page lenglfi. and page spacing within trie le«l lor conlmuous printing ■ 

aulomatic centering ■ right luslilication ■ page numt>ers 6 titles 

TAPE- J29.95 ROMPAR- $39.95 DISK MS 95 

'Tape UO only, ml disk convpitiM* 

SUPER "COLOR" TERMINAL an the realures of VIOEOTEXTM and morel Allows 

COLOR COMPUTER to comrriunicaie wilh computers like TRS-flO MODEL lll'l & 

APPLE II etc services like COMPUSERVE via MODEM or RS232 DIRECT' Features 

• upload a download tiasic programs • pnnior save data to laoe* half i luHdupie" 
DOCUMENTATION « TAPE 124.95 ROM PAK S34.95 

SUPER '"COLOR" BUG eiarrime S change memory contents in Ihe color computer 
■ step video display lo any location including ROM ■ look at contents of 
HOMPACKS' • access nigh res graphics A create & debug machine language 
P'ogtams TAPE AND DOCUMENTATION S19.95 Rom Pah S2S.9S 

SUPER "COLOR" SKETCHER turns the colo' computet into 3 drawing txiard 
Supports 32K ram • save and load graphics lo tape • create tjasic graphics 
programs ■ pnnl graphics to R S LPVII R S LPVIIl and EPSON MX 80 
TAPE AND DOCUMENTATION S24.95 ROM PAK S34.95 

GAMES 

MODEL III I I 16K AND COLOR COMPUTER EXTfBAS 

FEATURE QUALITY GRAPHICS ANO SOUND! 
ADVENTURE 3 PAK TAPE 124.95 

This TRILOGY OF 3D FANTASY GAMES lakes you to the IWORLD UNDER THE 
CIMEEON MOON. Engage m nlual comOal with tooamoalh. naithokc monstefS 
and skilled warriors Advance in rank with play eipenence then adventure through 
OAZMAR'S UNDERWORLD OF DOOM to the lorOidden rums of caslle argaan 
Search (or the eye of Oazmar while avoiding Ihe sorceror s intricate traps Survivors 
must then negotiate treacherous trails among the perilous peaks ol the ugrek 
moutams to the FORSAKEN GULTCH where the wicked idol awaits restoration 

VEGAS 5-PAK TAPE 119.95 

The THRILLS OF A VEGAS CASINO at home F ive action packed Vegas games lor 
up lo four players CASINO CHAPS 121 • ONE ARMED BANDIT • UP ft DOWN THE 
RIVER • KENO Bank tracks players' winnings tromgame to game • realistic cards 

• regulation taPles • boards • authentic sounds • lively graphics • ollicial rules in 
each game 

COMBAT 3-PAK TAPE 124.95 

Three action packed two player games featuring lifelike graphics and sound of 
LASER FIRE. CANNONS, and PHOTON TORPEDOES 

2-1-0 TANK COMBAT five terrains • the experienced arcade pUye< can design 
cnmt>at scenario STELLAR BATTLE pilot a Ilex wing lighter at incredible speeds in 
enemy space taking out dorian tye lighters defending Ihe imperial star fortress 
GALACTIC BLOCKADE maneuver your ctalt in a course that boxes your opponent 
but avoid cosmic det>fis and hostile space probes' 

MODEL lll/l SOFTWARE 

REQUIRES 16K MODEL III OR LEVEL II BASIC 

READ THISt Add graphics lo your programs m minutes or draw schemaltcs, 
graphs, logos pictures etc with graphics and letlemg S save them as 
subroutines o' programs'' SUPER SKETCHER does more and works |usl like a text 
editor with graphics ■ image frames can be edited and animated on screen • 
generate, load 4 save graphics. Oasic subroutines S programs ■ includes EPSON 
MX.80, R.S. LPVII 4 R S LPVIIl graphics screen pnnl driver and more 
TAPE {TAPE irai $14.95 DISK (DISK AND TAPE l/0| $19.95 

SUPER WRITER word processing thai combines the best features of other good 
word processors and those ol the SUPER ' COLOR WHITER including automatic 
tape ol disk file linking and the movaQie window lealure except BW display See 
SUPER COLOR' WRITER for details' MODEL I/Lll needs lower case mod 
MODEL lll/l TAPE ft DOCUMENTATION S4S 95 DISK $59 95 

AUTOMATIC MENU SYSTEM power up anO automenu takes over Execute 
programs and command files, or LIST LOAD, enter DEBUG, BASIC, or TRSDOS 
with single keystroke' Features options menu with library ol commands 
MODEL III DiSK ft DOCUMENTATION $12.95 

CODES lor THE ELECTRIC PENCIL enier printef COnlroi codes wilhin text lile to 
send lo smart printers Includes drivers for EPSON MXW, CENTRONICS 737, MPI 
88 SERIES, and tile to customize for other printers TAPE $14,95 

DISK INVENTORY lor the MODEL III manage your disk programs A menu driven 
utility 'eatoring sofl A prml by name, disk, program lype. extension, elc 
MODEL III DISK $19,95 

TRS-80 IS a Registered Trademark of Tandy Corp 



-480 



Master Charge. VISA and COO 

accepted 

Allow additional 2 weeks lor 

personal checks 

When ordering specify compuler lype 

Add S3 00 shipping S handling 

MN Res add 5% sales tax 




nELSon 

sonuRH 



P,0, Box 19096 
Mlnnsapolis, Minn. 



612/927-0511 
55419 



•'Sm List ol Advertisers on page 402 
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THE ORIGINAL MAGAZINE FOR 
OWNERS OF THE TRS-80 "* MICROCOMPUTER 



TRSHtVlSA IRAOKMAKKOt lANDVCOHP 



SOFTWARE 

FOR TKS-80 - 

OWNFRS 



H 



CQinPLJTHQMlCS 



I MONTHLY 

II NtWSMAGAZINF 

C. 



K)H TRS-80- 
OWNFRS 



MONTHLY NEWSMAGAZINE 

Practical Support For Model I, II & III 



PRACTICAL APPLICATIONS 
BUSINESS 

GAMBLING • GAMES 
EDUCATION 
PERSONAL FINANCE 
BEGINNER'S CORNER 
NEW PRODUCTS 
SOFTWARE EXCHANGE 
MARKET PLACE 
QUESTIONS AND ANSWERS 
PROGRAM PRINTOUTS 
AND MORE 



NOW IN OUR 4th YEAR 



PH(>(,KAMS AND ARIK l.ES PUBI ISMH) IN KFCl N 1 ISSUlrS 
INCI UDt THE F Ol I OWING: 

• UNCAi.C ACOMPIHf- HNANe lAl APi'I k A I IONS i'ACKACiK 

• INKORMAIION SYSrtM HK'IUV 

• STAMSIICAI COMHINAIIONS 

• PASCAI b IKIANt.l V 

• ASSKMBI Y I A[SK,ltAt.^ I OK Bh(.lNNhKS 

• DISK [[[ KS 

• MOD III Kl VII W 

• KI-YliOAKD IMPNDl-K AND MCHIINd hXI'l AINI D 

• DOS COMMANDS IN 1 J VI 1 11 

• I'KOBAill! MY l.{:HV\ (ihNfHAIOK 

• CAI CUl AiOK MMDI AMONs 

• IHI MICAHYll (,AP 

• SlOCKb AND BONDS 

• BlJlKif- I ANAI YSIS lK)K BUSlNhSS AND MOMI i 

• NKWDOS Nil \<\ VIKW 

• DUICHINO INI- HOHSL SYSII M I MA i LAN I I ( )S| 

• A SIMULA if-D I. Oil- (.jAMI- 

• CONTINUOUS l-OKM SOUKCES 

• lAX SAVEK BLVItW 

AND MOKt 



v^^^; 



*^SoH 



FINCALC 



^^^o't\0^ i*^**""*^■«^^«"^J^^^^^^■^ A Complete Financial Analysis Package Used 

rt^C^* To Calculate Markup, Margin, Annuities, Compound Interest, Nominal 

^^ O^ And Effective Rates, Sinking Funds, Mortgage Calculations, Future Value, 

*4t^ Savings and Insurance, Percentage Difference Between Two Numbe 

Amortization Schedule and More 



»t 



rs. 



SFND FOR OUR NHW 6^ PAGE SOFTWARE CATAI.OC^ iiNCLUDIN(_, L IS I INGS OF HUNDREDS OF TRS 80" PROGRAMS AVAIl ABLE ON 
CASSETTE AND DISKETTEi $2 0) OK FREE WITH EACH bUBSCRIPl IONS OR SAMPLf ISSUE 



* All programs are supplied on casselle (add $3 for Diskette Version add $5 (or modified Mod-ll Version) 



:CQIYIPUTRQI>^1CS■ 



^9 



SO N. PASCACK ROAD 
SPRING VALiey. NEW YORK 10977 

ONE YEAR SUBSCRIPTION VM 

TWO YEAR SUBSCRIPTION $^18 

SAMPLE OF LATEST ISSUE $ 4 

STAKTMYSUBSCRtPnON WITH ISSUE 

(»I July 197H»>i!2 June 1979 • "24 Joly 1980 • "30 Janudiy 19811 
NEW SUBSCRIPTION RENEWAL 



CREDIT CARD NUMBER 
SIGNATURE _— _^__ 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 



NEW!!! 

MOD-II NEWSLETTER 
$1 8/ycar Cor 1% Usuo} 




HOUR 
24 ORDER 
LINE 



Mi (914) 425-1535 



EXP DATE 



NAME 



ADDRESS 



CITY 



_^ STATE _ 



ZIP 



•" ADD $I2/YEAR (CANADA. MEXICO) ADD $24/YEAR AIR MAIL OUTSIDE OF U S A , CANADA & MEXICO '" 
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CQiriPUTHQWlCS 



c. 



• • •EVERYTHING FOR YOUR TRS-80"*** 



TRS-M™ is a trademark of the Radio Shack Divkk>n of Tandy Corporation 



MOD-II PROGRAMS 



it All orders processed within 24-Hours 
* 30-Day money back guarantee on all TRSDOS Software 
it Add $3.00 for shipping in UPS Areas 
*Add $4.00 for C.O.D. or NON-UPS Areas 
*Add $5-00 outside U.S.A., Canada & Mexico 
* We will match any bonafidm advertised price 
in any of the Major Computer Magazines 
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0) ELECTRIC PEMCIL (Mich»l Shraye' Sotloirs] 
Compt«t« word procassor wi'h •mensive •diling (nd 
printer tor mitt mg lealu'ti S32S (STANDARD 
THSDOS VERSION) 1350 (DIABLO NECOHOUME 
TRSIJOS VEHSIONi 

[2) GENERAL LEDGER. ACCOUNTS RECEIVABLE, 
ACCOUNTS PAYABLE. INVENTORY CONTROL, 
INVOICING AND PAYROLL (Small B js<n«s) Syslnmi 
Group) an eilaniive business Syslc^ 'Or tr>e serious 
user cm be used one modyle ii ■ tim« or is ■ co 
ordinated syslBm 1225 per module S1?99 tor ine 
COmplele syslem 

(3> GENERAL LEDGCR, ACCOUNTS RECEIVABLE, 
ACCOUNTS PAYABLE, INVENTORY CONTROL 
AND PAYROLL (Compumai) a compleis user ori- 
•nlM business system can be used one module al ■ 
time or a) a coordinaled system SI40 p«r module 
$995 tor Itie corrplele syslam 

(4) MOD-II UTILITY PACKAGE (Rical Computes) 
adds impomnt utilities to TRSDOS copy <iles 
jelectively taslsr ana more accural* tile copying 
repair t^ad diractones displays sorted directory ot 
all lilas on ) lo « disk dnvas SUPERZAP crrange 
disk to and more ItSO 

(5) ADVENTURE tl-M (Scott Adams - Adienlure 
tnlernafional) a s«rtes of games formally only 
available on ttve targe computers your goal is to work 
your way trirougri a rr»i« o' Obstacles in order to 
recover a s^crvt treasure or complete a mission trie 
pacxage includes aii 9 Advantures wniten Oy Scott 
Adams (99 95 

{() OSF (Racel Computers) Generalijed Subroutine 
Facility a series ol super last machine language 
utilities triat can Cm called Irom a BASIC program jno 
mactiine lar^guage hnowledge required) sorts lOOO 
ilefT>s irv under S seconds ■llo.i.s PEEK and POKE 
statements move data Otocks compress and un- 
compress data works under TSSOOS S50 

(T) OSM (Racel Computes) Disk Sort Merge sorts 
and merges targe multiple diskette tiles on a 1 to 4 
drive system NOT AN IN MEMORY SORT can 
actually alphacwtirs (or any other type of sort) 4 disk 
drives vrortf^ ol data sorts one complete disk ol 
information m 10 minutes information is pro.ideO to 
us« OSM with the HS MAILING PROGRAM works 
under TRSDOS ItM 

(■) RSM iSmaii Systems Software) a macnme 
language monitor and disassembler can be used lo 
see and modify memory o' disk secto's contains all 
t^e commands found on the Woael-I version plus 
some additional commands tor tne MOD-II works 
under TRSDOS t39 95 

(» BLINK BASIC LINK FACILITY (Racei Computes) 
Link trom an» BASIC o'ogram to anofier saving all 
variables cfiam programs mtr^out losmg varables 
(50 

(10) BASIC CROSS REFERENCE UTILITY (Racet 
Computes) lists all variables and strings used m a 
program (with the line numtwfs in wtiicn tney appear) 
lists all GOTO s and GOSUB s Iwiir^ trie i>ne num 
bers in wtiicti triey appeal) sea'ct^es for any specific 
vanables or strings jwitti ttie line number in wriicti 
ttrey appear) t50 

Ml) DEVELOPMENT PACKAGE (Racei Computes) 
SUPEHZAP (lo see D'mt or change any Oyte on a 
dialiBlle) DisassamPWi and MOD-II interface lo me 



MICROSOFT EDITOR ASSEMBLER PLUS includ-ng 
uploading services and palcries tor Disk I'O assemble 
directly into memory saire all or portions Ol SOocca 
to disk dynimic debug facility (Z8UG) entanded 
editor commands SI25 

|1I) HARD/SOFT DISK SYSTEM {Racet Computes) 
The software asMntial to interlac* any oft ha popular 
large hard disk dfrvas comptelely compatible wiin 
your Bitstino software arxl tiles allows up to 20 
megabytes ol storage (and larger) directory aipand- 
able to l^andle tfiousands of files 1400 

(13) CAMEO HARD DISK DRIVE CONTROLLER 

coming soon (November f) 

(14) HARD DISK DRIVES coming soon (Nov t?) 

(15) H « E COMPUTHONICS, INC. SHARE-A- 
PROGRAM DISKETTE (1 works under TRSDOS a 
collection of programs written by MOO-II owners 
programs include data Case management a word 
processor mail system mortgage calculations 
checkbook rejiSter and many others SB (add 13 
postage outside of the United States. Canada and 
Mencdl FREE il you send us a diskalta containing 
a program tnat can be toiti^e to if>e Share-A-PRO- 
GRAM DISKETTE 

(18) WABASH CERTlFtCO DISKETTES S39 95 (per 
bO" of 10) 

(17) FLIPSORTOISKETTC STORAGE TRAY Stores 

50 diskettes comes complete witfi mden-dniiders. int 
plates and adjustable spacing S44 95 
Ml) MASTER PAC 100 100 essential' programs 
BUSINESS PERSONAL FINANCE STATISTICS 
MATH GAMBLING GAIMES includes 1?5 page 
manual and 2 diskettes (99 95 

(11) BUSINESS PAC in too esseniisl tMSineii 
programs INVENTOR* CONTROL PAYROLL 
BOOKKEEPING SYSTEM STOCK CALCULA- 
TIONS CHECKBOOK MAINTENANCE AC- 
COUNTS RECEIVABLE ACCOUNTS PAYABLE 
includes 125pag«manual jndtwQdiSkelles $14995 

(20) EDITOR ASSEMBLER |Galactic Software Ltd | 
the first user oriented Editor Assembler lor the 
MODEL II and was designed to utiliie all tne features 
Of tf^e MODEL II It includes innovative features for 
ease of coding and deOuggmg and complete docu- 
mentation lover 1?0 pages) works under TRSDOS 

t229(X) 

<i1) BASIC COMPILER (Microsoft) changes your 
source programs inlD machine language increases 
P'ogram eiecution by 3-1 times $395 

(21) MAIL/FILE SYSTEM f'om Gaiaciw: Soft-are Ltd 
stores 2 500 names per disk f^o lorimg time is 
requires smce the fit* is automatically sorted by tirst 
and last name plus Zip Code on input Retrieve by any 
combination of 19 user codes Supports an 11 digit 
alphanumerica Zip Supports a message ime Comes 
complete with user-onpnied documentation (100- 
page manual) Allows 'or company name ana indmd- 
uai ot a compa.'^y and complete phone number (ar^d 
e. tension! works under TRSDOS S19900 

(23) fNCOME TAX PAC Protessionai ncome ta> 
package most 'arms and schedules Output to nOeo 

0' line o'i"ter automatic memory storage of all 
.nfo'maton data can be loaded (rom diskette 
Changed and ed4fd Duiir m erro' checking 5 1 99 95 

<>4| COMPUTER GAMES (SBSG) Mean Checker 
Machine. Star- Trek III. Concentration. Treasure Hunt 
Banco. Dog Star Adventure U* 95 



iCQlnPLJTRQI>^ICS^ 
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50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



HOUR 

ORDER 

LINE 



(914) 425-1535 




NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N Y. STATE) 

(800) 431-2818 



(1) CP/M (Lif*boai AssocraiM) an aiiarnairve 
operating system to' the MOD-II that allows HOO-II 
owners to use any ot tria hundreds of programs 
available uiKJer CP/M fO 

(2) CP/M HANDBOOK (Sybei) a sl*p-by-*tep 
guide to CP/M takM irw reader ihrough each of the 
CP/M commands numberoui sample programs 
practical hintt reference tables tt3 95 

(3) GENERAL LEDOER. ACCOUNTS RECEIVABLE. 
ACCOUNTS PAYABLE. INVENTORY CONTROL. 
AND PAYROLL (feachtree Software) r»gu'fMCP/M 
and MICROSOFT BASIC prolMSional businoaa 
systems turn key opAralion can be used as s'ttgl* 
modules or as • coordinated system .1500 per 
module t25D0 lor the complete system 

(4) tWORD-STAR. The uflimate word pToc«Hor a 
menu driven word processing system that can be used 
with any pnnter All standard word processing 
commands are included plus many unique com- 
mands only loond On WORD STAR requires CP/M 

M95 

(5) MAIL LIST MERGE An add on package that 
allows t^a user to sand form letters (created on 
WORD-STAR) to any compiled mailing list (usirw any 
CP/M based MAIL program such ai lf>e PEACHTREE 
MAIL PROGRAM) requires CP/M. WORD STAR and 
andy CP/M based mail program 1)50 

(S) SELECTOR III IMicro-Ap) complete data 
management system user defined fields and codM 
manages any list defined by the user includos 
additional modules tor simplified mvenlory control, 
accounts receivab4e and accounts payable requires 
CBASIC-2 JZ95 

(7) SELECTOR IV (Mico-Ap) the ultimate data 
minagem«nl lyaiem all laatures usctnaSELECTOfl 
III plus data Ma format conversions full page report 
tormatlar computations global search and replace 
hard disk compatible oata/temt merging S550 

II) BLECTOR IMicro-Ap) add on package to the 
SELECTOR general ledger that allows the user to 
define a customized charl nf accounts S350 

(fl) CBASIC-2 a non -interact rve BASIC used tor 
many programs that run under CP/M allows user lo 
make rnora ellicienl use of disk lilas atiminales the 
use of most lirie number references require on such 
programs as the SELECTOR St2Q 
(101 MICROSOFT BASIC an inhanced version ot the 
MICROSOFT BASIC found on TRSDOS adds 
commands such as chaining (allows trie user lo LOAD 
and RUN a new program nitfiout losing itie variables 
Currently m memory) long variaOle length file 
records WHILE/WEND and olf>ers can be used with 
the BASIC COMPILER to speed up programs (3-10 
times faster enecutionj S335 

(11) MASTER TAX (CPAids) professional tan 
preparation program prepares scfiedules. A. B. C. D. 
E F G. R'RP SE TC ESand forms 2106 2119 2210 
346a. 3903 2a«i 4625 4726 4797 4972 5^5 and 
6521 Printing can be on readily available pre-pnnted 
continuous forms on overlays, or on computer 
generaled IRS approved forms Maintains clinr history 
flies ln1BraCttvewl1^CP'AldsGeneralLedger t995 

MI) GENERAL LEDGER II (CPAidsi designed tor 
CPAs stores complete 12 month detailed history of 
transactions generates financial statements 
depreciation loan amort nations. )ournals trial 
balances, statements of changes in financial position, 
and compilation letters includes payroll system with 
automating posting to general ledgers prints 
payroll register. W2 s and payroll checks 1450 

(t3) ELECTRIC PENCIL (Michael Shrayer Software) 
Complete word processor with eitensive editing 
and printer formatting features 1275 (Standard 
printer version) S300 (DIABLO. NEC or OUME 
version] 

(14) BASIC COMPILER (Microsoft) changes your 

source programs mlo machine language increases 
program eieculion by 3-10 times t395 

• <CP/M IS A REGISTERED TRADEMARK 
OF DIGITAL RESEARCH) 
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• • • EVERY THING FOR YOUR TRS-80 '• • • 



■ TKS-M" b « trMl*m«rh ot Ihc U»iio Stuck DhrWon ol Tandy Corporation 



too s«v«» i MASTER PAC 100 , 

FOR YOUR TRS-80'" LEVEL II MICROCOMPUTER 



ALL ON CASSETTE OR DISKETTE 



BUSINESS AND PERSONAL FINANCE 

1 CHECKBOOK MAINTENANCE 

2 TIME FOR MONEY TO DOUBLE 

3 FEDERAL FICA & WITHHOLDCNG 7 AX 

3 COMPUTATIONS 

4 HOME BUDGET ANALYSIS _—« 
5. ANNUITY COMPUTATION ..elW^SS 

6 UNIT PRIClNCi AUc***^ 

7 CHANGE FROM PURCHASE "^ 

8 NEBS CHECK PRINTER 

9 DAYS BE rWEEN DATES 

10 MORTGAGE AMORTIZATION TABLE 
n INVENTORY CON I ROL 

12 PORTFOLIO VAl UE COMPUTATIONS 

13 VALUE OF A ^HARF OF STOCK 

U SALES REC:ORl) KEEPING SYSTEM 

15 FUTURE VAl UE OF AN INVESTMENT 

16 EFFECTIVE INTEREST RATE (LOANi 

17 PRESENT VALUE O^ A FUTURE AMOUNT 

18 RATE OF RETURN VARIABLE INFLOW 

19 RATE OF RETURN CONSTANT INFLOW 

20 REGULAR WITHDRAWAL FROM INVESTMENT 

21 STRAIGHT LINE DEPRECIATION 
23 SUM OF DIGITS DEPRECIATION 

23 DECLINING BALANCE DEPRECIATION 

24 BREAK EVEN ANALYSIS 

25 SALVAGE VALUE OF INVESTMENT 
2« PAYMENT ON A LOAN 

27 FUTURE SALFS PROJECTIONS 

28 CREDIT CARD FILE 

29 ECONOMIC ORDER QUANTITY lEOQ) 
INVENTORY MODEL 

30 VALUE OF HOUSE CONTENTS 

31 TEXT EDITOR 

32 MONTHLY CALENDAR 

33 DAY OF WEEK 

34 CASH FLOW VS DEPRECIATION 

35 COMPLETE MAIL SYSTEM 

36 INTEREST RATE ON A LEASE 



.tlSTlCS 






STATISTICS AND MATHEMATICS 

37 RANIK>M SAMPLE SF.IECTION 
J8 ANGLO MtTIC CONVERSION 

39 MEAN STANDARD DEVIATION, 
MAXIMUM AND MINIMUM 

40 SIMPLE LINEAR REGRESSION 

41 MULTIPLE REGRESSION ANALYSIS 
« GEOMETRIC REGRESSION 

43 EXPONENTIAL REGRESSION 

44 SIMPLE MOVING AVERAGE 

45 SIMPLE T TEST _— . k ' 

46 CHI SQUARE TEST W » ** 

47 NORMAL PROBABILITIES 

48 BINOMIAL PROBABil ITY 

49 POISSON PROBABlllTY 

50 MATRIX ADDITION AND SUBTRACTION 

51 MATRIX TRANSPOSE 

52 MATRIX INVERSE 

53 MATRIX MULTIPUCATION 

54 SOLUTION OF SIMULTANEOUS EQUATKJNS 

55 QUADRATIC FORMULA 

56 LINEAR EQUATION SOLUTIONS 

57 ROOT HALF INTERVAL SEARCH 

58 ROOIS OF POLYNOMIALS 

59 ROfUS NEWTON'S METHODS 

60 PRIME FACTORS OF INTEGER 

61 LEASl COMMON DENOMINATOR 

62 RADIAN DEGREE CONVERSION 

63 NUMERICAL INTEGRATION 

UTILITIES 

64 QUICK SORT ROUTINE 

65 PROGRAM STORAGE INDEX 

66 MULTIPLE CHOICE QUIZ BUILDER 

67 FORM LETTER WRITER 
66 SHELL SORT 

69 CASSETTE LABEL MAKER 

70 COC€S MESSAGES 
7t MERGE TWO RLES 
72 SORT WITH REPLACF-MENT 



lAATH 



GRAPHICS 

73 DRAWS BAR GRAPH 

74 DRAWS HISTOGRAM 
7?. MOVING BANNER DISPLAY 

GAMBLING AND GAMES 

76 RANDOM SPORTS QUIZ 

77 GOVERNMENT QUIZ 

78 HORSE RACE 

79 MAGIC SQUARE 

80 ARITHMETIC TEACHER 

81 HIGH LOW GAMBLE 

82 UNSCRAMBLE LETTERS 
M HANGMAN 
S4 GAME OF NIM 

85 RUSSIAN ROULEl IE 

86 ROULETTE GAME 

87 ONE ARMED BANDIT 

88 nrr the target 

89 WALKING DRUNK 

90 STATE CAPITAL QUIZ 

91 TICTAC TOE 

92 DICE GAME 

93 LUNAR LANDAR GAME 

94 BIORHYTHM 

9i HORSE SELLCrOR (CLASS CALCULATOH) 

96 RANDOM DICE ROLL 

97 RANDOM ROULETTE ROI L 

98 RANDOM CARD DEALER 

99 GUESS THE NUMBER 
100 WHITE OUT SCREEN 



GAMBViHe 






---^":::«- 



GUARANTEED SATISFACTION 

30 DAY MONEY BACK GUARANTEE ON ALL SOFTWARE 



ICQiriRJTHQMlCSi 



«'*^f.*«»c*i •*»*jtJi*cr<& -^t 
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50 N. PASCACK ROAD 
SPRING VALLEY. NEW YORK 10977 

PLEASE SEND ME: 

D MASTER PAC 100 CASSETTE VERSION $59 95 

D MASTER PAC 100 DISKETTE VERSION $59 95 

D MASTER PAC 100 (TRSM MODEL II VERSICTJ) $99 95 




HOUR 

ORDER 

LINE 




(914) 425-1535 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N,Y. STATE) 

(800) 431-2818 

* AH orders procttaed utithin 24-Hour» 

it 30-Day money back guoranf ee on €M So^Ttvorc 



CREDIT CARD NUMBER EXP. DATE. 



SIGNATURE 



NAME 

ADDRESS CITY STATE ZIP 

■** ADD S3.N KM SHIPHNC IN UPS ARIAS • ADO KM FOR COJk OR NON-UPS AREAS • ADD SLMt OUTSIDE U.SJ^, CANADA « MEIICO 
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• • • EVERYTHING FOR YOUR TRS-80 • • • 

THS-dO Is a uadrmark of ihr HBdto Shii< k Division of Tandy Corporailon 

BUSINESS PAC 100 

100 Ready-To-Run 
Business Programs 




^"•1 „«l .«ilhin 24-H<»"' 

Software 



(ON CASSETTE ORDI8KETTE) Includes 110 Page Users Manual 5 Cassettes (Or Diskettes) 

Inventory Control Payroll Bookkeeping System Stock Calculations 

Checkbook Maintenance.... Accounts Receivable.... Accounts Payable 



BUSINESS 100 PROGRAM UST 



1 R(JL£78 


2 AMhUl 


3 DATE 


4 DA WEAR 


5 LEASEJNT 


6 BREAKEVM 


7 DEPRSL 


B DEPRSY 


9 DEPRDB 


10 DEJWDDB 


11 TAXDEP 


12 CHECK2 


13 CHECKBKI 


14 MORTGAGE/A 


15 MULTMOM 


16 SALVAGE 


17 RRVARirH 


18 RRCONST 


19 EFFECT 


20 FVAL 


21 FVAL 


22 LOANPAY 


23 REGwrrw 


24 SWPOtSK 


25 DATEVAL 


26 ANfiUDEF 


27 lAARKUP 


28 SIMKFUMD 


29 BOfiDVAL 


30 DEPLETE 


31 BLACKSH 


32 STOCVALl 


33 WARVAL 


34 BOriOVAL2 


35 EPSEST 


36 BETAALPH 


37 SHARPEl 


38 OPTWRITE 


39 RTVAL 


40 eXPVAL 


41 BAYES 


42 VALPRlnF 


43 VALADINF 


44 UTILITY 


45 SIMPLEX 


46 TRANS 


47 EOQ 


48 QUEUEl 


49 CVP 


50 CONDPROF 


51 OPTLOSS 


52 FOUOQ 


PiAME 


53 FQEOWSH 


54 FOEOQPB 


55 QUEUECB 


56 MCFAMAL 


57 PROFIND 


5B CAPl 



Intert* Apportjonmenl by Rule ol thf 78 s 

AnnurTy compuUtion program 

Ttme between dotes 

Day of year a particular date (alb or 

hterest rate on lease 

Breakeven anafysjs 

Straightkrtc dcpreciotxx^ 

Sum of the digits deprecmion 

Dedming balarKe depreciaDoo 

Doufate declining baiance depcvciation 

Cash now VI deprectaum tables 

Pnnts MEBS checks aiong with dsl^ rrgtSer 

Oieckbook msinienance pragram 

Hoftgage amonuation laWe 

Computes Qnie needed foe money to double, tnple. BC 

Determines salvage value of an insivstinent 

Rale ot return on irrwestmerK with vanable irflows 

Rate of return on imvstment with consam ir^flows 

Effective mieres rale of a loan 

Future value of an investment (compour>d ffilerest] 

Resent value of a future amount 

Amount of payment on a loan 

Equal withdrawals from investment lo leave over 

Simple discount anafysis 

Equivalent & noneqi«valent dated values lor oWig. 

Present value of deferred annuitiea 

% ^^a^kup arulysis For Items 

Sinkir^ furyl anKxtiiatxxi program 

Value of a borvj 

Depletion antiysa 

Black SctK>le3 opbora anatyss 

Expected return on stock vw discourts dMdends 

Value ol a warrant 

V^ueof abond 

Estirnate ol future earnings per share lor compare 

Computes alpha and beta vanablcs lor slock 

ftxtfolio selection modd-ie wtitf stocks to hokl 

Option writing computations 

Value of a tight _, 

Expected value analysis 

Bayeslan decisions 

Value of perfect information 

Value of additional Information 

Derives utility function 

Linear programming solution by simplex method 

Transportation method for linear programming 

Economic order quantity Inventory rTM>del 

Single server queucing (waitlrig line) model 

Cost- volume-profit analysis 

Conditional profit tables 

Opportunity loss tables 

Fixed quantity economic order quantity nwdci 



DESCRIPTION 

As above but with shortages permitted 

As above but with quantity price breaks 

Cost benefit waiting line analysis 

Met cash-ltow analysis for simple investment 

Profitability ir>dcJt of a project 

Cap. Asset Pr. Model analysis of project 



59 WACC Weighted average cost ol capttal 

60 CCT-VBAL True rote on toan *«h compiensrtlng bat requiied 

61 DISCBAL True rate on discounted to&n 

62 MERQATIAL f*»fger analysis computations 

63 FFiRAT Fifwncial ratios for a firm 

64 MPV Net present vahjc of project 

65 PRDSDLAS Laspeyres price index 

66 PRTHDPA Paasche prk;e indot 

67 SEASIMD Constrocts seasonal quantity indfces for company 

68 TIMETR Time Mrtes aralysis linear trend 

69 TIMEMOV Time series arwiysis moving average trend 

70 FUPRB1F Future prKe estimation wtth irAation 

71 MALPAC Mailr^ list system 

72 LETWRT Letter wrkjng system-finks w«h MAILPAC 

73 SORT3 Sorts list ol names 

74 LABELl Shipping labef nuker 

75 LABEL2 Name label maker 

76 BUSBUD DOME business bookkeeping system 

77 TIF^CLCK Computes »«eks total hours from timeckxk irf o 

78 ACCTPAY h rr*emory accounts payaUe system-storage permitled 

79 irtVOICE Generate irfvoice on screen and prmt on ptirfter 

80 iM^NT2 In memoty inventory control system 

8 1 TELDIR Corr^puleriied telephone directory 

82 TiWJSAN Time use anatfss 

B3 ASSIGN Use d assignment algorithm for optimd job assign 

84 ACCTREC h memory accounts receivable systcm^torage ok 

85 TERMSPAY Compares 3 methods d repaymeol ol toaro 

86 PAYMET Computes gross pay required for given net 

87 SELLPR Computes selling price for given after lax amount 
66 ARBCOMP Aitittrage computations 

89 DEPRSF SnWng fund depreciatkxi 

90 UPSZOfiE Finds UPS tones from zip code 

91 EJiVELOPE Types enveiope including return address 

92 HJTOEyP Automobile npense analysis 

93 IMSfXE hsurance poScy ftte 

94 PAYROLL2 ki merrwry payroll system 

95 DILATfAL Dikibon arulysis 

96 LOAfiAFFD Loan amount a borrower can afford 

97 REmWCH Rjrehase price for rental pn^eity 

98 SALELEAS Saleleaseback analysts 

99 RRCOtiVBD krtvestor's rale of return on convcftaHe bond 
100 PORTVAL9 Stock market portfoSo storagevaluaiion pro-am 



CASSETfE VERSION •99 

DISKETTE VERSION •99 

TRS-80* MODEL B VERSION ^149 



ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR C.O.O. OR NON-UPS AREAS 
ADO $5.00 OUTSIDE U.S.A, CANADA & MEXICO 



.95 '^^^ TOLL iro. 



CQiriPUTHQIVilCS 






^AQT>t^/Af ILAL APR_IZATC^^e :^EfVC^ 



50 N. PASCACK ROAD 
SPRING VALLEY. NEW YORK 1097T 




HOUR miSL 

OA ORDER ^ 
^^ UNE 
(914) 425-1535 



-See l-'Sf 0/ Aavertisers on page 402 



80 Microcomputing, November 1981 • 267 



N 



CQIYIPlJTHQI>iICS 



N 
C. 



.^9 



• • • EVERYTHING FOR YOUR TRS-80 '• • • 

TRS-SO la B irsdrmurk of Ihr Radio Sha( k OlvlMlnn uf Tandy rorporallon 

* Ail orders processed within 24-Hours 
^%^%^%W% ^^V^lT Ik 'WtV!*^^ * SO-Day money back guarantee on aU Software 
^\M\3MMM3lnA R MLU * A^d S3.00 for shipping in UPS Areas 

— *- ^ ^jj ^QQffjj. COD or NON-UPS Areas 

• Add $5.00 outside U.S.A., Canada & Mexico 




SMALL BUSINESS 
SYSTEMS GROUP 



BUSINESS 
SYSTEMS 




ffi 



FACTS ABOUT THE S.B.S.G. BUSINESS PACKAGES 

1. S.B.S.G. is a sopfiisticated Business Software System designed for the serious businessman. 

2 Each of the S.B.S.G. Business Modules may be purctiased separately, or you may purchase the entire coordinated business system 

3 Modules purchased separately do not coordinate with theGer>eral Ledger (Blthoughforthe5tandardS.B.S.G. fee. the user may upgrade his 
individual modules lor the coordinated system) 

4 Foolproof. Step-By-Step procedures are supplied, planned and documented tor the First-Time Computer User. All programs are self- 
explanatory, telling the user what is required at every step 

5 Programs are written in BASIC and the source code listing is supplied for those users who decide to modify the original system 

6. A complete users manual is supplied with each module. 

7 Oemo Data diskettes are supplied with sample data. 

8 S.B.S.G. has an In-House staff that can answer questions and problems related to the proper use of the S.B.S.G. Business System {on the 

telephone or through the mail). 

9. First-Time Computer Owners Note-tnsfructions are provided for entering stale payroll withholding tables There is an additional charge if 
you prefer to have S.B.S.G. Progfemmers insert the correct data 

10. Minimum system requirement is 2-drJves to run any single module. 

11. Minimum system requirement is 3-drives to run ihe coordinated business system (AR-AP-GL) or (AR-AP-GL with PAYROLL) 

12 Minimum system requirement is 4-drives to run the extended coordinated system (AR-AP-GL-PR and INVENTORY/INVOICING) 

13 The A. OSBORNE & ASSOCIATES business manuals are provided FREE with each order (they may be purchased separately at $20 per 

manual). 

14 The INVENTORY and INVOICING modules are original programs written by 5.B.S.G. 

15 Each module can be purchased as independent modules to run on a 2 or more drive system except INVOICING 

16. Memory requirement is 4eK for the MODEL-I and 64K for the MODEL-II. 

17 AIIS.B.S.G. BUSINESS SYSTEMS may be upgraded up to 4-disk drives. No data is ever lost during an upgrade. There tsaslandard S.B.S.G. 
charge lor all upgrades 



ACCOUNTS PAYABLE 

The accounts payable system receives data concerning purchases from 
suppliers and produces checks in payment of outstanding invoices In 
addition. It produces cash management reports This system aids in 
tight financial control over all cash disbursements of the business 
Several reports are available and supply information needed for the 
analysis of payments, expenses, purchases and cash requirements. All 
A/P data feeds General Ledger so that data is entered into the syslem 
just once These programs were developed 5 years ago for Ihe Wang 
micro-computer and have been tested in many environments since 
then The package has been convened to the TRS-80'" and is now well 
documented, on-line, interactive micro-computer system with the 
capabilities of (or exceeding many larger systems) 

CAPABILITIES: 

* menu driven, easy to use, full screen prompting and cursor control 

* invoice oriented: everything revolves around the invoice, handles 
new invoice or credit memo or debit memo 

* invoce information recorded, invoice if. description, buyer, check 
register*, invoice date, age date, amount of invoice, discount (in%), 
freight, tax ($}, total payable 

* transaction print and file maintenance procedures insure accuracy 

* flexible check calculation procedure, allows checks to be calculated 
for a set of vendors-or-for specific vendors 

* program prints your checks; contiguous computer checks with your 
company letterhead can be purchased from SBSG 

* reports include (samples on back) 

a open item listing /closed item listing - both detail and summary 

• debit memo lisling/credit memo listing 

• aging 

■ check register repon (to give an audit trail of checks printed) 

• vendor listing and vendor activity (activity of the whole year) 

* fully linked to GENERAL LEDGER: each invoice can be distributed 
to as many as five (5) different GL accounts: system automatically 
posts to cash and A/P accounts 



ACCOUNTS RECEIVABLE 

The objective of a computerized A/R system is to prepare accurate and 
timeley monthly statements to credit customers Management can 
generate information required to control the amount of credit extended 
and the collection of money owed in order to maximize profitable credit 
sales whde minimizing losses from bad debts. The programs com- 
posing this system were developed 5 years ago, especially for small 
businesses using the Wang Microcomputer. They have been tested in 
many environments since then. Each module can be used stand alone 
or can feed General Ledger tor a fully integrated system. 
CAPABILITIES: 

* menu driven, easy to use: full screen prompting and cursor control 

* invoice oriented; invoices can be entered before ready for billing, 
when ready for billing, alter billing or after paid 

« allows entry of new invoice, credit memo, debit memo. Or change/ 
delete invoice 

* allows for progress payment 

* transaction information includes: 

• type of A/R transaction • billing date 

• customer P O. » • general ledger account number 

• description of P O • invoice amount 

• shipping/transportation charges 

• tax charges 

• payment 

• progress payment information 

• transaction print & file maintenance procedures insure accuracy 

* customer statements printed; computer statements with your com- 
pay letterhead can be purchased from SBSG 

* reports include (samples on back) 

• listing of invoices not yet billed 

• open Items (unpaid invoices) 

• closed items (paid irtvoices) 

• aging 

* fully linked to General Ledger; will post to applicable accounts; 
debit A/R. credits account you specify 
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TRS-ao Is a iradrmark nl rhr Radio Shack DIvlsliin i>f Tandy Corporalltin 



PAYROLL 
Payroll invoices many complex calculations and the prodiiction of 
reports and documents, many ot which are required by government 
agencies It is an ideal candidate lor the computer. With this Payroll 
system In-house, you can promptly and accurately pay your employees 
and generate accruate documents/reports to management, employees, 
and appropriate government agencies concerning earnings, taxes, and 
other deductions The package has been converted to the TRS-80'" and 
is now a well documented, op-line. inlecaclive. micro-computer system 
with the capabilities ot (or exceeding) many larger systems 
CAPABILITIES: 

* performs all necessary payroll tasks including: 

• tile maintenance, pay data entry and verification 

• computation of pay and deduction amounts 

• printing of reports and checks 

* can handle salaried and hourly employees 

* employees can receive 

• hourly or salary wage 

• vacation pay 

• holiday pay 

• piecework pay 

• overtime pay 

* employees can be paid using any combination ol pay types (except, 
hourly cannot receive salary and salary cannot receive hourly) 

* special non-taxable or taxable lump sums can be paid regularly or 
one lime (bonus, reimbursements, etc) 

* health and welfare deductions can be automatically calculated for 
each employee 

* ear nings-to-dale are accumulated and added to permanent records, 
taxes are computed and deducted US income tax. Social Security 
tax. state income lax. other deductions (regular or one time) 

* paychecks are printed, computer checks with your company letter- 
head can be purchased from SBSG 

* catculations are accumulated lOf. employee pay history. 941 A re- 
port, W-2 report, insurance report, absentee report 

* fully linked to General Ledger, Each employees payroll information 
can be distributed to as many as (12) twelve different GL accounts; 
system automatically posts to cash account 



INVENTORY CONTROL/INVOICING 

* ISAM (Indexed Sequential Access Method) eliminates the necessity 
for time consuming son 

* Pre-Allocated Files tor IMMEDIATE update and inquiry capabilities 

* Fast Disk storage and retrieval 

* Inventory Master Record includes class SKU Division. Retail.. 
Cost ..Beginning Balance Period Sale Units Period Receipts,. On 
Order. On Hand .Minimum Reorder Point Recommended Re- 
order Amount. ..Vendor Number Period Sale Dollars YTD Sale 
Units. YTD Sale Dollars. 

* Calculated and Displayed Formulas include Gross Margin ($) 
Gross Margin (%) Gross Margin RQl {%) Average Inventory Reiait 
($),.. Average Inventory Cost ($)... Turn-Over (%) 

* Reports Generated include Master File Listing Class Description 
Listing Transaction Audit Trail Minimum Reorder Point by Ven- 
dor Helail Price List Retail & Cost Price List Period Sales Report 

Year to Date Sales Report Slock Status {Screen or printer output) 
. Commission Report (for salesmen and buyers) 

* Transaction Types include Sales, Vendor Receipts Vendor 
Orders Customer Returns Vendor Returns Transfer Stock 



GENERAL LEDGER 

The General Ledger accounting system consolidates financial data 
from other accounting subsystems (A/R,A/P, Payroll, direct posting) in 
an accurate and timely manner. Major reports include the Income State- 
ment and Balance Sheet and a "special" report designed by manage- 
ment The t>eauty of this General Ledger system is that it is completely 
user formatted You "customize" the account numbers, descriptions, 
and report formats to suit particular business requirements These 
programs were developed 5 years ago for the Wang micro-computer 
and have been tested in many environments since then The package 
has been converted to the TRS-BO™ and is now a well documented, on- 
line, interactive micro-computer system with the capabilities ot (or 
exceeding) many larger systems. 
CAPABILITIES: 

* more than 200 chart of accounts can be handled 

* account number structure is user defined and controlled 

* more than 1,750 transactions may be entered via: 

• direct posting, done by hand; validated against the account tile 
before acceptance 

• external posting, generated by A/R. A/P, Payroll or any other 
user source 

* data IS maintained and reported by: 

• month 

• quarter 

• year 

• previous three quarters 

* reports (samples on back) include: 

• inal balances 

• income stalemeni 

• balance sheet 

• special accounts reports and more 

* user formats reports with the following designated as you wish: 

• titles 

• headings 

• account numbers 

• descriptions 

• subtotals 

• totals 

• skip lines 

• skip pages 

* up to eight levels of totals - fully user designated 

* menu driven, easy to use. full screen prompting and cursor control 



iCQIYIPUTHQI^ICS- 



JsrtjfcT* ^^T <^:ju. 
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50 N. PASCACK ROAD 
SPRING VALLEY. NEW YORK 10977 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 




HOUR 
24 ORDER 
LINE 

(914) 425-1535 



raiCING MOD-1 

VERSION 

ACCOUNTS RECEIVABLE $125 

ACCOUNTS PAYABLE $125 

GENERAL LEDGER $125 

PAYROLL $125 

INVENTORY $175 

INVOICING $150 

COORDINATED INVENTORY/INVOtCtNG ACCOUNTS RECEIVABLE $449 

COORDINATED AH-AP-GL $375 

COORDINATED AR-AP-GL with PAYROLL $495 

EXTENDED COORDINATED AR-AP-GL INVOICING/INVENTORY with PAYROLL $799 



MOD-II 


MOD-HI 


VERSION 


VERSION 


$225 


$199 95 


$225 


$199.95 


$225 


$199 95 


$225 


$199.95 


$275 


$199.95 


$250 


$199,95 


$749 


$599.95 


$675 


$599.95 


$899 


$799 95 


$1299 


$1199,95 



■ Saa List of AdvarlismrM oniMoa 403 
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C. 



• • • EVERYTHING For Your TRS-80* Model I or Model III • • • 



' TRS-BO" IS a trademark o' Tandy Corp 



REMsoFT. Inc 



Ail o'ders processed witfun 24 Hours 
■ 30-Day monpy bac*! guiiranlee 
• Add S3 00 for shipping in UPS Areas 
• AdcJ$4 OOloi C n or NON UPS Areas 
" Add S5 00 IQ Canada or Mcxii.o 
• AdO e«act postage lo al! ottie: courtlnes 



Let Your TRS-80-' 
Teach You 

ASSEMBLY LANGUAGE 


LEARN TRS-80 " 
ASSEMBLY LANGUAGE 

DISK I/O 


REMASSEM-1 

Tiredol buying book a Her book ori assembly language programmmq and 
still not knowing your POP Uorri your PUSH? 

HcMsOrT proudly announces a more efficient *ay using yoiii own 
THS-BO" to learn the fundamentals of asscribly language programming 
at YOUR pace and at YOUR ronvenience 

Our unique package ■INTRODUCTION TO THS-80'- ASSEMBLY 
PROGRAMMING", will provide you witfi ine following 

♦ Tf?ri4t>-minytp lessons on audio cassettes 

• A df iver program 10 make your THS-SO'* video monitof serveasa 
blackboard tor the instructor 

* A display prog'am lo' each lesson to provide illustration andrein- 
(orcenienl for what you are hearing 

* A textbook on TRS-80"" Assembly Language Programming 

* Step-by-stcp dissection o1 complete and useful routines to test 
memory and to gatn direct control over t fie keyboard video moni- 
lOi. and printer 

♦ How to access and use powerful routines in your Level II ROM 
This coufse was developed and recorded by Joseph E Wdlis and is based 
on the successlul series ot courses he has taught at Mela Technologies 
Corporation the Radio Shack Computer Center and other locations in 
Northern Ohio The minimum system regui'ed is a Level II. t6K RAM 


REMDISK-1 

Your disk system and you can really step nut with REM-i«f ' ■. Educational 
Module REMDISK-I.rf shorlcoufse revealing the details of DISK 1 O 
PROGRAMMING using assembly language 

Using the same formal as our eiltemely populaf introduction to assem- 
bly language programming, this ■ASSEMBLY LANGUAGE DISK I/O 
PROGRAMMING ' course includes 

• Two 45 minulc lessons on audio cassetle 

• A driver program lo make your TRS-80"" video monitor serve as a 
blackboard 'or the instructor 

• A display program lor each lesson to provide illustration and rem- 
lorcemenl fo' what you are hearing 

• A booklet o( comprehensive tuily-cummenlet] program iislintjs 
illuslrnting sequential file 1 O random-acress lile 1 O and track 
and sector 1 O 

• A disketle with machine readable source codes lor hi programs 
discuss-'d in both Radio shack EDTASM and Macro formats 

• Routines to convert from one assembler format to the other 
This course was developed and recorded by Joseph E Willis for the 
student with experience in assembly language pragrarnming it is an 
intei mediate lo advanced -level course Minimum hardware required is a 
Model 1 Level II 16K RAM one disk drive system 







iCQIYIPUTHQI^IXCS! 



■ ■V^VVV*IJh> »** 



f'S 




so N PASCACK ROAD 
SPRING VALLEY. NEW YORK 10977 



HOUR 

ORDER 

LINE 



PLEASE SEND ME: 

DRFMASSEM-l (TRS BO MODEL l CASSETTE) S69 95 

DREMASSEM 1 (TRS-80 MODEl IDISKETTE) $74 95 

D REMASSEM-1 (TRS-fiOMOOtL III CASSETTE) $74 95 

□ REMASSEM-1 (TRS-80 MODEL III DISKETTE) $7995 

a REMDISK-1 (TRS-80 MODEL I DISKETTE) 529 95 

□ REMDISK-MTRS-80MODEL III DISKETTE) 534 95 



CREDIT CARD NUMBER 

SIGNATURE 

ADDRESS 



(914) 425-1535 




NEW TOLL-FREE 
ORDER LINE 

(OUTSIDE OF N Y STATE) 

(800) 431-2818 



EXP DATE 



NAME 



CITY STATE , 

•" ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE " 



ZIP 
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FOR THE TRS-80 MODEL I AND MODEL lU 



1 System Diagnostic 



andysr«/iS^ 




ProRerPperatioi^ 



(oeoLfi^-^'^^^*^^''*"'*^'''^'^ ^''*' Cassette or Disk 

IS YOUR COMPUTER WORKING? 



^^^ -»_ ARE YOU SURE? 

^fcMj^^ ^P% ROM: checktum lest 

^^V^^V^ ' *^ RAM: four separate tests including every address and data value. 

^ ^ viiiFO niQPi *v- character generator, video RAM, and video signal. 

every key contact tested. 
character test 
read/w rite/ verify data, 
connector fault, data IransmiHion, framing, data loop, baud rate generator. 

disk controller, drive select and restore, track seek and verify data, read/write/ verify all tracks and 
sectors with or without erasing, sector lofcnatting, disk drive limer, disk head cleaner. 

— Individual tests of each device with operator monitoring and intervention. 

— Continuous sysem tests run continually for hours testing each component, with diagnostic reporb optionally written on line printer. 

— One program adapts to any system configuration and hardware. 

— Complete instructions and documentation. 



ROM: 

RAM: 

VIDEO DISPIAY: 

KEYBOARD: 

LINE PRINTER: 

CASSETTE RECORDER: 

RS-232-C INTERFACE: 

DISK DRIVES: 



MON-3 and MON-4 

The TRS-80 Monitor Propams "3 and tt4 are powerful utifity programs 
enabling you to interact dkeclty with the TRS-SO in Machine Lartguage. 
They are as useful for beginners as for advanced programmers. 

• BEGINNERS can learn to interact directly with the computer in 
Machine Language. 

• 40-PAGE MANUAL provided with each program. 

• SIMPLE commands, easy to use. 

The Features Of The Monitor Pro g rams Enable You To The FoUowin g 

• DISPIAY memory in different ways. 

• DISASSEMBLE mnnory to see Machine Language commands. 

• MOVE and COMPARE memory areas. 

• SEARCH through memory to find specific values. 

• MODIFY memory in vartous ways. 

• RELOCATE object programs. 

• PRINT output on video display or line printer. 

• READ and WRITE object tapes in SYSTEM Format. 

• UNLOAD programs using low RAM on disk. 

• SAVE and READ disk files (MON-4 Onty). 

• INPUT and OUTPUT of disk sectors (MON-4 Only). 

• SEND and RECEIVE data over RS-232-C Interface (MON-4 Only). 

• Create SYMBOLIC Tapes (MON-3) or Files (MON-4) of Disassem- 
bled output for Editor/Assembler program. 

MON-S (For CaMsttc Sritami) tSf-VS 
MON-4 CFor IHtfc Sjrsteiiu) •49-9S 



SMART TERMmAL 

Enables your TRS-M to be used as a remote terminal to a time sharing 
computer svstem. Supports upper/lower case and full range of control 
keys, incluaing controlkey mapping into any ASCII character. Automatic 
transmission of files between TRS-80 and host computer. Files can be read 
from or written to cassette tape or disk. Incoming data can be printed on 
line printer or stored in memory for subsequent save to cassette or disk. 
Disk and tape files are fully compatible with the ELEORIC PENCIL pro- 

!;ram. Baud rate and RS-232-C sense switches can be reset without open- 
ng Expansion Interface. Requires RS-232-C interface and nK>dem. 

CMMtte or DItk Version $*9-K 



FASTSORT 

A series of machine-language subroutines (for 16K, 32K and 48K Sys- 
tems) to son data from BASIC programs. Data mav be alphabetic (string) 
or numeric (integer only). Works equally well with Level II or Disk Basic. 
Complete irKlruclions and enamples provided for interfacing with your 
BASIC programs. 

Gauono or Dtok Voriion »9.95 



MAIUNG UST 

Maintains mailing lists of over 1000 names. Commands allow adding, 
changing, deleting, and finding names. Sorting is done by machine lan- 
guage according to the information in any field (i.e., name, address, zip 
code). Labels printed in 1, 3, or 3 columns, m master list on one line, or on 
video display. 

OUk V«r«lon Only S*9f5 



HOME BUDGET 

Combines the maintenance ol vour checkbook with analysis of your 
income, expenses, and monthly nils. Handles data including bills, in- 
cluding bills, income, deposits, checks and debits to your checking ac- 
count, and cash expenses. Com[Hjtes checkbook balance, list of unpaid 
hills, monthly and year-to-dale summaries of income and expenses show- 
ins income tax deductions. All output printed on video display or line 
printer at user's option. Complete instructions for customizing to suit 
your own budget. 

Dlak Version Only S49-9S 



SMALL BUSINESS ACCOUNTING 

Based on Dome Bookkeeping Record "612, this program keeps track of 
income, expenditures, and payroll for a small business of up to 16 employ 
ees. Income and expenditures can be entered on a daily, weekly, or 
monthly basis, and the program computes monthly, through last month, 
and vear-to-date summaries. Payroll section keeps record of individual 
employees and their paychecks with up to six categories of pavroll de- 
ductions. Employee payroll record and year-to-dale payroll totals can be 
computed. Manual contains com(riete instructions for customizing to suit 
your business. 

DUk Version MV-M 
Cassotte Version taV'Vf 
(Cassette Version does not contain payroll) 



iCQinPUTHQMlCS 
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so N. PASCACK nOAO 
SPRING VALLEY. NEW YORK 10977 






NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N.y. STATE) 

(800) 431-2818 




HOUR 
24 ORDER 
LINE 

(914) 425-1535 



• All orders processed withm 24 Hours 
• 30-Day money back guarantee 
•Add S3 00 for Shipping m UPS Areas 

• Add $4 00 fof C O D Of NON-UPS Areas 
• Add S5 DO to Canada or Mexico 
" Add exact postage to all other countries 



>'S># Lia\ oi Advertlaera on page 402 
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GENERAL 



Meet your fellow TRS-80 ovi^ner. 



Users Groups 



Many of you have been watting for it, and here It is: an interna- 
tional list of TRS-80 users groups. This list is undoubtedly in- 
complete and some ot the addresses are over a year old, but we be- 
lieve this list to be an excellent representation of what is available 
to the TRS-80 owner. 

80 Microcomputing intends to update this list periodically 
as a service to our readers. So, if anyone is forming a new group 



Of the group you are in did not make this list, please notify us. 
Also, if your group has changed its name or Is no longer in ex- 
istence let us know. 

Users groups are an excellent way to get to Know other people in 
the microcomputer hobby/business as well as a good resource for 
help in solving your computer problems. We hope our readers find 
this list useful.H 



STMB 


GROUP KAKE 


ADDRESS 


cirr 


IIP 


CONTACT 




RECIHA OPERATORS OF MICRO SISTBIS 


BOX IBBl 


REGIKA 


S4P3B2 


WENDY flOFFATT 




BRASILIAM CLUB 


RUA SAHKAIBA S16. LBBLON 


RID DB JANEIRO, 3245 


BRASIL 


DOUGLAS GILSOM 


Alt 


AHCEiORACE USERS GROUP 


BOX 11, 3S5 SOUTB STATION 


ANCHORAGE 


99511 




AL 


CENTRAL ALABAMA COHPUTER SOCIETY 


2873 REXFORD RD 


MONTGOMERY 


3G11G 


L CARRIStW 


AL 


G2C3 


4307 OLD SHELL RD 


MOBILE 


36608 


C. REAGAH 


AL 


CENTRAL AL MICRO SOCIETY JUNIOR CHAPTER 


R'l'. t3 nOX 57B 


MONTCOHER 


36110 


FREDERICK FERGUSON 


AZ 


USERS GROUP OF ARIZONA 


6218 H. NAitLETTE 


G LEND ALB 


853B1 


ROD PURCELL, PRBS. 


AZ 


FHEONIX USERS GROUP 


1858 EAST NARYLAHD 127 


PHBONIX 






AZ 


ARIZONA USERS GROUP 


«122 EAST PAIRHOKT 


PhOBnix 


asiia 


R WARRQI 


CA 


USERS AND ABUSERS 


135B GRANT RD. 


SUNNYVALE 


94040 


RADIO SBACX 


CA 


CAUSE (SOFTWARE EXCHANGE) 


1S651 VON KARMAN 


IRVINE 


92713 


SEL BAMDLB1 


CA 


USERS GROUP 


712-C COUlTTRy WOOD 


WALNUT CREEK 


9459B 




CA 


PACIFICA USERS GROUP 


338 ALIDA HAY 1316 


SOUTH SAN FRANCISCO 


94080 


J. STRAItARIMO 


CA 


REDWOOD EMPIRE USc3S GROUP 


7136 BELITA AVE. 


ROHNERT PARK 


94928. 


JOHN RBVBLLE 


CA 


SOUTH BAY USERS GROUP 


3605 PINE AVE 


MANHATTEN BEACH 


90266 


S. HIMS 


CA 


EAST BAY USERS GROUP 


17 ECHO AVE 


OAKLAND 


94611 




CA 


SAN FRANCISCO THS-SB USEH.'; GROUP 


338 ALIDA WAY (306 


SOUTH SAN FRANCISCO 


94088 


JOHN F. STRAIIARINO 


CA 


HOMEBREW COHPUTER CLUB 


BOX 62G 


MOUNTAIN VIEW 


94B42 




CA 


INLAND COMPUTER SOCIETY 


3359 SECCMD ST 


RIVERSIDE 


92581 




CA 


SOUTH BAY USERS GROUP 


BOX G3B2 


STANFORD 


943B5 


B. DEVEMDORP 


CA 


TRS-ee FREE PROGRAM EXCHANGE 


441B MORROW RO. 


MODESTO 


9535B 




CA 


COUNTRYWIDE USER GROUP 


104B9 STATE ST. 


SOUTH GATE 


9B2e0 


J. MCCORTBY/S. NIU 


CA 


LITTON CALULATOR/ COMPUTER CLUB 


55BB CANOGA AVB 


WOODLAND HILLS 


91364 


W. BENNETT 


CA 


MARIN COUNTY USERS GROUP (MCTUG) 


45 SBLPRIDGE MAY 


HAMILTON AFB 


94934 


PAT MCHABON 


CA 


SONOMA COUNTY COHPUTER CLUB 


BOX 945 


COTATI 


9492B 




CA 


IEEE COMPUTER SOCIETY 


5855 NAPLES PLASA, SUITE 301 


LONG BEACH 


9IS03 




CA 


HOHTEHEY.BAY USERS GROUP 


1BB2 UALSEY DR 


NONTBHEY 


93940 


CURT HESS 


CA 


TRS-B9 NIBBLRRS 


2555 HESPERIAN BLVD 


HAYWARD 


94545 




CA 


VALLEY COMPUTER CLUB 


3311 WKST THIRD, APT. 1-319 


LOS ANGELES 


900 20 


KENNETH YOUNG 


CA 


PAMONA COMPUTER SOCIETY 


4155 OAK HOLLOW RD. 


CLAREHONT 


91711 




CA 


THE FORTH IWTERFST GROUP 


PO BOX 1185 


SAN CARLOS 


9407B 




C* 


ORANGE COUirrT USERS GROUP 


3521 E. CC'IKONWEALTH 


FULLRRTOH 


92631 


ED FAULK, PRBS. 


CA 


SAN FRANCISCO USERS GROUP 


UQ USARRIX 


PRESIDIO OP SAM FRAN 


94129 


P. MCMA80N 


CA 


VENTURA COUNTY TRS'8B 


2534 NORTH TEMPLE AVE. 


CAMARILLO 


93810 


CLUB HEHSLBTTBil 


CA 


USERS GROUP 


7465 HOLLISTON AVE., SUITE 23 


GOLETA 


93017 




CA 


VENTURA COUNTY TRS-88 COMPUTER CLUB 


56 7 NEST LOOP DR, 


CAMARILLO 


93031 


L. STBIHMETI 


CA 


VALLEY TRS-8B USERS GROUP (VTUG) 


19116 NASVILLB 8T 


NORTBRIDGE 


91326 


WILLIAM HBITB 


CA 


SACRQ1ENT0 USERS GROUP 


1237 BEARD WAY 


CARHICHAEL 


956B8 


HIRE MOORE 


CA 


SAN JOSE USERS GROUP 


3490 BON AIR COURT 


SAN JOSE 


95117 


C S SHANKS 


CA 


ET-34Ba USERS GROUP 


11231 OAK ST. 


EL MOHTB 


91731 


CHARLES VAN DYKE 


CA 


TRS-88 USERS GROUP OF HAPA 


4432 SPRINGNOOO 


NAPA 


94558 




CA 


OASIS USERS GROUP 


PHASE ONE SYSTEMS 


OAKLAND 




FRED BELLAMY 


CA 


SAN GABRIEL VALLEY TRS-BB USERS GROUP 


758 B. STH ST. #75 


AIUSA 


917B2 


DAH DRESSBLBAUS 


CAN 


AURORA COMPUTER SOCIETY 


BOX 434 2 


EDHOKTOH, ALBERTA 


T5B1R5 


BOB BUmiNGPOID 


CAN 


USERS GROUP OTTAMA 


2 LARSEH CT. 


KAHATO, ONTARIO 


X2L1YB 




CN 


KITCHENER-WATERLOO MICRO CLUB 


UNIVERSITY OF WATERLOO 


WATERLOO, ONT 


N2L3G1 




CT 


CONNECTICUT COHPUTER CLUB 


18 RIDGE COURT WEST 


WEST HAVEN 


06516 


TAYLOR 


CT 


SOUTHERN KEN ENGLAND COMPUTER SOCIETY 


267 WILLOW ST 


HEW HAVEN 


06511 




CT 


NORTH EASTERN BASIC FOUR USER GROUP 


22 TOBEY RD. 


BLOGMFIELD 


f<0B2 


JOHN PBARS8 


CT 


PAIHFIELO COUNTY TRS-81 USERS GROUP 


10 RICBLEE RD. 


NORWALK 


B6B51 


ALAN ABRABAMSCM 


CT 


CONN MICROISTS 


8882 WENDY LAHB 


WESTPORT 


86 881 




DC 


TCUG 


2617 42ND ST NH (2 


WASHINGTON 


28887 


R. DALY 


DE 


DELAWARE USERS GROUP 


1116 PIPER RO 


WILMINGTON 


19BB3 


TIM J. IHDE 


DB 


DELAWARE USERS OF MICROS 


318B CBAPEL AVE 


CLAYMONT 


19783 


JODIE S. BOBSOH 


EHG 


NORTH LONDON HOBBY COMPUTER CLUB 


HOLLOWAY RD. 


N. LONDON 


N7 8DB 


R. BRADBEER/N LONDCM P 


FL 


TBUG-88 


PO BOX 247 


TAMPA 


33602 


RAY ECHBNBACH 


TL 


CLUB OP CENTRAL FLORIDA 


152 HILL RUN OHIVE 


LAKE NARY 


32746 


SILOH HORNITI 


PL 


ORLANDO, PL, COMPUTER CLUB 


ADVENTURE INTERNATIONAL 


ORLANDO 


328B2 


SCOTT ADAMS 


OA 


USERS GROUP OF ATLANTA, LTD. 


1315 RUSTIC RIDGE DR, N.E. 


ATLANTA 


3B319 


BOB GREBH 4/ 81 


«A 


CSRA COMPUTER CLUB 


BOX 2B4 


AUGUSTA 


38903 




(U 


USERS GROUP OP ATLANTA, LTD. 


3486 CLAIRMONT RD, N.E. 


ATLANTA 


30319 




GRC 


USERS GROUP 


CHRI-'SOSTOHOU SMYRNIS 38 


NEO PSYHIKO 




G. ANTIHISIARIS 


lA 


DBS HOIHES USERS GROUP {DH-TDG) 


t3B3 4215 GPAND AVE 


DES MOINES 


50312 


DENNIS R. SOLOMON 


lA 


MARSHALLTOHN COHPUTER CLUB 


1181 SOUTH 2Nlj AVE 


HARSHALLTCWN 


50158 


D, GROVES 
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lA DES nOINES USERS GROOP [DM-TVC] 

lA TftS-BI USER GROUP 

IL COMPUTER RKTAL SERVICE 

IL PEORIA AREA CX>MPUTER CLUB 

IL CHICAGO TRS-8> USERS GROUP 

IL QUAD CITY COMPUTER CLUB 

IL CHICAGO AREA COMPUTER HOBSyiST BXCB 

IN USERS GROUP 

IH GROOP OFF SOUTBKEST IHDIAHA 

IH IHDIANAPOLIS TRS-8» USERS GROOP 

KS COMPUTER SETWORK OF KANSAS CITK 

KS GREATER KANSAS CITY USBAs CRCUP 

KS KBUG 

LA CRESCENT CITY COMPUTER CLUB 

HA NEW ENGLAND CCMPUTER SOCIETY 

MA ALCOVE COMPUTER CLUB 

HA WESTERN MASS CCWPUTER CLUB 

HA CULPRIT/BDP- AUDI TOR USER CROUP 

HA NEW ENGLAND SYSTEH/3, INC. 

HA PRIHE C(MPUTBR, INC, 

HA USERS MEETING 

MA BOSTON COMPUTER SOCIETY 

HA TRUGEM 

HA NATIONAL COMPUTER SHOWS 

HA GOSUB TRS8I USERS GROUP 

KE AUGUSTA USERS GROIP 

ME TRS-8* NEWSLETTER 

HI SOOTBEASTERH HICHIGAH COMPOTBB 

MI CENTRAL MICHIGAN USERS GROUP 

HI HID-HICHIGAN COMPUTER CLUB 

MI FARGO-NOORBBAD COMPUTER CLUB 

HI CENTRAL HICHIGAN USERS GROUP 

MI EDUCATIONAL RECREATIONAL CLUB lERCC) 

HI NICROCOHPUTBR USERS INTERNATIONAL 

HH HINNESTOTA COMPUTER SOCIETY 

HO ST. LOUIS AREA COMPUTER CLUB 

MS OXFORD I-8> USERS GROUP 

NC NATIONAL COMPUTER SOCIETY 

HC USERS NOTES 

NC TRS-aa USERS GROUP 

NH GOSUB USERS GROUP 

NB HORTBBRN NEW ENGLAND SOCIETY 

NJ BASIC POUR USER GROUP, MID-ATLANTIC 

NJ NORTHERN HJ AMATUER COMPUTER CLUB 

HJ AMATEUR COMPUTER CLUB OF NJ 

HV NORTHERN NEVADA AHATUER COMPUTER CLUB 

NX LONG ISLAND COMPUTER AS5N 

NY TRS-Se SPECIAL INTEREST GROUP 

NY SAINT PETBR'S CCMPUTER CLUB 

NY INTBRMATIONAL SOFTWARE A.G. USERS GROUP 

HY EWEIBRUECKEH MICROCOMPUTER USERS GRCUP 

NY CENTRAL NEW YORK TRS-Bt USERS GROUP 

NY CP/H USERS GROUP 

NY TRS-ei USERS GROUP 

NY USERS GRCUP 

HY CP/H USERS GROUP 

NY TRS-BI USERS GROUP, CBURCH APPLICATIONS 

KY ONONDAGA COORTY 

NX USERS GROOP (DIVISION OF C.H.I.P.S.) 

NY KINGS BYTE TRS-SI USERS GROUP 

Oa BASIC POUR USER GROUP, N. OHIO 

OH TRS-Sa CLUB 

OB PRIDE USERS ASSOCIATION, INC, 

OB ACSCO USER GROOP 

OB DAYTCm ARBA USERS GROUP 

OX TULSA USERS GROUP 

OR PORTLAND USERS GROUP 

OR TEKTRONIX, INC. 

OR CENTER FOR THE STUDY OF THE FUTURE 

?A ATLANTIC SOFTWARE, INC. 

PA AUUA, INC. 

PA PITTSBURGH AREA COMPUTER CLUB 

PA PHILADELPHIA AREA COMPUTER SOCIETY 

PA DELAWARE VALLEY COMPUTER CLUB 

PA CRANBERRY COMPUTER CLUB 

TH CHATTANOOGA HICROCOHPUTER CLUB 

TX ALAMO COMPUTER ENTHUSIASTS 

TX USERS OP HOUSTON 

TX NASA/BAY AREA USERS GROUP 

TX USERS OF HOUSTON 

TX KILLEEN USERS GROUP 

TX PERMIAN BASIN COMPUTER GROUP 

TX PAN BAKOLE COMPUTER SOCIETY 

TX COMPUTER HOBBYIST GROOP OP NORTH TEXAS 

TI TRS-BI USERS GROOP 

TX TEXHOMA MICROCOMPUTER ENTHUSIASTS 

TX WICHITA VALLEY USERS GROUP 

TX TEXAS USERS GROUP 

TX HIGH PLAINS USERS GROUP 

TX USERS GROUP OF S.N. HOUSTON 

TX USERS GROUP 

TX TRS-81 USERS GROUP 

VA TIDEWATER TRS-BI USERS GROUP 

VA TANDY COMPUTER USERS GROUP 

VA PRINCE WILLIAM CMPUTER CLUB 

VA AMATEUR RADIO REASEARCH AND DBV. CORP 

VA TCUG.INC 

Vt HOKTHBRM VERMONT COHPUTER CLUB 

n RATIONAL CINCOM USERS GROUP 

NA D8IRS GROUP 

m USERS GROOP - WASHINGTON 

HA USERS GROOP 

HA USERS CLUB— WASHINGTON 

VA USERS GROUP OP SPOKANE 

tfGR TUG 

HI TRI-CO GSD USERS 

HI MADISON USERS GROUP 

HI USERS NOTES 



4215 GRAND AVE, 1303 


DES KOINES 


50312 


14BI EAST POST B 


RARIOH 




RR BOX 1138 


CRETE 


60417 


2019 NORTH IDAHO 


PEORIA 


61684 


3951 N.LAKE SHORE DRIVE 


CHICAGO 


60613 


4211 1/2 7TH AVE. 


ROCK ISLAND 


61201 


BOX 52 


SOUTH HOLLAND 


60473 


22(3 CORD ST. 


INDIANAPOLIS 


46224 


BOX 3284 


EVANSVILLE 
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EDUCATION 



Show your students beauty in number systems. 

Alternate Course— Part IV 



Michael A. Duffin 
1507 East Avenue 
Berwyn, IL 60402 



One of the most difficult con- 
cepts to understand in 
data processing is that of differ- 
ent numbering systems. It is 
particularly difficult to grasp in 
an introductory course. Most 
courses introduce these con- 
cepts within the first few weeks 
of class. Thus, most students 
are inundated with binary, octal 
and hexadecimal manipulations 
within a time period of two to ten 
days. Then they never see the 
numbering systems again ex- 
cept on tests. 

When I teach numbering sys- 
tems in "An Introduction to Data 
Processing" at Morton College in 
Cicero, IL, I try to spread these 
ideas over a 12-week period. 
Since I believe that most people 
fear mathematics. 1 make my ini- 
tial presentations in a non- 
mathematical fashion. 

The first time I introduce bina- 
ry numbers I use the chart shown 
in Table 1. 

I ask my students If there Is 
anyone who doesn't recognize 
these characters. (I have a real 
problem with those that don't.) I 
then ask them what numbers 
would be left if we could only 
use the numbers zero and one. 
From all of the numbers printed, 
the only ones that use just the 
digits and 1 are 0, 1, 10, 11,100, 
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101, 110 and 111. 1 write these 


numbers above the first line in 


the chart so that we have the fol- 


lowing: 


1 10 11 100 101 110 111 


0123 4 5 6789 



The next thing to do is to look 
for a pattern in these numbers. 
(What is the next number if we 
follow the same pattern?) I re- 
ceive some interesting answers 
the first time this question is 
asked. These answers range 
anywhere from 112 to 222. Final- 
ly, in a moment of inspiration (or 
frustration) someone will say 
1000. From that point on it is 
easier to determine the numbers 
that follow. Once everyone un- 
derstands the pattern, I usually 
have them construct a table 
with the first 40 decimal and bi- 
nary numbers printed side by 
side. 

Someone always asks, "Why 
do we use binary numbers?" I 
usually split this question into 
two parts. The first part of this 
question is "Why?" I explain 
that phiiosphers have been try 
jng to figure out the answer to 
this question since the beginning 
of time. The second part of this 
question Is "Do we use the bina- 
ry numbering system?" The an- 
swer to this is "Yes " I realize 
that this doesn't tell the student 
a heck of a lot but it does keep 
their attention. 

The reason we use the binary 
numt>ering system in data pro- 
cessing is that the computer 



uses these numbers. I tell them 
that a computer is similar to a 
machine made up of switches, 
each like a light switch. The only 
thing you can do with a light 
switch is turn it on or off. Thus, 
every time a computer sees a 
one it turns a switch on. Every 
time It sees a zero it turns the 
switch off. 

I spread the above Informa- 
tion over two or three 15-minute 
periods. Lets face it, numbering 
systems are boring. To expect a 
student to pay attention for an 
hour or so is a bit much to ask. 

Once my students have con- 
structed a decimal-binary chart, 
simple addition and subtraction 
problems become easy. For ex- 
ample, if we wish to add 1010 and 
11000 we can look up the deci- 
mal equivalents of these num- 
bers. We find that 1010 corre- 
sponds to decimal 10 and 1 1000 
corresponds to decimal 24. If we 
look next to decimal 34, our an- 
swer is 100010. 

When we have had our fill of 
binary (that doesn't take long) 
we then look at octal and hexa- 
decimal. To introduce octal 
numl>ers we use the same chart 
that was used to introduce bina- 
ry numbers. Only this time we 
choose only those numbers that 
have the digits 0, 1 , 2, 3, 4, 5, 6 or 
7 in them (see Table 2). 

Then we add these numbers 
to our decimal-binary chart and 
we can again perform simple ad- 
dition and subtraction problems 
using the above techniques. 



Introducing hexadecimal num- 
bers is more confusing to the 
students because they aren't 
used to seeing the characters A, 
B, C, D, E and F used as num- 
bers. However, by adding these 
numbers to the chart, we can 
again perform simple addition 
and subtraction problems. Our 
chart now looks like Table 3. 

The chart is useful for adding 
or subtracting small numbers in 
the numbering systems de- 
scribed. However, it does have 
its limitations. To be specific, 
it's no good for numbers above 
decimal 40 without some addi- 
tional knowledge. 

To add or subtract In any 
numbering system, you must 
first understand how to add in 
the decimal numbering system. 
Let's look at an example using 
decimal numbers: 

■f732 

To add these numbers we add 
each row individually: 9 -f 2 = 11, 
so you bring down a 1 and carry 
a1.6■^3 = 9plusthe1 that was 
carried is 10, so we bring down 
the and carry the 1. 8 -(-7 = 15 
plus the 1 we carried is 16, Thus, 
our final answer Is 1601. 

The same basic rules are true 
in almost any numbering sys- 
tem. The only thing that changes 
is when you have to carry a num- 
ber, and what follows a number 
in that numbering system. 

To illustrate this, let's look at 
another example; but this time 
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MOD-II HARD DISKS 

AVAILABLE NOW 

WHY WAIT FOR RADIO SHACK 

Micro Mainframe now supports the Model-II' Computer system with our high quality add on 
Winchester disk systems. Each of the disk systems available offers the same high quality Error 
Correcting controllers used in <xir Model-I* and Model-Ill* systems. 

Features 

• 5 Megabyte to 120 Megabyte systems supported (formatted capacity), with total system 
capacities from 10 Megabytes to 480 Megabytes. 

• Oasis* (derating system available (Model-II* only) 

• TRSDOS* compatible operating systems available (all models) 

• Model-I* and Model-Ill* unit prices include operating system. 

• Error Correction on all controllers for years of trouble free operation (up to four bit burst). 

• Simple interface to the host computer through one of our host adapters. 

• Models available soon for Apple* and other computer systems. 

• Support for more Winchester systems than any other manufacturer. 

System Pricing 
Removable Cartridge Winchesters 
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120 Megabyte Fixed Hard-disk systems begin at $7995.00 

Model-Iir Floppy Controller w /installation kit $279.95 

Why become locked into a prc^rietary system from one manufacturer, when Micro Mainframe 
supports a total of 15 drive manufacturers. When a new drive becomes available, you need only to 
purchase that drive and controller to upgrade your system. The software and Host Adapter works 
with the new drive package, thus allowing minimum upgrade cost. 
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714 Alhambra Blvd. • Sacramento, Ca 95816 
(916)447-7048 
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* Models I, II. Ai (11 are Tandy Iradematks. 
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let's look at one In the hexadeci- 
mal numbering system. 



Once again we perlorm our 
operations column by column. 
The first thing we have to do Is 
add A and 4. The way my stu- 
dents were told to do this Is to 
look at their charts. We find that 
a hexadecimal A Is the same as 
a decimal 10 and a hexadecimal 
4 Is the same as a decimal 4. 
Since 10 + 4 in decimal Is 14, we 
now took at our chart and see 
what a decimal 14 is In hexadec- 
imal. We discover that the an- 
swer Is E. We have no numt>er to 
carry this time since E Is a sin- 
gle-digit answer. 

Next, we must add A + C. We 
find that hex A equals decimal 
10 and hex C equals decimal 12. 
Adding 10 and 12 gives ua 22 
which Is equivalent to hexadeci- 
mal 16. Thus, we bring down the 
Sand carry the 1. 

Finally, we add 6 and 3 plus 
the 1 we carried. This Is the point 
where many students get 
screwed up. They forget the 
numbering system that they're 
working in. Many students In- 
correctly give the answer as 10. 
What they have forgotten Is that 
they are working In hexadecimal 
and 6-f 3-f1 is not 10 In hexa- 
decimal. The number which fol- 
lows 9 In hexadecimal Is A. 
Thus, the answer to our prob- 



lem Is A6E. 

Now I'm sure that these tech- 
niques are causing many mathe- 
maticians to turn over In their 
graves because I haven't ex- 
plained the numbering systems 
using the powers of the various 
bases or the Remainder Theo- 
rem. However, I am a strong be- 
liever In logical deduction and 1 
wouk] much rather have my stu- 
dents discover these formulas 
for themselves. 

One thing that I haven't dis- 
cussed up to this point Is the an- 
swer to the question: "Why do 



we have to learn this Junk?" and 
"What does the computer do 
with all this stuff?" As I men- 
tioned earlier, most computers 
are binary machines, and that's 
why we must learn something 
atXMjt binary. 

To explain why we must leam 
about hex and octal I usually 
bring In a dump. A dump Is the 
result of a sick program or com- 
puter system. When a large sys- 
tem can't figure out what the 
heck your program Is trying to 
do. It spits It out as a dump. An 
IBM system prints out Its dumps 
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Table 1. Decimal Numbers 
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Table 2. 


Octal Numbers 





In hexadecimal. A Honeywell 
system prints out Us dumps In 
octal. The reason they don't print 
out their dumps In binary (which 
Is what both computers are us- 
ing) Is that hex and octal use 
much less paper. When the com- 
puter gives up trying to execute 
a sick program, the first thing it 
does Is convert all those little bi- 
nary numbers Into hex or octal. 

To illustrate how the comput- 
er converts binary to octal and 
binary to hexadecimal, I use an 
example. Pick a binary number 
such as 100001 and spilt It up 
Into groups of four starting from 
the right so that we have groups 
of binary numbers. In this exam- 
ple we gel the numbers 10 and 
0001. Now we take these individ- 
ual numbers and look for them 
In the binary section of our 
chart. Then we look up the hexa- 
decimal equivalents of these 
numbers. Thus, binary 10 Is 
equivalent to hex 2 and binary 
0001 Is equivalent to hex 1. 
(Leading zeros are always 
dropped). Sure enough, if we 
look up hexadecimal 21 on our 
chart we find that it equals bina- 
ry 100001. 

A similar method converts a 
binary number to an octal num- 
ber. Look at example 100001 
again. This time split the origi- 
nal binary number into groups 
of three. So, the numlMrs we 
get are 100 and 001. If we look 
these numt}ers up In our table 
we find that a binary IX is equal 
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ForMiMM Ranet win get tfte next adveatire FREE. 

fhfotigrC«sctte Port 



ower Cue 
en 

ISh WMtTJfdTenfiri #12" 



v^48[K>Dlsk Model I & 

^^^^^Dealers iKqulrles iivlted 

1457 ForHRI 80 702-562-3609 

Faitastlc Software . 

5110 Polaris #3 ^^ 

las Utgas, Nevada 89102 'tr 
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Program conlirtuvtJ 



202 REI1 
204 REM 
206 REfl 



Z ORIGINAL TOTAL fJUHBEB OF PAYMENTS. 



220 
240 

242 

244 

245 
246 
247 
248 
249 
250 
260 
262 
2B0 
2B2 
3B0 

302 
320 

322 
338 

334 

336 
340 

350 

380 
390 
400 

41B 

420 
430 

440 

445 
450 
460 
470 
472 
4B0 
490 
492 
50B 

510 
520 
530 
540 
550 
560 
570 
5Bfl 
590 



PROGRAM WILL :" 

1. DETERMINE PAYMENTS FOR A LONG TERM 



2. 



CL5 
PRINT "THIS 
PRINT " 

LOAN" 
PRINT ■ 
PRINT ■ 
PRINT ■ 
PRINT ■ 
G05UB 4000 
CLS 
PRINT 

INPUT "WHAT IS THE AMOUNT BORROWED (S)';A 
IF A-fl THEN GOTO 260 



IF" 



DETERMINE HOW MUCH YOU WILL SAVE 
YOU PAY EXTRA" 
3. CONSIDER THE IMPACT OF INFLATION ON" 
BOTH TYPES OF PAYMENTS." 



INTEREST CHARGED. ■:! 
280 

INTERVAL BETWEEN PAYMENTS 



INPUT " 

IF 1-0 THEN GOTO 

INPUT ■ INTERVAL BETWEEN PAYMENTS (MONTH 

S)"!P 
IF P=0 THEN GOTO 300 

INPUT ■ TERM OF LOAN (YEARS) ";Y 

IF Y-0 THEN GOTO 320 
INPUT ■ EXTRA PAID PER MONTH (OPTION 

AL) ";MP 
INPUT " ESTIMATED YEARLY INFLATION RAT 

E "jIR 
EP"HP 
PRINT 
INPUT "DO YOU VJISH TO SEE THE TOTALS ONLY - INSTEAD 

OF THE ENTIRE TABLE - (1-YES, 0-IK)) " fTB 
PRINT 

IF T0 > THEN GOTO 450 
PRINT " OUTSTANDING" 

PRINT " PRINCIPAL AT 

PRINCIPAL" 
PRINT ■ END 

REPAID AT" 
PRINT "PERIOD OF PERIOD 

EtlD OF PER" 
PRINT 

'INITIAL VALUES' 
3={Y*12)/P 
K-(I*(P/12))/100 
E-A*K/(1-1/(1+K) [Z) 
E-INT(E*IOO ».5)/10fl 
DO-1 

HI-IR/12/100 
DEFDBL P,L 

PL(I)-A; PLC3)-A: PL(3)=A: PL{4)-A 
AP(l)-E:AFt21-E:AP{3)=E+HP:AP(4)-E+HP 
TP(l)-e:TPl2)-O:TP(3).fl!TP(4)-0 



INTEREST 



AT END OF PER 



T1(1)»0 : TI (2)- 

FOH CO = 1 TO Z 

IF IIP = THEN 

IF PL(3)<;- 

FOR X-1 TO Q 

GOSUB 1000 
NEXT X 



TI(3)=0 : TI{41-0 



0-2 ELSE Q- 
THEN Q=2 



600 

601 
602 
6B4 
610 
G20 
630 
640 
644 
648 
652 
656 
660 
664 

684 
686 
688 
696 

700 
704 
70B 

712 
716 
720 
722 
724 

728 
732 
736 
740 
744 
748 
752 
7 56 
760 
764 
768 
772 
776 
780 
784 
788 
792 
796 
800 
802 
804 
SOB 
812 
816 
BIB 
020 
824 
S28 
832 
84B 
842 



X-3 



THE FOLLOWING STATEMENTS WRITE 
SUMMARY REPORTS. 



THE 



IF HP-B THEN X-1 ELSE 
IP SW>1 THEN GOTO 630 

IF LP(X)"0 THEN SM-1 

IF T0>0 THEH GOTO 630 

GOSUB 2000 

GOSUB 3000 

DO- DO - DO* HI 
NEXT CO 

REM •*•••• ..**.*.*i 

REM • 

REM 

REM 

REM 

REM •••*•••••••••••••••••••*••••*••*•••***••••••••• 

GOSUB 4000 

GOSUB 5000 

CLS 

PRINT "IF YOU MADE ONLY THE REQUIRED MONTHLY PAYMEN 

T OF ' 
PRINT '$'E 

PRINT "THEN YOUR TOTAL INTEREST PAYMENT WAS ' 
PRINT "S"TI(11" AND THE TOTAL PRINTCIPAL REPAID W 

AS ■ 
PRINT "S'A" THUS THE TOTAL AMOUNT PAID HAS S'TPd) 
PRINT 
GOSUB 4000 

IF IR-D THEN GOTO 740 
PRINT "nUF TO THE "TR'* YKARLY INFLATION RATE THE T 

OTAL ■ 
PRINT 'AMOUNT ("TP(1)") IS ACTUALLY WORTH S"TP12) 
PRINT "OF TODAYS DOLLARS." 
GOSUB 4000 

IF HP-0 THEN GOTO 816 

PRINT "BY PAYING S"E+HP"INSTEAD OF S"E" PER MONTH" 
PRINT "YOU PAID S'TPO)" INSTEAD OF S'TP(l) 
AY-B(3]/12 
IY-INT{ B(3)/I2) 
IP AY-IY THEN GOTO 772 
M-IHT((AY-IY)*12] 
AY-IY 
PRINT 
GOSUB 40 00 

PRINT "THE LOAN WILL BE REPAID" 
PRINT "IN "AY" YEARS AND "M"MC«)THS" 
PRINT "INSTEAD OF "Y" YEARS" 
PRINT "BY PAYING S"E*MP" PER MONTH" 
PRINT "INSTEAD OF "E" PER MONTH." 
GOSUB 4000 

IF IR«0 THEH GOTO 832 

PRINT "HOWEVER WITH THE ■IR"% YEARLY" 
PRINT "INFLATION BATE 5"TP(3)' IS NORTH" 
PRINT "S"TP(4)" IN TODAYS DOLLARS." 
PRINT 

IF IR-B AND HP-0 THEN GOTO 832 
PRINT "0K7 WELL, LET'S SUM THIS OP." 
PRINT 
GOSUB 4000 
CLS 

PRINT ■ ";TAB(2i);"HEQUIREI>-WITH EXTRA" 
IF HP-0 THEN EX-0 ELSE EX-E-fKP 

Pmgrmm oantinuma 



C. C. WRITER 
TR8-B0* 
Color Computsr 
WORD PROCESSING 



l3nSBSE==Zt»8»rSX»3Z8B 



USER NODIFIABLE EX. BASIC H/PAK 
F0RMTTIN6, NOVE, TABS, DELETION 
INSERTION, GLOBAL SEARCH \ EOIT 
CENTERING, INDENTING, PAGE PAUSE 
ASCII COSES, JUSTIFY, 32K OPTION 
THIS AD PREPARED MITH C.C.WITER 
tTRS-BO is 1 TH of Tindy Corp. 
SMd ISO ChKk or Honfy Ordtr to 

■aiBBi ■■■■»« una UBB«««««sras ssi 

C.C. WRITER .414 

TRANSFOfiHATION TECKNOLOeiES 

194 LKXHOOD LANE 

BL00HIN6DALE, IL 6010G 



TRS-80 

COMPUTER 
DISCOUNTS 



• Factory Direct 

• Best Prices Anywhere 

• No Out-of-state Taxes 

• Full Radio Shack Warranty 

• Free Price List 

SCOTT TASSO 

Owner 
Radio Shack Associate Store #7053 

175 N. Delsea Drive ^4io 
Vinetand, NJ. 08360 
(609)691-7100 




a 

UJ 



is 



SHARE YOUR 
IDEAS! 

Wayne Green Books 
announoea 

aubmiasion of 

new 
manuaeripta 

the FaU Book LUt. 
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Program canUnuad 



844 
846 
848 

85 B 
852 

B56 
860 

864 
866 
SGB 

870 
872 
876 

880 
884 
990 
992 



PRINT "BOHTHLY PAYHEHT 
IF HP«B THEM TP(3)-a 
PRIKT "TOTAL PAYMENT 

) 
IP IR-cO THEI; GOTO 660 
PRINT "VALUE OF TOTALS 



S"E;TAB(29); VS"EX 
S'TPll) J TAB (29) r/S"TP(3 

S"TP{2) [TAB (29) t "/S'TP(4 



) 

PRINT '[IN TODAYS DOLLARS)" 
PRINT "LOAN REPAID IN " f TAB ( 21 ) ; Y jTAB t 24) ; "YEARS/ " 

AY;TAB(34) i "VRS"M;TAB(39) ; "HO" 
PRINT 

IF MP-e THEN GOTO 990 
PRINT "AMOUNT SAVED OR LOST S'IHT( (TP{1)-TP(3) ) 

•100 + .5)/lfl0 
IF IR-0 THEN GOTO 880 
PRINT "ACTUAL AMOUNT SAVED" 
PRINT "OR LOST("IR"» INFLATION) S"INTt {TP( 2) -TP(4) 1 

*100+.5]/lBB 
PRINT "NOTE: NEGATIVE VALUES MEAN YOU WILL BE" 
PRINT " PAYING ADDITIOHAL MONEY." 
END 
KB, ••••***••••*•*....•.*•.■*.*.*.....••••«..*«.**. 

• •«• 



THE FOLLOWING ROUTIlffi DETERMINHES THE 

ACTUAL INTEREST (AI), TOTAL INTEREST (TI 

ACTUAL PAYMENT {API, TOTAL PAYMENT (TP) 
AND DETERMINES IF WE HAVE THE LAST 
PAYMENT (LP) FOR ALL VALUES OF X. 



993 RBI 

994 REM 

) 

995 REM 

996 REM 

997 REM 

998 REM 

***** 

10S0 AI(X]-X*PL{X) 

1001 AP(X] • E 

1002 IF X>2 THEN AP(X)-G+nP 
1006 LP{X)-PL(X) 

1008 IP LP(X)-B THEN GOTO 1B7B 

1809 IF PL(X)<AP[X) THEN AP(X)-AI(X) :GOSUB 6000:00^ 

020 
1010 PL{X)- PL(X) - (AP(X) - AUX)) 
1012 IF PL(X)<«fl OR CO=Z THEM f.oSUB 6nCfl 
1028 IF X/2 <> INTlX/2) THEN GOTO 1050 
1030 AI(X) » AI [X] * DO 
1040 AP(X) - AP(X) * DO 
1050 TP(X) ■ TP(X) ♦ AP{X) 
1060 TI(X) - T1{X) * AI(X) 
107 REM 
1880 RETURN 
1090 REM ***•*•*•*•*•••*••••••••••**•*****•****•*•**«* 



THE FOLLOWING ROUTINE ROUNDS THE 

PRINCIPAL LEFT (PL) .ACTUAL INTEREST THI 



1092 


REM 


1094 


REM 


1096 


REM 




S 


1098 


REM 


2000 


RFJf 


2002 


REM 


2004 


REM 



PERIOD (AI),AND THE PRINCIPAL PAID 
THIS PERIOD (TO) TO 2 DECIMAL PLACES. 



2010 AI[X} ' INT( AI(X) • 100 * .5)/10O 

2020 TP - 1NT( ( AP(X) - AI(X) ) • 100 + .5 )/100 

2030 RETURN 



2800 REM 

* 

2810 REM 
2820 REM 
2S3B REM 
2B48 REM 
2S5B REM 
2B6B REM 
2B7B REM 
2SB0 REM 



THE FOLLOHING ROUTINE PRINTS THE VALUES 
FOR THE CURRENT PERIOD (CO), THE 
PRINCIPAL LEFT (PL) AND 
THE INTEREST THIS PERIOD (AI) AND 
THE PRINCIPAL PAID THIS PERIOD (TP) 



3000 REtAARK 

3011* PRINT COfTAB(ll);IHT( PL(X)*10O + . 5) /I »a|TAB{ 29 ) I 

AI (X) ;TAB(4B);TP 
3090 RETURN 



39D0 


REM •• 




391B 


REM • 




3920 


REM • THE FOLLOWING ROUTINE ALLOWS THE USER 


3910 


REM * 


TO KEEP A SCREEN UNTIL HE OR SHE 


3949 


REll • 


IS READY TO CHANGE IT. 


395B 
3969 


REM • 








4BB0 


REM 




4010 


PRINT 


"PRESS ANY KEY TO CONTINUE." 


4020 


AS- INKEYSs IF AS-"" THEN GOTO 4020 


4022 


PRINT 




4030 


RETURN 




4900 


REM •* 




4910 


HEM • 




4920 


REM * 


THE FOLLOWING ROUTINE ROUNDS 


4930 


REM • 


AI,TI,TP AND E FOR ALL VALUES OF X, 


494B 
4950 


REM * 








5000 


REM 




5010 


FOR X- 


1 TO 4 


5B20 


AI(X)-INT( AI(X)*100 +.5]/100 


5030 


T1(X)-INT( THX)*100 + .5)/100 


5040 


TP(X)-INT( TP(X)*100 + .5)/lBB 


5042 


E=INT(E*10a +.5)/lBB 


5050 


NEXT X 




5060 
5900 


RETURN 










** 




591B 


REM • 




5920 


REM • 


THE FOLLOWING ROUTINE DETERMINES 


5930 


REM * 


THE PINAL VALUES OF AP , LP 


594Q 


REM * 


AND LP. IT ALSO SETS THE 


5950 


REM * 


ENDING PERIOD (B) TO THE CURRENT 


5969 


REM * 


VALUE OF THE PERIOD (CO) FOR 


5970 


REM • 


FOR ALL VALUES OF X. 


598B 


REtl • 




5990 


REM •• 





6000 REM 

6BD2 IF PL(X)>B THEN GOTO 6050 

6010 AP{X)-PL(X)-AI(X) 

6040 GOTO 6060 

605B AP(X)-AP(X)'fPL(X) 

6060 PL(X)=B 

6062 B|X)-CO 

6070 LP(X)-0 

6100 RETURN 



CHURCH [X5NATIONS 
TRS-80 MODELS I & II 

Manages, stores ar>d reports on the 
offerings made by a church congrega- 
tion. 

Model I handles up to 1000 members 
and 4 categories of offerings. Operates 
under TRSOOS 2.3 or Newdos. S 1 25.00. 

Model II handles up to 3000 members 
and 1 5 categories of offerings. Includes 
Mailing list and operates under TRSDOS 
2.0. $175.00. 

CUSTOM DATA 

P.O. Box 1 066 

Alamogordo, NM88310 

Phone (505) 434- 1 096 

^412 



M 



NEW! 

The Wizard's City' 



8K 



*. 



A FANTASY ADVENTURE GAME 

Search for gold as a Fighter, Dwarf, Elf, 
HaHHng or Magic-User in the dungeons 
beneath the Wizard'sCtty or surrourKting 
forest EvH monsters lurk everywhere to 
protect the gold. All in graphics! 
Cassette $12.95 Disk S1G.95 

Financial Statement 16K $14.95 

Income Tax 8K 19.95 

Income/ Deductions Fite 8K 10.95 

Stock Charting 8K 15.95 

Mai List LaMer 32K disk onty 22.95 

Add $4 for disk except MaR List 

Add S1.S0 ih^pktgA handkig 

All programs for TRS-80 Mod. 1 Lev. 2 

BAP$ Software 

6221 Richmond, Suite 220 

HotJSton, Texas 77057 

713/783-3433 

TRS-K> I* • rag. tradamwH ol Ma TMdv Corp. 



FLOPPY DISK DRIVES 

'275 

Famous make 40 Track drives, in grey 
textured enclosure with power supply. 
Fully tested and guaranteed. 

ADD $20 FOR "FLIPPY." 

80 TRACK "FLIPPY" $395 

40/40 DOUBLE SIDED $395 

EPSON PRINTERS $CALL 

C. ITOH PRINTERS $CALL 

CORSAIR COMPUTER CORP. 
7952 Highway 80 West 
Fort Worth, TX 76116 
817-244-8051 ^36 
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to an octal 4 and a binary 1 is 
equivalent to an octal 1. If we 
look up an octal 41 in our table 
we find miraculously that It is 
equivalent to a binary 100001. 

This method will always work 
so that if we have a binary num- 
ber such as 110001101 which is 
too large for our table we can 
still convert it to octal or hex. 
The numbers 1, 1000, 1101 are 
equivalent to 1, 8, D in hex, so 
binary 110001101 equals 18D in 
hex. The numbers 110, 001, 101 
are equivalent to 5. 1, 3 In octal, 
so binary 1 10001 101 is equal to 
513 in octal. 

For those of you who would 
like to know why this works, we 
have to explain a little bit about 
the three numbering systems. 
First of all binary is a two-digit 
numbering system (0,1) which 
means that every binary number 
is actually some power of 2. Oc- 
tal Is an eight-digit numbering 
system (0-7) so every octal num- 
ber is a multiple of a power of 
eight, and hexadecimal is a 
1&<ligit numbering system (0-F) 
which means that every hexa- 
decimal number Is related to a 
power of 16. Now, if we think 
about these statements, we re- 
member that 8 is a power of 2 
and so is 16. (2 raised to the third 
power is 6 and 2 raised to fourth 
power is 16.) Although this 
doesn't entirely explain why the 
above technique works, I think 
some of the mathematicians out 
there are turning back around. 



The program that I have in- 
cluded at the end of this article 
is one I call Mortgage Program 
Plus. The main body of it is virtu- 
ally the same as many other 
mortgage programs. It involves 
no graphics nor does It use 
any unusual Basic capabilities. I 
use it with those students who 
feel that learning about comput- 
ers has to Involve a lot of pain, 
agony and number crunching, it 
uses a whole slew of variables. 
The uses of these variables are 
all explained within the program. 

The difference between this 
program and most mortgage 
programs is that It takes the in- 
flation rate Into account. I 
strongly urge those of you who 
have loans and are considering 
paying them off early or those of 
you who are paying a little bit 
more than the required payment 
towards your mortgage to run 
this program first. By paying a 
little bit more than the required 
payment you will pay off your 
loan quicker. However, you may 
be losing money because of the 
inflation rate. 

As you might have already 
guessed, this program has noth- 
ing to do with numbering sys- 
tems. However, numbering sys- 
tems are an intricate part of all 
programming activities. For 
those involved with assembler 
programming and those of you 
who will be required to Interpret 
dumps, I hope that this article 
will be useful. 



For those who are mathemati- 
cians I think that you will have a 
good time dissecting the mort- 
gage program. For those who 
are teaching data processing, I 



hope I have provided some tech- 
niques that you will find useful 
in your classes. If you are data 
processing students. . .good 
luckiH 



DccbfMl 


B4naiy 


HsxadacliTMl 


Octal 







1 

10 




1 




1 


1 

2 


2 


2 


3 


11 


3 


3 


4 


IX 


4 


4 


5 


101 


5 


5 


6 


no 


6 


6 


7 


111 


7 


7 


8 


1000 


B 


10 


9 


1001 


9 


11 


10 


1010 


A 


12 


11 


1011 


B 


13 


12 


1100 


c 


14 


13 


1101 


D 


15 


14 


1110 


E 


16 


15 


1111 


F 


17 


16 


10000 


10 


20 


17 


10001 


11 


21 


18 


lOOtO 


12 


22 


IS 


100U 


13 


23 


20 


10100 


14 


24 


21 


10101 


15 


25 


22 


10110 


16 


26 


23 


10111 


17 


27 


24 


11000 


18 


30 


25 


11001 


19 


31 


29 


11010 


1A 


32 


27 


11011 


IB 


33 


28 


tnoo 


10 


34 


29 


11101 


ID 


35 


30 


11110 


IE 


36 


31 


mil 


IF 


37 


32 


100000 


20 


40 


33 


KXKVIl 


21 


41 


34 


100O10 


22 


42 


35 


100011 


23 


43 


36 


100100 


24 


44 


37 


100101 


25 


45 


38 


100110 


26 


46 


39 


IDOtll 


27 


47 


40 


101O0O 


28 


50 


Table 3. Chart of Decimal, 


Binary. HexadBCimal and Octal \ 


Numbers 









TRS-80* COLOR Computer 

BORED 

with SLOW Cassettes 

Put your BASIC program into 
a ROM CARTRIDGE. Instant 
run at power-up! More data 
space! IT'S EASY! Send us your 
program on cassette and we'll 
quickly return it in a ROM 
CARTRIDGE. 

Prices start at $45.00 
(Quantity Discounts Available) 



Syst 



-510 



ems P- O. Box 10234 

Austin, Texas 78766 
1512) 837-4665 

—Assembly Language Rom Cartridges 
— Custom Programming Services 
TRS'-BO is a trademark of Tandy Corp. 



MODEL III 
TREASURE HUNT 

FIND THESE: 

Relocating macro assembler, linking 
loader, symt)olic debugger, text editor, 
print spooler, interactive editor/assem- 
bler, disk-disassembler, command 
processor, disk exam/modify, disk 
utilities 

ALL FOR $99.00 

PDS -"•" 

ALLEN ASHLEY 

395 SIERRA MADRE VILLA 

PASADENA, CA 91 107 

(213) 793-5748 

Also: Cross assembleis for 6046, Z-8, 1802, 3870, 
S-2000, COP-400 - $75.00 each. Call for details. 




COLOR GAME 

LIMITED OFFER I 



WE LI SIN a 'WJ OUB B01U5 &*«[ Qf Ini HON IV 
WH(N YOv, SEXO US » Sfl' JloDMSStD SliUPED 
(•mElOPf (0(t OUB FB([ COlOfl DROCKAU llSI 



16K|?l?:oioH1-RESOLUTION GAMES" 

STARBASE ATTACK "^'^ 

imt S 12.95 






lltiH SPIED AUCtW ClUI 



KQSmC KftniKftZE 18.95 

joysTicKS RFO'D '^%;,„: v .^ ' 

CCnilfllDCHECKS OB UOHEI OKQEBS ONL' 

ilUscrated rne'-rart, t-inr-ks 

P.O.BOX 289 

WIILIAMSTOWN. MA. 01267-0289 
EXPIRES 12-15-81 "CASSeTTE 
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Spelling Errors? Does yourTRS-80* wordprocessor need help? 




T M. 



CAN SPELL rendezvous AND mnemonic AND OVER 38,000 OTHER WORDS 

Now let TRS-80and Proofreader by Aspen Software Company check your Scripsit*, Electric Pencil, or other 
documents tor spelling and typographical errors. It has all the features needed to meet your proofreading requirements. 



Checks every single word of even your biggest 

document in under 5 minutes. 
The 38,000 word dictionary is one of the 

largest available. 
Dictionary can be easily extended to add more 

words such as technical terms or names. 



• AM unknown words are listed on the screen and 

can be saved on a file for printing. 

• Works with almost any TRS-80 wordprocessor 

including Scripsit and Electric Pencil. 

• Comes with complete and easy to understand 

User's Manual. 



• Proof-Edit'", optional interactive corrections feature for Model I /III 

GRAMMATik" 



BEYOND SPELLING CHECKING 



A spelling checker may not be enough! This paragraph 
contains a number of common errors (indicated by 
underlining] that will be discovered by Grammatik that 
would seldom ever be caught by a spelling checker. 
FOr example, Grammatik checks for improper word 
usage as identified by a number of writing style man- 
uals (such as "^eldom ever). Grammatik will check for 
the presence of certain words such as jargon or sexist 
terms, jt also checks for consistant punctuation, cap- 



iializAtion. balanced quotation marks and parentheses. 
and and repeated words. In addition, il will produce a 
list of all unique words found in your document with the 
number of limes each was used. Grammatik comes 
w ilh a dictionary of commonly misused phrases and a 
dictionary of sexist terms. It also includes a complete 
set of utilities to build., son. and merge phrase and 
jjrgon dictionaries of your own. Works with Scripsit, 
Electric Pencil, and other standard TRSDOS text files. 



MODEL! Requires J2K RAM. I disk drive. TRSDOS or NEWIX)S. 
MODFl II RequiresMK RAM, 1 disk drive. TRSDOS 2 

dan thetk 1 .2 files usin« XKKRiYS) 

MODKL [II Requires J2K RAM, I disk drive. TRSDOS 

Manual onK, specjlv rtuxlcl (refundable) 



Prootraadai 
»S4,00 

$109,00 

$64,00 

$3,00 



Proof-Edit 
$30.00 

N/A 

$30.00 

$5.00 



Grammatik 
$49 00 

$99.00 

$59,00 

$500 



Aspen Software programs are professional quality 
software tools developed for the TRS-80 by a Ph.D. in 
Computer Science. Other tools include: 



— SOFT-SCREEN ' " . a powerful, state of the art full 
screen text editor. Over a year in development, Soft- 
Screen is compatible with all TRS-80 programming 
languages, including BASIC, FORTRAN, MACRO. 
Ratfor. and COBOL. Easy to use, comes with tutorial 
and full documentation. 



— RATFOR. a structured language preprocessor 
for Fortran developed at Bell Labs. Aspen Software 
Ratfor provides a number of extensions, including 



'case' and "string". Includes complete manual with 
:ill the information needed to learn and write Ratfor 
programs. Requires FORTRAN. 

— PP-RATFOR. a pretty printer for use with Aspen 
Software Ratfor. Automatically formats and indents 
Ratfor source programs. 

PP- Ratfor Both Soft-ScrMn 

$30.00 S74.00 $69.t» 

$49.00 $139.00 SM.OO 

$34.00 $84.00 $75.00 

$13.00 $15.00 



Ratfor 
MODEL! $49.00 

MODEL II $99.00 

MODEL III $59.00 

Manual onlylrefundablal 



MODKI I. Illri'4uiri-48K. 2 drives. TRSDOS 
MODHL II ri-4uires64K, 1 druc, TRSDOS 2 
P\tnr call or wntf for dcliils about out nordproceisof . 



»T.M. 




Formerly 
SOFT-TOOLS 



ASPEN SOFTWARE 



Orders sent postoaid by first class mail. 

Terms: Cash, check, money order, VISA, or 

Master Card. NM residents add 4% tax. 

When ordering, specify modek memory size, 

number of drives, and operating system. DMl«r inquiries invited 

Trademark of Tandy Corporation Proofreader. Grammatik, and Soft-Screen are trademarks of Aspen Software. 



P.O. Box 339 
□apt. M 

Tiiaraa.NM 87059 
(505) 281-1634 



^See List of Advertisers on page 402 
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Aerocomp's 

Proven 

Best-By Test! 

The 

II 



• i 




,,^'" 






Double Density Controller 

• Technical superiority 




X 



: v'.» 



oo^" 



At last! A double density controller for Model i with higher probability OF DATA RECOVERY THAN with any other 
DOUBLE DENSITY CONTROLLER ON THE MARKET TODAY! The "DDC from Aerocomp. No need to worry about the pro- 
blems that keep cropping up on existing products. AEROCOMP S new analog design phase lock loop data separator 
has a wider capture window than the digital types currently on the market. This allows high resolution data center- 
ing. The finest resolution available with digital circuitry is 125 ns (nano seconds). The DDC" analog circuit allows in- 
finately variable tuning. Attack and settling times are optimum for 5-1 1 A inch diskettes. 
The units presently on the market use a write precompensatlon circuit that is very sioppy". Board to board 
tolerance is extremely wide ■ in the order of + 100 ns. The DDC is accurate to within + 20 ns. 
The bottom line is state of the art renabillty! 

• Test Proven 

Tests were conducted on AEROCOMP'S "DDC", Percom's "Doubler A"* and 'Doubler ii ' and lnws LNDoubter*' using 
a Radio Shack TRS80' * * Model I. Level 2, 48 K with TRS80 Expansion interface and a Percom TFDIOO ' disk drive 
(Siemens Model 82). Diskette was Memorex 3401. The test diskette chosen was a well used piece of media to deter- 
mine performance under adverse conditions. The various double density adapters were installed sequentially In the 
expansion interface. 

The test consisted of formatting 40 tracks on the diskette and writing a 6DB6 data pattern on all tracks. The 6DB6 
pattern was chosen because it ts recommended as a "worst case" test by manufacturers of drives and diskettes. An 
attempt was then made to read each sertor on the disk once - no retrys. Operating system was Newdos/80, version 
1 with Double zap, version 2.0. Unreadable sectors were totalled and recorded. The test was run ten times with 
each double density controller and the data averaged. Test results are shown in the table. 



• Features 

TRS80 Model I owners who are ready for reliable double 
density operation will get (1) 80% more storage per 
diskette, (21 single and double density data separation 
with far fewer disk I/O errors, (3) single density com- 
patibility and (4) simple plug-in installation, compatible 
with all existing double density software. 

• Value 

$149.95 for the BEST double density 
controller on the market. 

S189.95 for DDC complete with DOSPLUS 3.3D 
S239.95 for DDC complete with ldoS 



• TEST RESULTS • 



MFR & PRODUa 


SECTORS LOCKED OUTtAvo 


AEROCOMP "DDC" 





PERCOM "DOUBLER II" 


18 


PERCOM ■DOUBLER A" 


250 


LNW "LNDOUBLER" 


202 



Note: test results avaliaDle upon written request. All tests conducted prior to 8-2S-81 

Aerocomps 14 tJav money back guarantee applies to narflware onfv 

Specials will be prorateo. Snipping S2 00 In Com. us See opposite page for details. 



THE FIRST PRODUCTION RUN WILL GO FAST - ORDER TODAYI 



Data Separators 

The advances that make the ■DDf great are incorporated in the new aerocomp Single Density Data Separator CSDS"} 
and Double Density Data separator ( "DDS"). 



• Has your original manufac- 
turer left YOU holding the bag? 

If YOU already own a Percom "Doubler A", "Ooubler li " or lnw 
"LNDoubier', the aerocomp "DDS win make it right. Look at the test 
results: 



MFR. & PRODUCT 


SEaORS LOCKED OUT 


WITHOUT "DDS" 


WITH "DDS" 


PERCOM "DOUBLER 11" 


18 


1 


PERCOM - DOUBLER A ' 


250 





LNW "LNDOUBLER" 


202 






Note: Same test procedures as "ddc'. 

* Trademark of Percom Data Co. 

* * Trademark of LNW 

* * ' Trademark of Tandy corporation 



• "DDS" $49.95 

(Use 1 791 chip from your DO Con- 
troller) 

'A' DDS with disk controller 

chip Included 579.95 

• Disk controller 

chip $34.95 

(Shipping $2.00 Com. liS - see opposite 
page for detalbl 



Plugs directly Into your existing 
Double Density controller. 



DO you need a 
single Density Data 
separator? 

The Internal dau separator In the 
WD1771 chip (R/s Ewansion interfacel 
Is NOT recommended bv WD for 
rehaDle data transfer Do vou have any 
of these protiiems: Lost data, tracks 
locked out. CRC errors, dtsk retry? YOU 
NEED ONE! 

• "SDS" $29.95 

(For Mod. I: shipping $2.00) 

See opposite 
page^^^^^i 



282 * 80 Microcomputing, November 1981 




TRS 80* 



DISK DRIVES 

40 & 80 TRACK 



as low as 



S 299.9S 



NEW LOW PRICES 

Thanks Co you our sales volume has 
allowed us to cut costs and we're pass- 
ing the savings along We offer the tjest 
disk drive value in the market place. 
Reliability, features and cost tough to 
beat We deliver and we stand behind 
our products AEROCOMP is the only 
manufacturer to offer FREE TRIAL' Buy 
Aerocomp drives tcxJay You deserve the 
best 

BEST FEATURES 

* East 5 ms track-track access time. 

* Operates single or double density. 

* "FLIPPY" feature for lower media cost 
[401 &80-I). 

* Head load solenoid. 

* Disk ejector 

* Easy entry door. 

* NEW EXTERNAL DRIVE CABLE 

CONNECTION, (no longw "wd lo Jpmove ine 
[uvef lo hook up ( juiej 



EPSON 

MX80 

PRINTERS 

$479^ 

TRS80 Cable [I & III) S29.95 

APPLE Cable & Interface. . S96.00 

RSZ32 Interface $69.95 

Ribbon Cartridge. Black. . . SI 3.95 
Print Head (STD) S26.95 

Add S6.00 shipping (Cont U S ) does not 
include cable 

MX80F/T 

All the features of MX80 plus Friction 
Feed Shipping & cables 3% above. 

S 599.00 



AiVi 1 ! CO Iljf \nippiiTy X h.irnlfir.g 



ORDER TOOAYI 

* 4(>Track Drive " S299.95 

* 80-Track Drive S429.95 

* 40-Track ■■FLIPPY'- Drive. . S329.95 

* 80-Track ■'FLIPPY" Drive . . S449.95 

* 40-Track DuaFHead Drive, S449 95 

* 80-Track DuaFHead Drive. S579 95 

■■r,le.[tirwli>rvrt*4r(CXineciJOn WiV^C SCV&OH/ ?*OVAC 
SOW) H/ jvilXie Cf ■fmui arip' 

* 40-Track Bare Drive S269.95 

* 80-Track Bare Drive S399.95 

* 40-Track -'ELIPPY" BafeDriveS299.95 

* 8aTrack '-PLIPPY^' Bare DriveS4l9.95 

• SPECIAL PACKAGES* 

STARTER A S339 95 

40-Track Drive. 2-drive cable. TRSDOS 
2 3 Disk & Manual. Freight & ins 

SRARTER B . S369 95 

40-Track "FLIPPY'^ Dnve, cable, TRSDOS 
2.3 Disk & Manual. Freight & Ins 

COMBO C S465.0O 

40-Track '■FLIPPY" Drive. 2-drive cable, 
LDOS. Freights Ins. 

COMBO D 5585,00 

80-Track "FLIPPY" Drive, 2-dnve cable, 
LDOS' Freight & Ins 

COMBO E S709 00 

Two 40-Track "FLIPPY" Drives, 4-Dnve 
cable, TRSDOS 2.3 Disk & Mannual, 
Freight & Ins. 

COMBO F S999 00 

Two SO-Track "FLIPPY" Drives. 4-dnve 
LDOS . Freight & Ins. 

COMBO G 5909,00 

Two 40-Track DuaFhIead Drives, cable, 
TRSDOS 2 3 Disk & Manual, Freight & 
Ins. 

COMBO H ,, ,51299 00 

Two SaTrack DuaFHead Drives, cable. 
LDOS . Freight & INS. 

DOSPLUS 3 3 Of NEWDOS / 80,2 
available with any package. 

AiJUSi CD pn dlirvF lot Vqftrij & h^nijfcng jCorrl (JSj 

FREE TRIAL OFFER 

Order your AEROCOMP Disk Drive and 
use It with your system for up to 14 
days. If you are not satisfied for ANY 
REASON (except misuse or improper 
handling), return it, packed in the 
original shipping container, for a full re- 
fund, : Spcvui ;«j(,sgei vvii be jxoi<«eO I We have 

complete confiderxe in our products and 
we know you will t>e satisfiedl ORDER 
TODAYII 



WARRArsfTY 

We offer you a 1 20 day unconditional 
warrenty on parts and labor against any 
defect in materials and workmanship In 
the event service, for any reason, 
t>ecomes nescessary. our service depart- 
ment IS fast, friendly and cooperative 

100% TESTED 

AEROCOMP Disk Drives are completely 
assembled at the factory and ready to 
plug in when you receive them Each 
dnve IS 100% bench tested prior to ship- 
ment We even enclose a copy of the 
test checklist, signed by the test lechnh 
03n with every dnve AEROCOMP 
MEANS RELIABILITYll 

ORDER NOWH 

To order by mail, specify Model 
Number(S) of Drive, cable, etc, (atxjve). 
enclose check, money order, VISA or 
MASTERCHARGE card number and ex- 
piration date, or request COD, ship- 
ment. Texas residents add 5% sales tax. 
Add 55.00 per drive for shippings handF 
ing [Cont US). Please allow 2 weeks for 
personal ctiecks to clear our Dank. No 
personal checks will be accepted on 
COD. shipments-cash, money orders or 
certified checks only You will receive a 
card showing tfie exact COD amount 
tiefore your shipment arrives Be sure to 
include your name and shipping address. 
You will be notified of the scheduled 
shipping date Your bank credit card will 
NOT be charged until the day we ship.ll 

DRrVE CABLES 

2-DR(VE S24 95 

4-DRIVE S34 95 

WRITE AEROCOMP TODAY 
FOR MORE VALUES III 



CALL TOLL FREE FOR FAST SERVICE 
(800) 824-7888, OPERATOR 24 

FOt VISA/MAtTi>CHABOE/C.O.D. OROEtS 

California dial (SOO) 8S2 7777. Op«ralor 34 Alotka 
ond Hawaii dial (800) 834 7919. Operator 34 
TOU PMI LINU WILL ACCiPT OSDEU ONIYI 

For Applications and Tvchnicol inlormodon, coll 
(3)4) 337-4346 or drop u% a cord 



t}*olari inqiriai invited 



Ac^cccinp 



Redbird Airport, Bidg. 8 
P.O. Box 24829 
Dallas, TX 75224 



^^387 



AHOCOMP/ii 
APOCO MP/24 



•'Sm List ot AOvertistrs On pagt 402 
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UTILITY 



Tie a few tapes together. 



Merge For Level II 



William J. Dalesandry Jr. 
355 Rockfleld Rd. 
Pittsburgh, PA 15243 



Until now, Merge was only 
available to DOS users, but 
now you can have It on Level II. 
Merge offers an extremely use- 
ful additional command state- 
ment to an already powerful rep- 
ertoire of commands available. 
The program Is also compatible 
with Microsoft's Level III 
cassette Basic. 

Normally when you CLOAD a 
program, It writes over any pro- 
gram already In memory and the 
resident program is lost. This 
new command, used either from 
the keyboard In command mode 
or as a program statement, 



loads two or more Basic pro- 
grams into memory at the same 
time. The second program and 
all subsequent programs wilt 
merge with the root program or 
programs to form one contigu- 
ous program. 

Because the program loads 
into memory at location 28000 
(6D60H) then relocates Itself to 
the bottom of Basic's user RAM 
area, It Is compatible with Level 
IH, Level II and other Basic ex- 
tension programs. This relieves 
the inconvenience of reserving 
space In high memory. It re- 
quires no modification because 
of the size of your system. Basic 
starts at the same place in a 4K 
system as it does in a 46K sys- 
tem and because It requires no 
memory to be reserved, you can 
load it at any time without an- 
swering the question memory 
size? 

Merge is such a useful com- 
mand I cannot understand why 
it wasn't included in Level II or 
Level III. 
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Save Programming Time 

Considerable programming 
time can be saved by keeping a 
cassette tape file of commonly 
used subroutines and merging 
them Into your programs as you 
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need them. 

One subroutine that comple- 
ments Merge is shown in Pro- 
gram Listing 3. It computes and 
displays the length of any pro- 
gram currently in memory. If 
several programs have been 
merged, the display will reflect 
the total length of the compos- 
ite program. Merge the subrou- 
tine Into memory and run or 
GOTO 60000. 

The usual 715562-MEM 
doesn't always yield the same 
number. The numtier displayed 
before running a program is not 
the same as the number dis- 
played after running it. Any pro- 
gram, run either from the key- 
board in command mode or 
through the interpreter, requires 
about 10 bytes of overhead. 
Therefore, I subtracted from 
15562, not the usual 15572 (1 
have a 16K system). 

The subroutine first gets the 
start-of-variabies address, 
which is the last byte of the resi- 
dent Basic program plus two. It 
then subtracts the start-of-Ba- 
slc address, two bytes at the 
end of a program, and its own 
length. The result of this compu- 
tation is then sent to the CRT 
screen and printer. If your 
system does not include a 



printer, delete the LPRINT state- 
ment. 

The Qam« S«a 

You may be drowning in a sea 
of game tapes. Why not merge 
several similar games into one 
program? Just write a short sub- 
routine that asks the player 
which game he or she wants to 
play. Load the subroutine and 
merge alt your similar games on- 
to It. 

Merge can be used the same 
as a CLOAD to load the root pro- 
gram, so you can store this sub- 
routine with your other subrou- 
tines. 

Another useful feature of 
Merge Is that you can add and 
delete data lines quickly without 
entering them by hand. 

Modular Programming 

One use for the routine, possi- 
bly the most valuable, allows 
you to develop programs in 
short modules. The modular ap- 
proach will save time loading 
and saving during the program 
development. 

Modular programming tech- 
niques also allow easier main- 
tenance and smoother program 
flow. Program sections will no 
longer seem to blend Into each 



other. 

How II Woric* 

The assembly language Pro- 
gram Listing 1 was written in 
standard Zilog Z-80 mnemonics 
for a Level II system. It can be 
assembled as shown or poked in 
one byte at a time using T- 
Bug or a similar debug monitor. 
The program is initially located 
in an area of memory that 
doesn't interfere with T-Bug. By 
using the #J 6D60 command, 
you can relocate the program 
below T-Bug, but merging in any 
program over 20 bytes will write 
over a section of T-Bug. 

If you do not have access to 
an assembler or debug monitor, 
you can use the Basic program 
shown In Program Listing 2 to 
load It. The merge and relocate 
routines are contained in deci- 
mal form in the data lines 100 to 
190. Line 10 POKEs the program 
into the proper locations, and 
line 20 deletes the program, 
opening Basic user RAM for our 
use. 

Merge is written in two mod- 
ules. The first module relocates 
the merging module to the bot- 
tom of Basic's user RAM area. 
After relocation, this module is 
scrapped by letting it drift in the 
area of variables and strings. 
The second module is the actual 
Merge routine. 

Normally, when you type and 
enter Merge an ?L3 error mes- 
sage is displayed on your CRT 
screen. However, Level II Basic 
was clearly written to allow for 
all kinds of expansions. 

The various commands used 
by Level II are stored in mem- 
ory in the form of a one byte 
code number. In this case, 
168 (A8H)= MERGE. (For a list 
of these codes see "New Re- 
stored" and Hidden Codes & 
Missing Chips" in the January 
1980 issue ol 80 Microcom- 
puting.) 

When Basic encounters one 
of these code bytes, it goes to a 
vector list, which in effect is a 
GOTO table to find out where 
the appropriate routine is 
stored. The jump vector (or 
GOTO) for Merge, stored at 
memory locations 16779 
{418BH) to 16780 (418DH) nor- 
mally points to the ?L3 error rou- 
tine at location 012DH for Level 



II and 4A07H for Level III. We are 
going to change this jump vec- 
tor to point to our Merge routine, 
bypassing the ?L3 error mes- 
sage. 

Level II also maintains a list of 
addresses used in the normal 
operation of its business. The 
list is stored in the reserved 
RAM area just below Basic 
RAM. Table 2 is a partial list of 
these addresses. The address at 
16548 (40A4H) and 16549 
{40A5H) is where the first byte of 
a Basic program will start load- 
ing and one at 16633 (40F9H) 
and 16634 (40FAH} where 
variable storage starts. 

The Relocation Module 

Lines 00230 and 00240 get the 
start -of -Basic pointer from loca- 
tions 40A4H and 40A5H and 
plug it into locations 418CH and 
418DH as our new Jump vector. 

Basic user RAM starts at 
17129 {42E9H) for Level II and at 
22208 (56COH) for Level III. Be- 
cause of this difference In start- 
ing locations, we must calculate 
the distance from where the pro- 
gram is to where we want it to 
be. The displacement value Is 
computed In lines 00260 to 
00290 by subtracting (SBC) the 
Basic-slart-address, already in 
register pair DE, from the unrelo- 
cated address of the Merge 
module, which we put into regis- 
ter pair HL in line 00260. The re- 
sult of this subtraction is auto- 
matically put into register HL. 
Save the address of the Merge 
module for use later by pushing 
it into the stack in line 00280. 

Lines 00300 and 00310 trans- 
fer the displacement value from 
register pair HL to register pair 
BC. Then in lines 00320 to 00370 
we get the address of the 
LDBYTE subroutine and sub- 
tract the displacement value to 
get the new LDBYTE address. 
Then plug it into the subroutine 
calls in lines 00660, 00690, 00720 
and 00840. A call in assembly 
language Is the same as a 
GOSUB in Basic. 

Relocation of the Merge mod- 
ule data block will be done for us 
by one of those elegant com- 
mands for which the 2-80 micro- 
processor is famous. The LDIR 
command (LDIR stands for load- 
increment repeat) takes care of 
all the details of a complete 



block move. 

It works like this: The byte of 
the data located In the address 
pointed to by the HL register 
pair Is moved to the address 
pointed to by the DE register 
pair. One Is added to both the 
HL register and the DE register 
pair and one is subtracted from 
the BC register pair. The BC reg- 
ister pair is used as a down- 



counter. We set It to the length 
of the Merge module (80 bytes = 
50H) in line 00390. BC is then 
checked for zero. If it has not 
downcounted to zero, the cycle 
is repeated until a zero is found. 
At that time, both the HL regis- 
ter pair and the DE register pair 
are incremented one more time 
and the program falls through to 
the next program line. 
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iSn* CI.WJEHI noDBCs^ poihtfb 


b:>k: 2^aB4% 


eoTsn 




LO 


ISTOREl.HL 


^STOKC BDDUESS POIMTFO, 1 H. 1 


63Fr JlBB-tO 


aCTKB 




LD 


HL.STOnt 


i BKO POINT H_ TO IT 


KK.- EQfiB 


00V7B 




LDI 




-.nCMl BDDBfSS OP fURKlHT Lift 


6BC* trntl 


BKTM 




LOI 




i TO FIRST Z BYTES Of LR!iI LII* 


GDCE El 


ivvao 




POP 


HL 


;«:t okbent rcnoRY hdohcss 


GDC' S« 


iwRea 




LO 


D,K 


i IVID Put II 


EK8 sa 


IKWIH 




LB 


E.L 


1 IH DC 


io<.a jacc 


OBBZa 




JR 


hz.ubsj* 


li? PLftt STILL BESET) 
i IF HZ LOAD W:XT LINE 


COCS CDDSGC 


niiKii 


znpo 


cniL 


LDBTTt 


iLOnO NEXT BYTE 


6DCE Oe03 


oea4r. 




LG 


a.B3H 


: riBST* 15 HOW F IBSI3 


GDDl' 2BOT 






3B 


NZ.ttiyi 


! HOT THIRD ZEBO. LOfln Hl.KI Llf« 
; EHD or PBOGRfW 


GDDZ n 


etu7e 




IMC 


M. 


iTHIRD ZEBO ■ 1 IS THE 


GDD3 2Zr3Aa 


aosen 




LD 


(MPnii.H. 


-, HEM IJOBIflSLFS 5TnHT flDnRFSS 


GCDS ;37,i;c 


BPHSH 




If 


2C7*H 


IBDTUST HEMOBY 5IZE FOIHTlkrs 

1 TURH OPP CBSSCTIL WiD CO HOfC 


BIJD9 lOJSa? 


eas\o 


LDSYIE 


CULL 


BZaSH 


IGET n BYTE 


oCK 23 


ens^e 




IHC 


I*. 


; INCWEWHT nnUBESS POIHIEB 


SDQC TT 


emse 




LD 


(HLl.B 


; BND LOliD TME BYTE 


6P0E TEOa 


eeate 




CP 


MH 


;IF ZEBO, SET Z FLAG 


fiOi:e c-g 


eerie 




Btt 




i BHD BBC" BCflIN 


set: oe 


ea^a 




DTEB 


MH 


; THESE BBC TME THWE 


^n:; oc 


B937fl 




Dtie 


Ben 


: ZEBOS WIICB IHDICBTE THC 


•iXi OB 


aa^ae 




rero 


B«H 


i EHD or THIS PEOGRBn 


inee 


Be^nn 




END 


SELOC 




•'ossfst ioTW_ rsHcws 










ri»ST4 CIMS 












SKiw toaa 












ZEBO EDCB 












LOBn eoea 












1 one ten 












IiE»T GCMI 












LBBVII G(n9 












:l"_'fl»: 6D94 












I'EL.CC GOM 












sr»E 4Bnl 
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Our Merge module has now 
been moved to low memory, in- 
cluding the three zeros indicat- 
ing the end of a program. The 
routine sometimes crashes 
without them. 

Register pair HL now points 
to one address past our routine. 
This address is plugged Into lo- 
cations 40A4H and 40A5H as 



our new start -of -Basic address. 
We then add two by increment- 
ing register pair HL twice and 
plug this address into locations 
40FgH and 40FAH as our new 
start -of -variables address. 

The only thing to do now Is 
reset the various memory size 
pointers to allow for the 80 bytes 
just added. This chore is done 





ea 


LEADER 


THESE 


00 


, CONSISTING OF 


BYTES 


~ ' "■ ..^ 


_ 


DO NOT 




00 


255 ZEROS 


LOAD 




05 


SYNC BYTE 


INTO 




D3 


THREE 


HEMORY 




D3 


D3 






03 


HERDERS 






41 


FILE NAME "fl" 


STfiRT OF 


42E3H 


F5 


42F5H IS ADDRESS 


BASIC 




42 


OF NEXT LINE 


STORRGE 




0A 


00aAH - Lire 10 


RRER 




00 








B2 


PRINT 






22 


• 




-4ZEFH 


54 


T 




42F0H 


45 


E 






53 


S 






54 


T 






22 


■ 






ea 


END OF LIf«: 




42F5H 


02 


4302H IS ADDRESS 






43 


OF NEXT LINE 






14 


0014H - LINE 20 






00 








B2 


PRINT 






22 


• 






50 


P 






52 


R 






47 


G 






4D 


M 




4ZFFH 


2E 


, 




4300H 


22 


■ 






00 


END OF LINE 




4302H 


00 


0000H - DUMMY 






00 


LINE NUMBER 


START OF 


4304H 


XX 


URRIRBLE TYPE 


UflRIRBLE 




XX 




STORRGE 


_, 


XX 


. 




Table 1 





1BS2B 


4e8E:H 


ENTRY FOR USH 


1G539 


409BH 


PRINTER CHRRIRGE POSITION 


16S40 


4e3CM 


DEi^ICE - TflPE-FFH UIDEO-BBH PRINTER-fllH 


16544 


4BABH 


STRRT OF STRING SPfiCE 


lGS4e 


4Bn4H 


STRRT OF BASIC USER RAM 


lB55e 


40R6H 


LINE CURSOR POSITION 


1B5E4 


40RHH 


SEED FOR Rf)D RND RONDOM 


1GB59 


40firH 


NUMBER TYPE - IHT-BZH SINGLE-04H COUBLE-aSH 


IGSei 


40B1H 


TOP OF BPSIC MEMORY 


1G5B3 


4BB3H 


STRING WORK ftREfl POINTER 


16565 


40B5H 


STRING WORK BREH 


16598 


40DGH 


MEMORY SIZE 


lES2g 


40r5H 


LAST LINE NUMBER E>:ECUTED 


1E633 


40F9H 


STfiRT OF iJPRIPBLES 


16G35 


4BFBH 


RRRflYS POINTER 


15S37 


40FDH 


FREE SPRCE 


1EG39 


40FFH 


NEXT DRTB BYTE TO BE REflU 


1G722 


4152H 


LEVEL 2 CtCTOR TftBLE 

Tabfe 2. 



by the Level II ROM routine 
located at address 2C7AH. That 
routine also sends us back to 
the Level II ready prompt, and 
Merge is operational. 

The Merge Modutt 

To understand how the sec- 
ond module works, we must 
examine how CSAVE formats 
cassette tapes and how this in- 
formation Is loaded back into 
the computer as a coherent pro- 
gram. Save Program Listing 4 on 
a cassette using the file 
name "A". 

Table 1 demonstrates the 
CSAVE format. The first column 
contains some explanatory 
comments. The second column 
is the memory location where 
the byte on tape will load. The 
third column is a representation 
(in hex) of the data that is con- 
tained on the cassette tape. The 
last column Is a brief descrip- 
tion of what the byte is or its 
function. 

A saved tape starts with a 
leader of 255 zeros, then a sync 
byte (ASH) synchronizes the 
loading of all following data. 
Next comes a three-byte leader 
of three D3H bytes, followed by 
a one-byte file name for the fol- 
lowing program, in this case 
41H, an ASCII"A", 

All the data to this point has 
been CSAVE housekeeping 
overhead and does not load into 
memory. The next two bytes are 
the first two of the program and 
will be the first two bytes to be 
loaded into memory. These 
bytes point to the address of the 
next program line. After Basic 
has finished with a program line, 
this Is how it knows where to go 
for the next line. The two bytes 
are arranged In standard Z-80 
format with the least significant 
byte (LSB) first, followed by the 
most significant byte (MSB). To 
read the address, read the last 
byte first (In hex). 

The next two bytes are the 
program line number, again ar- 
ranged LSB first. The following 
bytes In Table 1 are the various 
command codes and ASCII 
characters making up the pro- 
gram. 

A zero Indicates the end of a 
program line. If you have used 
multiple statement program 
lines, a zero will not be put be- 



tween the statements. Instead, 
a 3AH byte (ASCII colon) will be 
there. The zero only appears at 
the end of a numbered program 
line. The end of a program Is in- 
dicated by two more zero bytes 
following the end of line zero. 
These two zeros form a dummy 
line number. The next sequen- 
tial address starts the area used 
for simple variable storage. 

To see how Merge works, we 
will first call the very useful Lev- 
el II ROM routine located at ad- 
dress 0293H. First, It turns on 
the cassette motor and selects 
default drive number one. Then 
It reads the 255 zero byte leader, 
locates the sync byte (ASH), and 
turns on the two asterisks In the 
upper right hand corner of the 
screen for us. Since Merge 
doesn't search for a particular 
file name, we can skip over the 
next four bytes in lines 00550 to 
00570. 

The DJNZ (decrement-jump 
(if) not zero) command in line 
00570 creates the assembly lan- 
guage equivalent of a For... 
Next loop, using register B as a 
downcounter. When counting Is 
to be done. It is always done 
through the B register or for 
counts longer than 255, through 
the BC register pair. In line 
00550 we set register B to four 
(04H). When the B register has 
downcounted to zero, the com- 
mand falls through to the next 
program line. 

The byte In the accumulator, 
(register A) is the last byte load- 
ed and the name of the program 
about to be merged. We can use 
that byte to replace the left 
asterisk (Listing 1, line 00580). 

Next, we need to know where 
In memory to load the new pro- 
gram. Lines 00590 to 00640 give 
us this address by taking the 
start-of-varlables address, 
which Is in register pair HL and 
subtracting two. Register pair 
HL now points to the next ad- 
dress past the last zero byte of 
the last line of the resident pro- 
gram (see Fig. 1). This Is where 
the program to be merged will 
start. We wilt use this address 
later to adjust the next-program- 
line pointer. For now, we will 
save it in register pair DE. 

Later, we are going to look for 
the zero byte, which represents 
the end of a program line. If you 
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PROFESSIONAL 




INCOME TAX SYSTEM 

FOR TRS-80* MODEL I, II or 

For four successive years! 



Our system, running on the magnificent line of TRS-80 computers, has 
prepared thousands of iightning-fast, error-free tax returns a day In 
accounting offices nationwide. 

Now we ir^troduce! 

SYSTEM THREE! 

SYSTEM THREE is an improved, still more interactive version — Totals W-2's and 
computes PICA overpayment — Includes "QWIKTAX," a fast tax calculator for tax 
planning — Has automated Client Billing — More! 

And, as always— 

1. Full interactive user control, in tax-form language only, line-by-line. 

2. Screen display of full 1040 and all schedules, prior to printout. 

3. All formats IRS and State approved. 

4. Schedule amounts automatically entered on Form 1040. 

6. Your Preparer's Information automatically printed at bottom of Page 2, Form 1040. 

6. Built-in Validation Check tests entire system, hardware and software. 

7. Special printer adjustment routines: Margin Offset, Text Position, etc. 

8. Fills in pre-printed forms (we supply) or use overlays. Your choice. 

9. AUTOMATICALLY COMPUTES: Tax — Earned Income Credit — Maximum/Minimum Tax — Least Tax 
Method — All Percentage of Income Limitations — All Fixed Limitations. 

DOES INCOME AVERAGING IN EIGHT SECONDS! 

10. Full support through the tax season, no charge. 

11. Inexpensive yearly updates in accordance with tax-law changes. 

SYSTEM THREE comes in four modules. You select the ones you need. There is no 
system like it, for any computer, and the cost is literally nothing. In one season, our users 
have paid, out of savings, for the software and the computer. 

35-page Descriptive IVIanuai - $7.50 

(Refundable on order) 

MINIMUM SYSTEM REQUIRED: Model I, 4BK, 1 Disk Drive 

CONTRACT SERVICES ASSOCIATES.. 

706 SOUTH EUCLID • ANAHEIM, CA 92802 • TELEPHONE: (714) 635-4055 

'TRS-80 is ■ fademark of Tandy Corp. 



^See Lisi of AOveiiisers on page 402 
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refer to Table 1 , you will see that 
the fourth byte to come in is a 
zero. Avoid confusing this zero 
with an end-of-ltne zero by load- 
ing the first four bytes without a 
zero search in lines 00650 to 
00680, using the DJNZ com- 
mand again. 

Lines 00910 to 00950 contain 
the subroutine, labeled LD- 
BYTE, which gets one byte of 
data from tape by calling the 
Level II ROM subroutine located 
at address 0235H and loads that 
byte into the memory location 
pointed to by the HL register 
pair. 

Register pair HL Is increment- 
ed by one to point to the next 
memory location and the last 
byte loaded (which is in the ac- 
cumulator) is compared with 
zero in line 00940. If the result of 
this comparison is true (byte = 
0), the 2. flag (the seventh bit of 
an eight-bit binary number in the 
F register) will tje set to one. if 
the result is false (byte ^0) the Z 
flag will be reset to zero. We can 
now return to the main program. 

Line 00700 checks the status 
of the Z flag. If the last byte com- 
pared was not a zero (NZ), the 
program jumps back to the label 
specified by the operand of the 
command. Another byte Is load- 
ed and another and another, un- 
til the last byte loaded is a zero, 
at which point the program falls 
through to line 00710, which 
calls a Level II ROM subroutine 
to bttnk the right asterisk. 

We have found a zero that 
means the end of a program 
line. If the next two bytes are 
also zeros, we have arrived at 



the end of the last line of the pro- 
gram. Now we must adjust the 
next-llne-polnter in the first two 
bytes of the last line loaded to 
point to the last byte loaded, 
which is the first byte of the next 
line. 

The LDI commands in lines 
00770 and 00780 work the same 
as the LDIR command except it 
does not use the BC register pair 
as a downcounter. It transfers 
data once and only once. This 
way not only saves a byte of pro- 
gram memory, but demon- 
strates both commands as well. 
We are moving two bytes, the 
LSB and MSB of the address. 
Therefore, we must use LDI 
twice. 

We have already put the ad- 
dress of the first byte of the last 
line, in register pair DE, back in 
lines 00620 and 00630. Register 
pair HL holds the address of the 
current line. We must store the 
current line address somewhere 
and point register HL to it in 
order for LDI to do its |ob. The 
problem Is where to store It. Lo- 
cations 40AAH to 40ACH hold 
the seed used In the random 
number generator for Basic's 
RND and Random statements. 
We can store the address here 
without worrying alwut interfer- 
ing with any of Basic's normal 
functions. 

With all the housekeeping 
done, the two LDIs move the 
LSB and MSB of the address to 
the first two bytes of the last 
line. Now POP the current line 
address out of the stack and 
back into the HL register pair. 
Lines 00800 and 00810 transfer 



10 roH p 
lea DflTH 

110 DATR 

IZQ onin 

130 DHrfl 
148 DRTR 

ise untA 

I6B DATA 

170 DftTh 

180 IMTR 

190 Df^TR 



-2BaeO TO 2ei3i:REftD H : POKE P.B^N^XT 

237.91,164,6*, 237. B3, l^B. 65.33, 1*6,189,229,237,8? 
ZZ3. 193, ■^S, 217, 109, 237, GG, 34, 17t . 1P9. 34. 177, 109, 34 
IBS, 1B9.34.2B4, 109,2ZF:. 1 ,B8,0,2d7. 17B. 237, 83. 1E4 
El, 19. 19.237.83, 249, f;4. l!iS, IZZ. -.4 . 20G, 147.2,6 
4, ZOS, S3. 2, 16.251 , 50. K2,t-6, 4i'. 249.64 . 43. 43 
84.93.43,6.4.285.217. 109, : 6. ?bl , ZBS, 217, 109,32 
ZS1.Z05, 44. 2, 205.217,1 09,223,34.1 71,64.33, 171,64 
237. 160, 237, 168. 225. 84, 93, 32, 222, 205. 217, 109.6.3 
32.217,35.34,249,64, 193, 122. 44. 205,53. 2. 35. H9 
254.8.201,0,0,0 
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Program Listing 3. 



it to the OE register pair for later 
and the adjustment is complete. 

The Z flag is still set or reset 
from the last compare. We will 
use the flag now to either load 
the next program line or look for 
another zero. If the zero flag test 
in line 00820 is true, we load an- 
other byte and set register B to 
03H. This makes the First 4 rou- 
tine into a First 3 routine, other- 
wise our downcount would be 
off by one if this bit isn't a zero. 

If the last byte was a zero, the 
flag test in line 00850 will fall 
through to the next program 
line. Increment register pair HL 
one last time and put that ad- 
dress into locations 40F9H and 
40FAH as the new start-of-vari- 
ables pointer. 

Remember the Level II ROM 
routine starting as address 
2C7AH that was used in the relo- 
cation module? Use it again to 
adjust memory size to allow for 
the Basic program we ]ust 
merged, then we are done. 

The ROM routine at 2C7AH 
contains a call to another ROM 
routine at location 01F8H that 
turns off the cassette motor. 
The reason I mention this now is 
that many useful Level II rou- 
tines contain calls to other sub- 
routines. When using these rou- 
tines, careful consideration 
must be given to what effect the 
subroutine will have on your pro- 
gram or the registers you are us- 
ing. If the extra calls will not af- 
fect your program or registers, 
use them! If the subroutine af- 
fects your registers but not your 
program, push the registers in 
jeopardy into the stack and pop 
them back after the subroutine. 
Remember for every PUSH there 
must be a POP. 

Using The Program 

In response to the memory 
size prompt, press Enter. If you 
need memory for some other 
purpose, reserve it. If you are us- 
ing Level III, load and initialize it; 
if not, it would be a good idea to 
load a line renumbering pro- 
gram into high memory. If you 
have assembled the program or 
punched it using T-Bug, load it 
using the System command. Ini- 
tialize Merge by typing "/" or 
/28000 and pressing Enter, 

If you are using the Basic pro- 
gram shown In Program 2, 



10 PRINT-TEST- 
20 PRINT-PftGM ■• 
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CLOAD and run It. After it has 
run, the New statement in line 20 
will clear It out of memory. Type 
system and press Enter, then 
type /28000 and press Enter, 
When the Ready prompt ap- 
pears, you're In business. 

Some Precauttons 

CLOAD the first program, but 
before merging in another pro- 
gram, some precautions should 
be observed. The next program 
should have line numbers higher 
than the line numt>ers of the root 
program. Actually the higher 
line numt>ers can be loaded first 
and the program renumbered 
but if line numbers are dupli- 
cated in the two programs, line 
statements such as GOTO or 
GOSUB will not renumber 
properly 

If the earlier line numbers are 
higher, always renumber or un- 
predictable results can occur. 

Merge does not have file se- 
lection ability. You must locate 
your cassette at a point just be- 
fore the program to be merged. 
Be sure the volume on your cas- 
sette is properly set, then type 
Merge and press Enter. Two as- 
terisks will appear In the upper 
right hand corner of your CRT 
screen. The left asterisk will be 
replaced by the file name of the 
program that is loading. Verify 
that it's the proper program. If 
the wrong program Is loading, 
the routine can be aborted with 
the reset switch. The biinking 
asterisk will signal that the pro- 
gram is loading. When loading 
is complete, the ready prompt 
will appear. If you have loaded 
the wrong program, simply de- 
lete the unwanted lines and 
start over. 

All other normal commands 
will operate as usual. Finally, 
list the composite program for a 
final verification that you have 
merged all the separate pro- 
grams in the right order. Renum- 
ber the new program, if neces- 
sary, and save It on tape.H 
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Your best 

Model I/Ill 

peripheral buy 

is a modem. 



Yburbest 

Model I/Ill 

modem buy 

is LYNX. 



Considering expanding your TRS-80 
Model I or III? Then you should know 
that only one kind of peripheral can 
give you all these extra capabilities 
... in a single unit: 

• Computer- to-computer data 
communications, tor better 
personal or business manage- 
ment. 

• Access to free "bulletin board" 
resources. 

• Access to Source, Compu- 
Serve and other time-sharing 
systems. 

• Services like electronic mall, 
instant news and financial re- 
ports. 

• An almost limitless supply of 
new games and ott>er enthusi- 
ast activities. 

Of course, we're talking about a 
modem. A far more sensible first 
step in expanding than, say, joy- 
sticks, or a voice box, or a printer. 
And, therefore, your best peripheral 
buy. 

A modem opens up a whole new 
world to you. A workl of thousands 
of computers and computer people 
just like you, in homes and busi- 
nesses around the block and across 
the country. A world you tap through 
your telephone. 

But don't simply settle for any mo- 
dem. For the most modem satisfac- 
tion, you need to make the best mo- 
dem buy. 

And that's LYNX. 




!.)«<)> Ibr 



The new LYNX for TRS-80 Model I and Model 
111. It's the latest innovation from the people who 
are making data communicatkxis affordable. It's 
the best first step you can take in expanding. It 
makes your microcomputer a whole new animal. 




DLYivnco 



123 LOCUST STREET LANCASTER, PENNSYLVANIA 17602 
Phor« 717/291-1118 

TRS-SO is ■ Iradamark ot th« Radio Shack Division ol Tandy Corpofation 
FCC RegstiaOon Humbv A909KE-66171-OM-N 
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In- 



The new LYNX is the ideal modem 
for your Model I or III. That's because 
it's the key element of a total direct- 
con nect telephone communica- 
tions package. 

This package includes all serial 
and computer bus interfaces, cables 
and terminal software . . . and comes 
to you with these remarkable fea- 
tures: 

• SINGLE PRICE: $299,951 

• Compatible with both Model I 
and III. 

• Ho separate purchases 
quired. 

• One-year warranty. 

• Auto dial/auto answer. 

• Works with any software, 
eluding ST-80 by IMk:klus. 

• Active clear, break, and "con- 
trol" keys. 

• Half or full duplex, variable word 
length, parity and stop bits. 

• Dial from phone, keytx}ard, or 
memory. 

• Works with or without Model I 
expansion Interface. 

• Works with or without Model III 
RS-232 card. 

• Can be traced on etther skte of 
Model III. 

• No tools needed to Install. 

No Other modem gives you so much 
in a single package. And when you 
compare the LYNX price with the to- 
tal cost of bringing any other modem 
on line, it couki save you OVER $1 001 
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Consult your local microcomputer retailer, or call one of these LYNX haridlers today— TOLL FREE: 



ADVENTURE INTERf^TIONAL 
Longwood. FL 
800/327-7172 

THE PROGRAM STORE 
Washington, DC 
800;424-2738 

^Sb9 List ot Ativarineis on page 402 



ADVANCED COMPUTER PRODUCTS 

Irvine. CA 

800/854-8241 

STEVENS RADIO SHACK 
Phoenixville, PA 
600/345-8279 



TSE HARDSIDE 
Milford, NH 
800/258-1790 

SIMUTEK 
Tucson, AZ 
800/528-1149 



COMPUTER PLUS 
Littleton, MA 
800/343-8124 

PROGRAMS UNLIMITED 
Jericho, NY 
800/845-6038 
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EncyckuMdii for thi TnStfl* 

What's the key to getting the most from your 
TRS-80*? No, it isn't disk drives or printers or joy- 
sticks. It's information. Without a continual sup- 
ply of information and ideas, you cannot realize 
the full potential of the TRS-80*. 

Our response to the clamor for additional infor- 
mation is the Encyclopedia for the TRS-80*, a ten- 
volume reference work of programs and articles 
carefully selected to help you make the most of 
your microcomputer. You can consider the 
volumes of the Encyclopedia to be an extension of 
the documentation that came with your TRS-80* 
Each book is full of material on programming 
techniques, business, language, hardware, games, 
tutorials, education, utilities and interfacing. 

Unlike conventional encyclopedias, the 
Encyclopedia for the TRS-80* will never become 
stale or out of date. That's because the volumes of 
the Encyclopedia are being issued one-at-a-time, 
approximately six weeks apart. This means that 
each new volume will reflect the latest develop- 
ments and discoveries, making this a living ency- 
clopedia for TRS-80' users. 

The first four volumes are being issued during 
1981 . The remaining volumes will be issued during 
the first half of 1982. The deluxe COLLECTOR'S 
EDITION has a handsome green and black hard 
cover with a dust jacket. 
A soft cover edition is also available. 

DEAIERS Please request discount information 
and catalog when ordering. Mail Dealer orders 
ATT: Wayne Green Books Dealer Sales. 

WAYNE GREEN BOOKS 

Pine Street 
Peterborough, NH 0.1458 
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EncydopMtti Loadar 

The editors at Wayne Green Books want to help 
you use the programs in your Encyclopedia for (he 
TRS-80'. So to help you maximize the use of your 
microcomputing time, we created Encyclopedia 
LoaderTM. 

By a special arrangement with Instant Soft- 
ware^", Wayne Green Books can now provide you 
with selected programs contained in each volume 
of the Encyclopedia for the TRS-80* on a special 
series of cassettes called Encyclopedia Loader***. 
Your encyclopedia provides the essential docu- 
mentation but now you'll be able to load the pro- 
grams instantly. 

With Encyclopedia LoaderiM you'll save hours 
of keyboard time and eliminate the aggravating 
search for typos. 

Save money with this introductory offer. 
Encyclopedia Loader^" for Volume 1 of 
Encyclopedia for the TRS-80' which will normal- 
ly cost S1 4.95 is available for a limited time only at 
(he introductory price of $12.95. 

To order specify EL8001 $12 95 



Thp Encvclopedi' tm lh« tRS-80 
n a Waynr Crvm publicdiion 
Encyclop^'li' loadpi i\ manutac 
lurml bv Iniuni Softwirr, a 
division of.Wav"' Cteen Int 
' TRS.80 li a Ua6rm»iV ot R«<fio 
SKack diviiKin ot Tandy Corp 
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SPECIAL OFFER 




If you order the entire 
ten volume set of the 
Encyclopedia for the 
TRSW; you'll receive 
the tenth volume FREE! 

10 Volume deluxe 
hard cover COLLECTOR'S 
EDITION -a $199.50 value 
$164.00 ENSIOO postpaid 

10 Volume soft cover 
edition, a $109.50 value. 
$83.00 EN8080 postpaid 



YES, I want your special offerl 




10 Volume deluxe hard cover 

COLLtCTOR'S EDITION-a 
$199 50 value ENSIOO $164 00 

To order single hard cover volumes 
of the Encyclopedia please specifv: 



.;^ ti.. 1 

10 Volume soft cover edition 

— a $109 50 value. EN8080 $83 00 



To order single soft cover volumes 
of the Encyclopedia please specify: 



Ai ,'. f"r,- r>- •)']s roRM 

''MAIL A COPY OF THIS FORM 
OR THE CARD PROVIDED TO: 
WAYNE GREEN BOOKS 
SALES DEPT, PINE ST. 
PETERBOROUGH,NH 03458 
OR CALL TOLL FREE 

1-800-258-5473 

To order Encyclopedia Loader'** 

cassettes please specify: 



Voliimpi 


EN81 01 $19.95* 




Vnliimel 


EN8061 $10.95' 


Volume 1 


EL8001 $12,95' 


Volume 2 


EN81 02 $19,95' 




Volume 2 


EN8082 $10,95' 


Volume 2 


EL8002$14 95* 


Volume 3 


EN8103$19 95' 




Vnliime 3 


EN8083 $10.95' 


Volume 3 


EL8003 $14,95' 


Volume 4 


EN8104$1995' 




Volume 4 


EN8084 $10.95' 


Volume 4 


EL8004 $14,95' 


Volume 5 


EN81 05 $19.95' 




Volume 5 


EN8085 $10 95' 


Volume 5 


EL8005 $14.95* 


Volume 6 


EN8106$1995' 




VnliimpFi 


EN8086$10 95' 


Volumes 


EL8006$14 95' 


Volume? 


EN8107$19 95' 




Volume? 


EN8087 $10.95* 


Vnliime? 


EL8007$14 95' 


Volume 8 


EN8108$1995' 




Volumes 


EN8088 $10.95' 


Volumes 


E L8008 $14.95* 


Volume 9 


EN8109$19 95' 




Volume 9 


EN8089 $10.95' 


Volume 9 


EL8009$14 95' 


Volume 10 


EN8110$1995* 




VolumelO 


EN8090 $10,95' 


VolumelO 


EL8O10$14,95* 


PAYMENT ENCLOSED 


PLEASE CHARGE T 


OMY VISA 


MASTERCARC 
EXPIRE 


) AMEX 


CARD# 




INTERBANK* 


S 


NAME 


AnnRFSs 


CITY 








STATE 


7IP 




SIGNATURE 
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TUTORIAL 



Chop and channel some 

machine-code subroutines for more powerful Basic. 



Customized Commands 



Dale W. Rupert 
76 Virginia Ave. 
Bridgeport, CT 06610 



Every machine code utility, 
In a sense, customizes your 
computer. I have developed a 
method which increases the 
numlser of Basic commands and 
functions available to you in 
your Level II or Disk Basic ma- 
chine. These functions are ma- 
chine code subroutines. They 
are called by commands which 
are recognized but not utilized 
by the Level II Basic interpreter. 

Some Background 

A major advantage of ma- 
chine language routines, aside 
from their speed, Is their per- 
manence. Impervious to New 
and CLOAD commands, which 
wipe out a Basic program in an 
instant, machine code pro- 
grams remain protected beyond 
the boundary set up by your re- 
sponse to the memory size 
query. Only an erratic POKE or a 
System tape loaded into the 
same memory locations can al- 
ter your machine code routines. 

With that important distinc- 
tion understood, consider a 
command that would be useful 
In our customized computer — a 
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Merge command. After we have 
loaded or typed in one program, 
this command will adjust some 
pointers. We may then CLOAO a 
second program which is ap- 
pended to the first, rather than 
overwriting it. Once the second 
program Is loaded, the Merge 
command must readjust a point- 
er before the combined pro- 



grams are run. 

The procedure for merging 
has been clarified in Roger 
Rape's article "Whip File 
Wipeouts" [Kilobaud Microcom- 
puting, July 1979). My machine 
language version of this pro- 
gram is shown in Program 
Listing 1, lines 310-380. The 
comments in the listing explain 



the procedure. 

Once this routine is stored In 
memory, we simply call it rather 
than using the cumbersome 
Basic sequence ot PEEKing and 
POKEing to merge two pro- 
grams. 

A New Command 

Before putting the Merge rou- 







00100 


;**• CUSTOMIZED 


COMMANDS : MERGE 


ROUTINE •*•••* 








001IB 


; DALE W. RUPERT 07/06/80 










00120 
















00130 


;THIS PROGRAM ALLOWS THE USE OF THE HERGE CCWHAND i 






00140 


fIN LEVEL II BASIC. 










00150 
















00160 


;T0 MERGE TWO BASIC PRGMS.: 










00170 




1 ) HAVE 


FIRST PRGM. IN MEMORY 








00180 




2) TYPE 


MERGE (ENTER) 










00190 




3) CLOAD SECOND PRGM. 










00200 




4) TYPE 


MERGE2 (ENTER) 










00210 


jTHE TWO PRGMS. 


ARE NOW ONE. 










00220 


( 










7F02 




00230 




ORG 


7F02H 


S, A. -32514 








00235 






;CHANGE LINE 240 TO RELOCATE | 


7F02 


210B7P 


00240 


PATCH 


LD 


HL,START 


PATCH TO START 




7Ffl5 


228C41 


00250 




LD 


(418CH) ,HL 


MERGE VECTOR 




7P08 


C372Bfl 


00260 
00270 


. 


JP 


0072H 


TO BASIC 




7F0P 


7E 


00280 


START 


LD 


A,(HL) 


GET ARGUMENT 




7P0C 


B7 


00290 




OR 


A 


SET FLAGS 




7F0D 


2008 


00300 
00305 




JR 


NZ,HERGE2 


ARG. <> 




7F0F 


2AF940 


00310 


MERGE 


LD 


HL,(40F9H) 


NEXT LINE PTR. 




7F12 


2B 


00320 




DEC 


HL 


SUBTRACT 2 ... 




7F13 


2B 


00330 




DEC 


HL 


... FROM IT 




7F14 


22A440 


00340 




LD 


(40A4H) ,HL 


INTO FIRST LINE 


PTR. 


7P17 


C37200 


00350 
00355 


; 


JP 


0072H 


BACK TO BASIC 




7F1A 


21E942 


00360 


MERGE 2 


LD 


HL,42E9H 


•NORMAL 1ST LINE 


ADDR. 


7F1D 


22A44e 


00370 




LD 


(40A4H) ,UL 


[INTO 1ST LINE PTR. | 


7F20 


C37200 


00380 




JP 


0072H 


I BACK TO BASIC 




0000 




00390 




END 
















Program Listing 1. 







MODEL II 




BUY 
DIRECT 



26-4002 

64K 1 Drive 

$3297.00 

26 4160 1 Drive Exp $1034 00 

26-4161 2 Drive Exp 1574 00 

26-4162 3 Drive Exp 2114.00 

36-41 50 Hard Drive 1 3994 00+ 

26 4151 Hard Drive -2 3144.00 + 

26 4530 Scripsit tl 265.00 

26-4512 Profile II 162.00 

26-451 1 Visicalc 11 265,00 

26-4501 Gen Ledger 180.00 

26-4506 Moil List 72.00 

PRINTERS 



DISCOUNT 

TRS-80® 

COMPUTER SPEOAUSTS 

CALL US. . . 
SAVE MONEY 




We carry the full line of TRS-80 Computers. All 
other software, furniture, ond occessories at dis- 
count from catalog price. We stock most items 
to assure you fast delivery and save you money. 

26 1140 Exponsion Interfoce $249.00 

26-1141 16K Exp. Interface 339.00 

26-1142 32K Exp. Interface 429.00 

26-1145 RS232C Board 84.00 

26-1160/1 Mini Disk Drive 419.00 

26-1563 Scripsil-Disk 79.00 

26-1566 Visicalc 83.00 



•PRINTERS- 



CEnTRonics 

BEST PRICES 

Text Quality Centronics 
739-1 Printer $729.00 



26 1165 Line Printer V 1710.00 

26-1167 Line Printer VII 360.00 

26-1166 Line Printer VI 1080.00 

26- 1 1 58 Daisy Wheel II 1 799.00 

26-1168 Line Printer VIM 720.00 



Pocket Computer 

26-3501 ).9K P.C $188.00 

26-3503 Cassette IF 45 00 

14 812 Recorder 72 00 

26-3505 Mini Printer 134 00 

WRITE US FOR A 
FREE CATALOG 



THOUSANDS OF SATISFIED CUSTOMERS 



MODEL lit 




26-1061 4K I $609.00 

26 1062 16K III M9.00 

26 1066 48K III 

W/2 Drives. RS232 3077.00 

COLOR 



SB 



lit-^^miiAm\ 



26 3001 4K taia.oo 

26 3002 16K Ext. Bosic. . . . 4M.00 
26-3003 32K Ext. Bosk. . . 638.00 
26-3010 Color Video . .3S3.00 
26 1306 Recorder 34.00 




ALL POCKET AND COLOR 

COMPUTER SOFTWARE 

SOLD AT DISCOUNT 



1-800-841-0860 ToII Free Order Entry 



IVIJCRQ l^fll^flGEIVIEMT SVSTEMS, JI^C. 



No Taxes on Out Of DOWNTOWN PLAZA SHOPPING CENTER 



State Shipments 

Immediate Shipment 
From Stock on Most Items 



DEPT. #4 

115 C. SECOND AVE. S.W. 
CAIRO, GEORGIA 31728 
(912) 377-7120 Ga. Phone No. & Export 

Tn-IO li ■ r*gUt*r*4 Iradvtnark of lS« Tandy Corp. 



A copy of the monufoclurer's wor- 
ronty can be obtained free upon 
specific written request to the 
Electronics Department of our 
Cairo. Georgia Retoil Store 



^S»A List ot AOvertisers on paga 402 



80 Microcomputing, November 1981 • 293 



tine into memory, consider how 
we might call it. The traditional 
methods use the System com- 
mand or the USH statement. 
Both are satisfactory, but a bet- 
ter way Is to use the Merge com- 
mand I 

In Level II, type: MERGE 
(enter). You didn't get a syntax 
error — that means the computer 
recognized the word merge. The 
computer responded to merge 
with an L3 ERROR. Thus, the 
Merge command Is built into the 
Basic Interpreter, but it is 
Interpreted to Im a Disk Basic 
command, not used in Level II. 

In Wes Thielke's article, 
"ROM Routines" (80 Microcom- 
puting, February 1980), a table 
of Disk Basic command vectors 
shows that the Merge command 
sends the computer to address 
418BH. The three bytes begin- 
ning at 41BBH (C3 2D 01) cause 
the computer to jump to address 
012DH. This jump leads right to 
the L3 Error dead end in Level II 
Basic. If we replace bytes 2DH 
and 01 H with OBH and 7FH, the 
computer jumps to location 
7F0BH whenever It encounters 
the Merge command. Waiting at 
7F0BH is our Merge routine. 

The Merge Routine 

We must first patch our rou- 
tine Into the computer's se- 
quence of steps. The Merge rou- 
tine must put address 7F0BH In- 
to locations 418CH and 418DH. 
The location of this routine is ar- 
bitrary; I chose 7F0BH so It 
won't interfere with other rou- 
tines in upper memory. If you 
have a 4K machine, replace 7FH 
with 4FH so your starting ad- 
dress Is 4F0BH. 

This patch causes the jump to 
our routine: 



LD HL,7F0BH 'gel our starting addrsss 
LO (41SCH).HL 'store It as tha Merge 
vector 



Since the Merge routine con- 
sists of two parts, one before 
the CLOAD and one after It, a 
single Merge command won't 
suffice. We must somehow indi- 
cate whether to jump to the first 
or the second part of the routine. 
We could do some POKEJng tie- 
fore each Merge command, but 
that defeats the idea of cus- 
tomized, built-in routines. 







00100 




CUSTOMIZED COHHANDS •••••** 






00110 


; DALE H. 


RUPERT 


07/06/80 








00120 


; 














00130 


; PROGRAM ALLOWS THE USE 


OF CHD0 


THRU CKD7 IN LEVEL II BASIC 






00140 


;T0 CALL UP THE SOUNDS 


OF DENNIS 


KITSZ' BABYBEEP PRGH. 






00150 


;IN '80 


MICROCOMPUTING, 


4/80, P. 


68 






00160 


• 














00170 


I 














001B0 


f 










7E3e 




00190 
00200 




ORG 


7E30e 






7E30 


21397E 


00210 


PATCH 


LD 


HLjSTART 


; PATCH TO S.A. 


7E33 


227441 


00220 




LD 


(4174H) 


,HL 


;CMD VECTOR 


7E36 


C37200 


00230 
00240 




JP 


0072H 




J TO BASIC 


7E39 


23 


00250 


START 


INC 


HL 




;NEXT BASIC LOC. 


7E3A 


E5 


00260 




PUSH 


HL 




;SAVE IT 


7E3B 


FE30 


00270 




CP 


30H 




[ARC. < "0" 7 


7E3D 


FA557E 


00280 




JP 


H,NEXT 




(INVALID ARC. 


7E40 


FE38 


00290 




CP 


3eK 




rIS ARG.>ASCII"7"? 


7E42 


F2557E 


00300 




JP 


P,NEXT 




jARG. > 7 


7E45 


D630 


00310 




SUB 


30H 




jGET VALUE 0-7 


7E47 


21577E 


00320 




LD 


HL, TABLE 


) START OF TABLE 


7E4A 


B5 


00330 




ADD 


A,L 




jGBT TABLE POSITION 


7E4B 


6F 


00340 




LD 


L,A 






7E4C 


5E 


00350 




LD 


E,(HL} 




;GET LSB 


7E4D 


167D 


00360 
00370 




LD 


D,7DH 




IBABYBEEP STARTS AT 7D00H... 
;...S0 MSB IS 7DH 


7E4F 


21557E 


00380 




LD 


HLfNEXT 




I RETURN ADDRESS 


7E52 


E5 


00390 




PUSH 


HL 




;SAVE IT 


7E53 


D5 


00400 




PUSH 


DE 




(SET UP INDIRECT. . . 


7E54 


C9 


00410 




RET 






t ...SUBROUTINE CALL 


7E55 


El 


00420 


NEXT 


POP 


HL 




(RESTORE BASIC PTR, 


7E56 


C9 


00430 
00400 


J 


RET 






(BACK TO BASIC 


7E57 


00 


00450 


TABLE 


DEFB 


00H 


} PHASER 


[7D00H) 


7E58 


14 


00460 




DEFB 


14H 


[BEEPS 


(7D1411) 


7E59 


34 


00470 




DEFB 


34H 


, DOODLES 17D34H) | 


7E5A 


57 


00480 




DEFB 


57H 


;FANFARE (7D57H) | 


7E5B 


BS 


00490 




DEFB 


0BSH 


; SIREN 


(7DB8H} 1 


7E5C 


DF 


00500 




DEFB 


0DPH 


ll BLOOP (7DDFH) 


7E5D 


ED 


00510 




DEFB 


0EDH 


ll BLEEP (7DBDH) 


7E5E 


FB 


00520 




DEFB 


0P6H 


, RASPBERRY {7DFBH) 






00530 


J 














00540 


} 










0000 




00550 




END 








00000 TOTAL 


ERRORS 






















Program Listing 2 





Here is one solution. Con- 
sider the command mode state- 
ment: MERGE2. The computer 
first Interprets the Merge com- 
mand, and the two is then stored 
in the A register as 32, its ASCII 
code. 

See for Yourself 

To observe this process, us- 
ing T-Bug: 

• Put OBH into 418CH and 7FH 
into 418DH (type M 418C OB 7F); 
typeX. 

• Put a breakpoint at 7F0BH 
(type B 7F0B). 

• Exit to Basic (type J 0072 or 
use the Reset button); clear. 

• Type and enter. MERGE2. The 
computer goes to 418BH then to 
7F0BH. 

• The breakpoint puts you back 
into T-Bug. Type F to replace 
the breakpoint; then type R to 
display the registers. Notice the 
address in the HL register pair. 
(Also note the 32 in the A 
register.) 

• Type M and the HL address to 
see 32H, the ASCII value for two. 



Consequently, if we use 
Merge and Merge2, we can dis- 
tinguish between our first and 
second entries to the routine. 
The following statements deter- 
mine whether or not there is a 
non-blank character, such as 2, 
immediately after the word 
Merge: 

LD A,(HL) set ctir. atler Merge 

OR A 'set (lags 

JR NZ.MERGE2 'it non-blank, jump to 

part two 

'otherwise do part one 

here 

Thus, If nothing follows the 
word Merge, the computer exe- 
cutes part one. If anything, such 
as two, follows the word Merge, 
there Is a branch to part two. The 
complete Merge programs and 
patch are shown In Listing 1. 
You can use T-Bug to make a 
System tape of this program: 

• Use the M command to store 
the program in memory (type M 
7F02, then type the numbers in 
column two of the Listing: 21 OB 
7F22...etc.) 

• Use the command P 7F02 



7F22 7F02 MERGE to make a 
tape. 

The starting addresses tor the 
eight sound subroutines in 
KItsz' program are shown in 
Listing 2. The CMD vector ad- 
dress is 4173H. Listing 2 first 
sets up the patch to our pro- 
gram. M then decodes the argu- 
ment following the CMD, and 
finally calls the appropriate 
subroutine In the Babybeep pro- 
gram. The final return takes us 
back to the Basic program 
which continues from where it 
left off. 

With this and the Baby- 
beep programs in memory, you 
can generate a sound in the 
command mode by entering: 
CMDO. 

Even more useful, you can 
use the CMD command within 
any of your Basic programs. 
This simple program demon- 
strates some of the possibili- 
ties: 



10 PRINT "PHASER" 
20 CMDO 
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mDDEm-aa 

THE TRS-80* DATA COMMUNICATIONS SYSTEM FOR THE EIGHTIES 



• Direct connects to your 
home telephone jack 

• Installs In a minute 

• Program swapping mode 
plus terminal mode 

• All software. Included 




% 



<«% 






<* 

%> 



No RS232C Interface Is 

required 

Lowest price ever 



The MODEM-80 and your TRS-80 Model I Level 2 
disk or tape system make the perfect combination 
to maximize your data communications capabili- 
ties. 

This direct connect, auto dialing/answering 
modem will transmit programs and data between 
MODEM-80 equipped TRS-80 systems. In addition, it 
will transform your computer into a full-function in- 
telligent terminal. And, no RS-232C interface is re- 
quired, so tape-based systems do not need an ex- 
pansion interface. The result is the lowest priced 
data communications system of its type available 
anywhere. 

Program-swapping with your friends is a snap 
with the MODEM-80. Both machine-language and 
BASIC programs can be easily exchanged over the 
telephone line. And, accessing your favorite com- 
puter club bulletin board or any other Bell 103-type 
compatible time-sharing facility is no problem 
either. 

The TRS-80 to TRS-80 software, included with the 
MODEM-80, extends your system's BASIC language 
with 8 new communications-related functions. 
These can be easily incorporated Into your own 
BASIC programs allowing, for example, "computer 
vs. computer" competitions. BASIC programs are 
also provided which support disk, tape and memory 
transfer of programs and data, including automatic 
line error detection and re-transmission. This ap- 
proach combines function with flexibility, reliability 
and ease-of-use. 



When operating in the intelligent terminal mode, 
you have over 35 functions from which to choose. 
These include 8 user-definable function keys, baud 
rate selection from 25 to 300, forward and backward 
buffer scrolling, parity control, full and half-duplex 
operation, disk and tape file load and save, auto- 
matic dialing, parallel printer support. . .the list 
goes on and on. 

You can install a MODEM-80 on your system In 
one minute. The ribbon connector plugs into the 
back of your keyboard or expansion interface. 
Power is provided by your computer's power module 
so no additional 1 10 V outlets are needed. An exten- 
sion cable with standard miniature phone plugs is 
Included for direct connection to the telephone line 
and there is even a spare jack to plug in a phone, if 
desired. Since the TRS-80 bus is extended through 
the MODEM-80, you can leave the unit permanently 
connected and still plug in other devices as you ex- 
pand your system. 

The MODEM-80 complete with all software and User 
Guides is only U.S. $219.00** plus U.S. $5.00 for 
shipping, handling and insurance. We accept 
money orders, VISA and MasterCard. The 
MODEM-80 hardware has a 90 day manufacturer's 
warranty. 

INTRODUCING TOMORROW'S 
PRODUCTS-TODAY! 

"Subject to Canadian rate 
of exchange at time of purchase 



•TRS'80 is a 



maslei criarge 



TO ORDER CALL 41 6-923-7961 ANYTIME 

AND ASK FOR ICROM'S ORDER DESK 
t^'^^ OR WRITE 

W^ ICROM ENTERPRISES LTD. ^4o 

Yk\\»V 1240 BAY ST.-SUITE 505 

' ^' ^ TORONTO, CANADA M5R 2A7 




-' See List ol Advertisers on page 402 
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Program Listing 3. 








00100 


;*****• CUSTOMIZED COMMANDS ******* | 






00110 
00120 




DALE H. RUPERT 07/06/98 








00130 


I PROGRAM ALLOWS 


THE USE OF CMDfl 


THRU CHD9 IN BASIC 






00140 


;T0 CALL UP THE 


SOUNDS OF DENNIS KITSZ' BABYBEEP PRGM. 1 






08150 


;IN 


80 MICROCOMPUTING, 4/88, F 


. 68 






00160 














00170 


[SECOND PART OF 


PROGRAM ALLOWS 


THE USE OF CHDA THRU CMDZ 






80180 


;T0 CALL UP SUBROUTINES WITH ADDRESSES STORED IN TAB2 . 1 






00190 


J THE 


ADDRESSES 


ARE STORED WITH 


LSB riRST AND MSB LAST. 






00200 




FOR EXAMPLE, CKDA WILI 


CALL THE SUBRTN. 






00210 




AT LOC. 7D00H IF 00H IS 


STORED IN (TAB2+0} 






00220 






AND 7DH IS 


STORED IN (TAB2+1) . 






00238 




CHDB CALLS THE SUBRTN. 


WITH ADDRESS STORED 






00240 
00250 




IN {TAB2+2) AND (TAB2+3). 1 






00260 




CHDZ CALLS THE SUBRTN. 


WITH ADDRESS STORED 






00270 
00280 
00290 




IN (TAB2+50] AND fTAB2+51). | 














7E3B 




BB300 
00310 


I 


ORG 


7E30H 




7E30 


3A7341 


00320 


PATCH LD 


A,(4173H) 


;CMD VECTOR 


7E33 


324A7E 


00330 




LD 


(STORE) ,A 


J SAVE IT 


7E36 


2A7 441 


00340 




LD 


HL,(4174H} 


I ■ 


7E39 


224B7E 


0035B 




LD 


(STORE+l) ,HL 




7E3C 


3EC3 


00360 




LD 


A,0C3H 


;'JP ' 


7e3E 


327341 


0037B 




LD 


(4173H),A 




7E41 


214D7E 


00380 




LD 


HL,START 




7E44 


227441 


00390 




LD 


{4174H] ,HL 




7E47 


C3720B 


00400 

00410 




JP 


0072H 


;BACK TO BASIC 


0003 




00420 
00430 


STORE OEFS 


3 


;OLD VECTOR STORAGE 






00440 


J** DECODE CMD 


THRU CHD 9 


*• 






00450 


; 








7E4D 


E5 


0046B 


START PUSH 


HL 


;SAVE BASIC POINTER 


7E4E 


D5 


00470 




PUSH 


DE 




7E4F 


F5 


0B480 




PUSH 


AF 




7E50 


FE30 


00490 




CP 


30H 


;IS ARG. < ■0'7 


7E52 


P25B7E 


B0500 




JP 


P,OK 


;N0. CONTINUE 


7E55 


Fl 


00510 


QUIT 


POP 


AF 


.■RESTORE REG'S. 


7ES6 


Dl 


00520 




POP 


DE 




7E57 


El 


B0530 




POP 


HL 


.•RESTORE HL 


7ES8 


C34A7E 


0B540 




JP 


STORE 


;USE OLD VECTOR 


7E5B 


FE3A 


00550 


OK 


CP 


3AH 


fIS ARG.>ASCII"9"7 


7E5D 


F26C7E 


00560 




JP 


P,GT9 


lARG. > 9 


7E60 


D630 


00570 




SUB 


30H 


;GET VALUE 0-9 


7E62 


218F7E 


BB580 




LD 


HL, TABLE 


(START OF TABLE 


7E65 


85 


80590 




ADD 


A,L 


J GET TABLE POSITIOH 


7E66 


6f 


00600 




LD 


L,A 




7E67 


5E 


00610 




LD 


E,(HL] 


;GET LSB 






00620 


; PUT MSB INTO D REG. IN THE 


NEXT LINE I 


7E68 


1670 


00630 




LD 


D,7DH 


; (BABYBEEP STARTS AT 7D00H) 


7E6A 


1818 


08640 
00641 


I 


JR 


GO 


;SBTRN. ADDR. IN DE 


7E6C 


FE41 


0B642 


GT9 


CP 


'A' 


; VALID ARG.? 


7E6E 


PA557E 


00643 
00644 




JP 


M,QUIT 


jOUIT IF NOT 






00650 


J** DECODE CMD 


A THRU CMD Z 


t • 






00651 


; 












00659 


;*** 


3HANGE THE 


COMPARISON BYTE 


IN THE NEXT LINE TO EQUAL 


2 •*• 












7E71 


FE42 


00660 
00661 


! 


CP 


'B' 


;VALID ARG.? 


7E73 


CA797E 


00662 




JP 


Z,0K1 


I ARG. IS VALID 


7E76 


F2557E 


00670 




JP 


P,QUIT 


f INVALID ARG. 


7E79 


D641 


00680 


OKI 


SUB 


41H 


;GET 0-25 FROM A-Z 


7E7B 


07 


00690 




RLCA 




; DOUBLE IT 


7E7C 


21997E 


00700 




LD 


HL,TAB2 


; START OF TABLE 2 


7E7F 


85 


08710 




ADD 


A,L 


; TABLE POSITIOH 


7E80 


6F 


BB720 




LD 


L,A 


iHL HAS TABLE LOC. 


7EB1 


5E 


00738 




LD 


E,(HL) 


I GET LSB 


7E82 


23 


00740 




INC 


HL 




7E83 


56 


08750 
00760 


, 


LD 


D,(HL) 


;GET MSB 


7E84 


218A7E 


00770 


GO 


LD 


HL,NEXT 


iRETURN ADDR. 


7Ea7 


E5 


80780 




PUSH 


HL 


;SAVE IT 


7E88 


D5 


80790 




PUSH 


DE 


jSET UP INDIRECT... 


7EB9 


C9 


00800 




RET 




I SUBROUTINE CALL 


7EBA 


Fl 


0B810 


NEXT 


POP 


AF 


; RE STORE REGS. 


7E8B 


Dl 


00820 




POP 


DB 




7Eac 


El 


00638 




POP 


HL 


fRESTORE BASIC POINTER 


7E8D 


23 


00840 




INC 


HL 


I NEXT LOCATION 


7E8E 


C9 


00850 
00860 


} 


RET 




;BACK TO BASIC 






00870 


,*** 


USE THIS 


TABLE FOR SUBRTNS. IN SAME PAGE OF MEMORY *•* 






00880 


f 


TABLE STORES LSB : D REG, CONTAINS MSB (7DH) 






00890 


; 








7E8F 


00 


00900 


TABLE DEFB 


00H .-PHASER CHDB 


7E90 


14 


00910 




DEFB 


14H ; BEEFS 


CHOI 

Program continues 
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30 PRINT -SOME OTHER SOUNDS ■: 

CMD1:CMD3:CM03 
40 CMD7 : PRINT 'HOWS THAT!!!' 



Total FlBxIbillty 

Two Shortcomings ot the pre- 
vious program are: the eight 
decoded arguments are already 
used, and all the addresses 
must be in the same page of 
memory, that Is, the most signif- 
icant byte of each address Is the 
same (7DH). 

One final modification of the 
argument-decoding and table- 
lookup scheme will make this 
program even more useful. If all 
of our machine language sub- 
routines are not In the same 
page of memory, we need a two- 
byte address table to locate 
them. Listing 3 allows us to 
create such a table. Fur 
thermore, this program may be 
used with Disk Basic. 

This program decodes argu- 
ments 0-9 (used with the 
Babybeep subroutine) and argu- 
ments A-Z. For arguments A-2, 
the program calls the subrou- 
tine identified by the two-byte 
address in the second table 
(TAB2). For the example shown 
in Listing 3, CM DA calls the sub- 
routine at 7D00H, and CMDB 
calls the subroutine at 7D14H. 
After executing the subroutine, 
the computer jumps back to 
Basic for the rest of the pro- 
gram. 

The Inner Workings 

Let's take a brief look at 
Listing 3. First read the com- 
ments and get an overall view 
of it. 

Decoding arguments A-Z be- 
gins at line 650. A Is stored as an 

ASCII 41 , B is 42 and Z is 5A 

with all numbers In hexadeci- 
mal. Subtracting 41 H from each 
value gives a range from 0-19H, 
or 0-25 in decimal. Doubling this 
result (line 690) allows two 
places in the table for each argu- 
ment's address. Thus, positions 
zero and one correspond to A, 

two and three are for B and 

50 and 51 Iwiong to argument Z. 

After adding the table's start- 
ing address to the argument's 
value (line 710), the program 
puts the least significant byte 
(LSB), then the most significant 
byte (MSB), into the DE register 
pair. 



ELECTRIC SPREADSHEET 



NEW Considering VIsiCalc"? 

ELECTRIC SPREADSHEET does everything you can do 
with a pencil, paper and calculator. Start with a blank 
screen. Move the fast cursor to desired location. Enter line 
or column labels or data. Select preprogrammed operators 
for line, column, or cell calculations. Run. Results appear 
on the screen, formatted for your printer. Revise. Run 
again. 

PREPROGRAMMED OPERATORS for mathematics, 
finance, and statistics. Save data on tape or disk. The 
screen is your window to a larger spreadsheet. Output 
features scrolling and split-screen. Variable formats for 
labels and data. 

UNLIMITED APPLICATIONS. P/L forecast. Personal 
budget. Real estate investment. Net worth forecast. 
Invoice, Cash flow estimate. Sales analysis. Check record 
Business forms. 

16K version has 50 operators. 32/48K version has 70 
operators plus histogram plot, remote storage of data, 
global revise spreadsheet layout, alpha entries, and more. 

16K Model I or III Tape $34.95 

32/48K Model I orlll Tape $64,95 

48K Model III Disk $67.95 

YOU CAN'T LOSE! Calif, orders add 6'/.% tax. 

VIsiCalc is a trade mark of Personal Software, Inc. 



Dan G. Haney & Associates. Inc. ^4m 
P.O. Box 687. San Mateo, CA 94401 

(415) 493-4094 
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NOW. . -Continuous Checks 

That Can be Used With or Without Your Computer'.' 
The Best in A Home Checking System 



Thais iighl Continuous Checlis tan-loldoa in 
a 3-<o-B-aiige desk sel design. Anil Ihev can be 
computer printed, handwritten or lype^itten 
— whichever suns ihe quantity or situaTlon 

SPECIAL DESIGN 
Our checks are not a high-volume business 
form adaptation. They're specially designed 
Computei/Manuil Checks for Ihe home 
user And they re e»iy to use, too No need to 
change printer Torm width when loadmg. Our 
checks are the same 9Vi" width as standard 
trsclor teed printer paper Check tear down 
siie IS the same as Ihe classic perionai-siied 
check issued by all banks 

COMPLETE HOME SYSTEM 
With this system you can print the bulk ot your 
monthly checks on your computer using our 
program. Your ch«cki and stubs can then be 
stored in our attractive Data Ring Binder 
Checkbook. Later, il you have a few checks to 
write, there's no need to load them into a 
punter - just write a check at your desk as 
shown above And you can mail your checks in 
□ ur dual wirvlowed envaiopei to eliminate 
addressing chores 

UNIQUE 
You won't find cominuoua checks like these 
anywhere. And, our special small quantity 
prmiing process will give you excellent qu»lity 
and appearance Standard color-coofdinited 
imprinting arid encoding is as shown above 



I be omiitedl on blue, a'«¥. green, or 



bu" Checks ppicED RIGHT 

Two Hundred checks are jusl $29.95 lenve- 
lopes S14.95) Five Hundred checks are 

*49.95|envelopesS27 9S| Oata Ring Ctieck- 

Qooks are only S4.95. 

Special "ORDER NOW" Of(er 
So that you can slart using your computer 
immediately to pay your monthly bills, we'll 
make you a special package offer If you order 
directly from this ad, we can send you 

ZOO Checks, 100 Envelopes. A Binder, 

and Program for $49.95 

— OR — 

GOO Checks. 300 Envelopes. A Binder. 

and Program tor »74 95 

You'll save as much as B9.85 over the 
separate purchase price And with The special 
package you can t>egin your monthly check- 
book balancing and bill paying as soon as you 
receive your checks Just enclose a voided 
check |lor encoding intormationl with your 
payment {VISA MasterCard orders must 
show signature, expiration date, and account 
number) Or, send today for samples 

SYNERGETIC '^''^^ shepherd ro 
SOLUTIONS °"tZ"^!*l" 

PHONE IS13I 6*6.6557 MULBERRY. f-L iJ8(>0 



TRS-80 OWNERS 
^^ REJOICE! 




Our profnsiotial qualty software 
dsvetopment tools let you progrant 
your TRS-dO with more use and 
— mr than you ever imagined posd- 

. Ftograraniig «il become i 
ptanira whan wu ate our full 
ssraMi editon. These edflors are ns( 

: patched up word processors. 

« hiM bMn ipMteMy designed to 
•Mllinct tbi BASIC ml ASSEMBLfR 
png m MWIwa Iwouogw. Our 
itMnUen provm u scroen option 
menus to reieve you of the bunton ol 
rememtwhng command rumes. Com- 
bine user oriented features like tttis 
wftti the finest and most extensive 
documentation in ttie mdustry and 
you wil see why programming a 
TRS-80 is now better itian ever 
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MZAL: "^ DISK EDITOR/ ASSEMBLER: 
H»duiat AsitffiWer Lanouagi (Mtfttowrtm 
lytlM induOss Ail scrwi Md tdOof. iliMi- 
l»n auenblv. ani ckfed madnle lieliv. 
AlOM > Oanmt ty«Mi mm) uurci Mi 
clMli*i|/Mtl»n| <nm 'tllCLUDE «# Fui 
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Oiik syMa 
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lipM Uus •fliy 2 SK aaa caa be 
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Program continued 














7E91 


34 


00920 




DEFB 


34H 


DOODLES 


CHD2 


7E92 


57 


00930 




DEFB 


57H 


FANFARE 


CHD 3 


7E93 


B8 


00940 




DEFB 


0BSH 


SIREN 


CHD 4 


7E94 


DF 


00950 




DEFB 


0DFH 


1 BLOOP 


CHD 5 


7E95 


ED 


00960 




DEFB 


0EDU 


1 BLEEP 


CHD6 


7E96 


FB 


00970 




DEFB 


0FBH 


RASPBERRY 


CMD7 


7E97 


00 


00980 




DEFB 


00E] 


PHASER 


CHD 8 


7E98 


00 


00990 
01000 




DEFB 


00U 


PHASER 


CMD9 






01010 


I TAB 2 


STORES 


LSB TBEN MSB OF ADDRESS 1 






01020 


; 










7E99 


B0 


01030 


TAB2 


DEFB 


00H 


LSB CHD 


A 


7E9A 


7D 


01040 




DEFB 


7DH 


MSB 




7E9B 


H 


0105B 




DEFB 


14H 


LSB CHD 


B 


7E9C 


7D 


01060 
01070 




DEFB 


7DH 


HSB 








01080 


J EXTEND THIS 


TABLE AS NEEDED FOR HORE SUBRTN. ADDRESSES 1 






01090 












7E30 




01100 




END 


PATCH 


STARTING ADDRESS IS 'PATCH' 



An Underhanded Call 

The section labeled Go is the 
least straightforward part of the 
program. We have the address 
of the subroutine to be called in 
DE. Unfortunately, there Is no 
CALL (DE) command for the 
Z-80. But the solution is not dif- 
ficult: Put the DE address onto 
the stack (PUSH DE), then exe- 
cute a return statement. 

Consider what the return 
statement does, tt POPs the 
two-byte address from the top of 
the stack Into the program 
counter, and the computer 
jumps to that address. But once 
we've gone to the subroutine, 
how do we get back? 

A normal Call would PUSH 
the return address onto the 
stack before jumping to the 
subroutine. Now we must do 
that. 

In line 780, we PUSHed the ad- 
dress labeled Next onto the 
stack. In the meantime, the DE 
address has been PUSHed and 
popped, so the Next address Is 
now on top of the stack. The 
return statement in the called 
subroutine POPs the Next ad- 
dress and jumps back to the 
calling program. 

Finally, the Basic pointer, 
which we PUSHed In line 460, is 
restored to the HL registers and 
the other registers are restored. 
The final return statement 
jumps back to Basic. 

I normally load this program 
when ! first start up the comput- 
er. Answer the memory size 
question with 32513 (7F01H) or 
less. Type and enter: SYSTEM 
and MERGE. Once the program 
is loaded, type and enter '7". The 
first part of the program im- 



mediately toads the patch and 
returns to Basic. 

Now whenever you wish to 
merge two Basic programs fol- 
low this simple procedure: 

• Have the first program in 
memory. 

• Type and enter: MERGE. The 
ready signal quickly appears. 

• Type and enter: CLOAD to 
load the second program. 

• Type and enter: MERGE2 
when it is done loading. 

Now your two programs are 
one. Note that the line numbers 
of the second program must be 
higher than those of the first 
program. 

We have created a new com- 
mand for our computer. Once its 
code Is in memory, you may use 
it as any other command. This 
routine Is so simple and so use- 
ful, you will wonder why it was 
not part of the original com- 
mands. 

Adding Versatility 

The simple decoding scheme 
In the Merge routine allowed on- 
ly two subprograms to be distin- 
guished. A more selective meth- 
od for decoding the argument 
would greatly enhance our use 
of the built-in Disk Basic com- 
mands. For example, we could 
use the CMD command with a 
one-character argurrwnt (CMD3, 
CMDF, and so forth) to call 36 
different subroutines (0-9 and 
A-Z). 

As an example, we will use 
the CMD command to call up 
various sound-generating sub- 
routines. Dennis Kitsz' article, 
"Babybeep" (80 Microcomput- 
ing, April 1980) tells how the 
TRS-80 can produce a variety of 



sounds. By using Kitsz' sound 
subroutines along with the 
customizing methods In this ar- 
ticle, we will be able to produce 
a Phaser sound as easily as typ- 
ing CMDO. 

Make it WorV 

I suggest you put Babybeep 
into memory from 7D00H to 
7E2FH. Then enter Listing 3 Into 
locations 7E30H to 7E9CH. To 
make a System tape with T-Bug, 
type: P 7D00 7E9C 7E30 
CUSTOM. Use memory size 
31999. 

You later change the values in 
TAB2 to call your own custom 
commands. As written, CMDA 
and CMDB generate the phaser 
{7D00H) and beeps (7D14H) re- 



spectively. 

For readers who are not as- 
sembly language enthusiasts, I 
have Included Basic programs 
In Listing 4. These may be used 
in Level II only, not Disk Basic. 
They POKE the Merge routine 
(Listing 4a) and the CMD 0-7 
routine (Listing 4b) into memory. 
Once the Basic programs are 
run, they delete themselves. The 
routines remain in protected 
memory, however, until the 
power is shut off. 

A Challenge 

This article has developed a 
procedure that creates addi- 
tional Basic commands and 
functions. The format of Listing 
3 may be used in either Level II 
or Disk Basic. There are also 
many other Disk Basic com- 
mands available. 

You could further customize 
your TRS-80 with a screen-fill 
command, a decimal/hex con- 
verter, a pause command, a reg- 
ister display command, a search 
function. 

You could also write routines 
which manipulate, rather than 
merely decode, the arguments. 
How about a memory dump 
called by CMD D 4200,4500, for 
example? Or CMD V 2.8 which 
clears lines 2-8 of the screen? 

You are no longer limited to 
the Level II Basic commands! ■ 



1 '••• CUSTOMIZED COMHAHDS *•• 

4 ' 

5 ■ MERGE ROUTIHEt HEH . SIZE? 32522 (OR LESS) 

6 ' 

10 POKE 16780,11: POKE ]6781,127 'PATCH 
15 FOR H-32523 TO 32546: READ B: POKE H,B: NEXT 
20 DATA 126,133,32,11,42,249,64,43,43,34,164,64 
25 DATA 195,114,0,33,233,66,34,164,64,195,114,0 
30 DELETE 1-30 

Program Listing 4. 



'*•• CtJSTCWIZED COMMANDS **• 
I 

'LEVEL II BASIC VERSION CF LISTING 2: CMD0-CMD7 
' YOU HUST HAVE BABYBEEP IN MEMORY 

BEFORE USING CHD0 THRU Ct(D7 



10 POKE 16756,57: POKE 36757,126 'PATCH 

15 FOR M-32304 TO 32350: READ B: POKE M,B: NEXT 
20 DATA 33,57,126,34,116,65,195,114,0,35,229,254 
25 DATA 48,250,85,126,254,56,242,85,126,214,46 
30 DATA 33,87,126,133,111,94,22,125,33,85,126,229 
35 DATA 213,201,225,201,0,20,52,87,184,223,237,251 
40 DELETE 1-40 

Program Listing 4a. 
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PORTFOLIO MANAGER 
TRS-80 

FOR COMPLETE PORTFOLIO MANAGEMENT: 

• Fast!!! Auto-Retrieval Of Market Quotes 

• Instan t Updating Of One Or More Portfolios 

• Handle Any Combination of Stocks, Options, 
Warrants, Bonds, or Mutual Funds 

(Long and Short Positions) 

• Printed Analysis of Each Position to Show: 

• Current Market Value 

• Value Change from Previous Day 

• Current Gain or Loss 

• Listing of All Ouotes Retrieved 

• History File to Maintain Detail Record of AM 
Closed Positions 

Please send more information about 
PORTFOLIO MANAGER to: 

Name 



T.M. 



Address. 
City 



State_ 



.Zip. 



Mail to: 

Market Management Systems »^ 583 
P.O. Box 40049 
1080 Madison Auenue 
Memphis, TN 38104 

Or Call Toll Free 1-800-238-7626 
(In Tennesses 1 901-527 8262) 



GOSGB 



GOSUB'S MXBO/70 FRICTION FEED KIT 
ONLY $49.95 ppd 

The Gosub MX80/70 Friction Feed Kit for the Epson MX80 

printer will give you complete paper conirol- 

You gel easy to follow instructions and all parts necessary 

to give your epson friction feed capabilities. 

No drilling and it installs in about 15 minutes. 

Money back guarantee if not satisfied 

PLUS; 

• USE SINGLE SHEET PAPER 

■ USE INEXPENSIVE ROLL PAPER 

• USE YOUR OWN LETTER HEAD 

■ FREE PAPER ROLL RACK INCLUDED WITH KIT 
' DOES MOT AFFECT PINFEED USE 



PRINTERS: EPSON MX80. ISIS 

STRATEGY SIMULATIONS 
MERCENARY FORCE 

Command a mercenary 
army. Decide the number ol 
men. type of weapor>s, 
armof, air support, medical 
aid and Iransporls. Battle 
the enemy In jungles. 
underwater, on moons and 
In space. 0-4 players) 
TR&aO L2 ieK .I1S.K 



EPSON MX100 .IS50 

FOR THE TRS-BO 
SPACE MERCHANT 
Build an Empire In the 
stars. Choose your cargo. 
means ol snipping, and 
security. Risk pirates, Ion 
Storms, eriglne Failure and 
olhar hazards while you try 
to become a Space 
Merchant (1-6 players) 
TRS40 L2nSK M.K 



KANSAS WS ADO J» SAlii TAX (ISS-BU IS A IRADEMARK (» TANQ^ COIP I 

All P«4CtS SUBIIL' TO CMANCl WIIHOUI MOKCl rMi CAIAIOC U«W lEQUIIT 

^k^k MND CHtCK Ol MONf y OlDf ■ TO: 

^ GOSUB 

P.O. BOX S7M; (318) 2es-MB2 



^^2M 



WICHITA, KS 67201 



STOCKCHART ■ 

MORE THAN JUST A COMPUTER PROGRAM 

IT'S AN INVESTMENT TOOL 



"written for TRS 80" model! 
■requires 16K RAM for cassette. 32K 

RAM & 1-drive for disk version 
•primer option 

•disk version S50.00 

■cassette version . $30.00 

to order, send check, money order, or COD 
to: 

<P^ys^ Micro- Investment Software 
Ml 5 9621 Bowie Way 
^— Rmm Stockton, CA. 95209 ^ «q 

APPLE W & ATARI-800" version available 
soon, write lor more information 

■ TV ol Ttntit Co't) ApflJe Compuifi am'j 'eioecrive'y 



ii' 



fi li'f 



!l.i , 



il '■! 



,!i|!!i 



,;!!! 



■ ',A 



• generate price-chart from HIGH, LOW, & 
CLOSE PRICES 

•price-trend analysis assist investors tn 
BUY/SELL decision 

• auto scaling for price-chart generation 
•accept fractions, allow users to enter 

prices as appear in newspapers 

• SPLIT routine to ad|ust prices for stock 
split 

• EDIT capability (or users to change 
price data 

• STATUS mode to display price-trend 
signals 

• PURGE utility to detele unwanted data 
from disk (disk version only) 



GET THE PRICE - TREND PICTURE 



WITH 



STOCKCHART ■ I 



DEALERS INQUIRIES INVITED 



•See Lisl of Atfvertisers on page 402 
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TUTORIAL 



Some tips on remaining so \Kfhen in the mode. 



In Command 



Jerry Rutfedge 

Box 123 

Waseca. MN 56093 



How powerful a tool can the 
command mode be? Re- 
cently I was writing a program 
that would be used only one 
time. It Involved two different 
lists of 275 Insurance agents (by 
four digit agent code numbers, 
like 1473). Some agents ap- 
peared on both lists and on one 
of the lists, some agents ap- 
peared as many as three times. 

The idea was to sort through 
the two lists and delete all of 
the numbers that appeared 
more than once and find out 
who on the second list was not 
on the first list. Since the lists 
were not in numerical order, I 
figured It would be quicker to 
write a short program and Input 
all 550 numbers Into data 
statements than attempt to go 
through the lists manually. 

It would have been, too, ex- 
cept that my novice program- 
ming ability got in the way. 
When you're writing your own 
sorting or comparing program, 
the TRS-60 is not the fastest 
computer In the world. Con- 
sider that this program was 
comparing one array of 275 
elements with another of equal 
size. That means between 
50,000 and 75,000 compari- 
sons— a process that took 
about an hour. 

The sort went without a 
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hitch, and as I sat waiting for 
the printer to begin the final 
printout, there suddenly ap- 
peared on the screen one of 
those ghastly, dreaded error 
messages: 

SUBSCFUPT OUT OF RANGE IN 2640 

I made three attempts to detect 
where I had gone wrong in 
dimensioning those arrays. 
Each re-run meant a one hour 
wait for that dismal sort, and 
each time the same error 
message happened. When It 
appeared the third time, I did 
not immediately return to the 
edit mode to took at line 2640 
again. Had the computer done 
the sort properly? Were the new 
arrays loaded properly after all 
of those doubled up numbers 
had been deleted? Why not ask 
and see? So I entered: PRINT 
A(275).5260. Voilal There It was 
just waiting to be printed out. If 
the computer will print on the 
screen In command mode, why 
won't it LPRINT the same way? 
Well, It will: LPRINT A{275). And 
sure enough, the printer clacked 
out 5280. 

Thoroughly frustrated at this 
point, I figured nothing could 
be worse than sitting through 
another sort, so I began 
LPRINTA(l), then LPRiNTA(2), 
etc. After typing that command 
atnut five times another thought 
struck me: Would the command 
mode respond to a For . . . Next 
statement and multiple com- 
mands? Only one way to find out: 
FOR X = 1 TO 10:LPRINTA(X): 



NEXT X. Sure enough, out came 
the first 10 numbers. The rest 
was easy. 

Since some of the array 
elements were equal to zero 
(their numbers having been 
deleted In the sorting process) I 
did not want to print those. I 
also wanted the list numbered 
so I didn't have to count the 
printed lists. Could all that be 
dons In one set of command 
mode statements? You 
bet . . . here's how it looked: 



C-1: FORX-1T0275: IFA(X)-0THEN- 
NEXT X ELSELPRINTC,".';A(X):C=C+1: 
NEXTX 



In less than two minutes I 
had my listing that I had been 
sweating for over four hours. It 
took about 30 seconds more to 
rewrite the command to print 
out array B, and another two 
minutes to print it. 

I quickly typed New to wipe 
out any lingering memory of the 
experience. Later, mellowed by 
a couple of cans of beer, it oc- 
curred to me that it had been a 
valuable learning experience. 
Almost any string of com- 
mands can be used In the com- 
mand mode provided they don't 
exceed the 256 byte limit. 

Bewar* of the Edit Mode 

Like all good things, there Is 
a caveat and a limit to using a 
trick like this. There are at least 
two Level II situations where 
your '80 will set all of your 
stored variables back to zero. 
One Is when you type Run and 



begin a program, and the other 
Is when you execute into the 
edit mode. 

Thus, if you are running a 
program which crashes on an 
error where your computer 
automatically puts you in the 
edit mode (such as a syntax 
error), your variables are auto- 
matically set back to zero and 
this trick will not work. 

A Fix 

If you like to hedge, there is a 
simple way to avoid the auto- 
matic execution into the edit 
mode when errors occur. For ex- 
ample, suppose you have writ- 
ten this simplistic program: 



10 INPUT A,S,C 
20D = A*B*C 

3oe.dk; 

40 PRINTE 



Take the program listed alcove 
and change line 40 so there will 
be a syntax error 40 PLINTE. 
Now run the program. There's the 
syntax error, big as life, and 
you're left In the edit mode on 
line 40. Hit Enter so that you are 
back In the command mode 
and see what happens when 
you ask: PRINT E. 1. See, you've 
lost everything, right? Now add 
the following two lines to your 
program: 



S ON ERROR GOTO 1000 

1000 PRINT-ERROR" 

(Enter and Run) 

RUN 

?2A4 

ERROR 

NO RESUME IN 1000 



AHENTION 
COMPARISON SHOPPERS 

HOW DOES A $299 BYTEWRITER-1 
STACK UP AGAINST A $650 EPSON AAX-80? 

YOU DECIDE! 



FEATURES 



BYTEWRlTER-1 



EPSON MX-80' 



The Only 80 Column Dot 

Matrix Printer Under $300. 

Why do we dare to compare the 
Bytewriter-l to the Epson MX-80, 
the industry leader? Because we 
feel strongly that dollar for dollar, 
the Bytewriter-l is tough to beat for 
performance and quality. 

Our extensive testing has proved 
that the Bytewriter-l interfaces 
problem-free to the TRS-80, the 
Apple II and the Atari 400 and 800. 

We are not going to tell you that the 
fiytewriter-1 is better than ihe 
MX-80, but by comparison, and for 
half the cost, you get more than a 
reliable printer — you get a great 
value. 

Call or write for more information 
today. 

Comparable features. 
Uncomparable price. 




60 lines per minute 



Friction feed 
original plus 3 copies 



Black, cartridge $9.95 



Life 
expectancy 



Pr}nlh«ad — 100 mittion char. 
Drive Mech.— 10 million char. 
Ribbon •— 5 fliiliion char. 



rviicnoTEK<«^ 

9514 Chesapeake Drive 
San Diego, CA 92123 
(714) 278-0633 
Outside CA call 
TOLL FREE (800) 854-1081 
TWX. 910-335-1269 



TRS-80 is □ Irodemork of Radio Shock, Div 

of Tandy Corp. 
Apple II is a trademark of Apple Computer, 

Inc. 
Atari 400 & 800 are trademorlcs 

of Atari, Inc. 



46 lines per minute 

Pin feed 

original plus 2 copies 

Block, cartridge $14.00 



50 — 100 million chor. 
5 miMion char. 
3 miHion char. 




Now you know that there was 
an error in your program and 
you have also created a No 
Resume error in line 1000. But 
note that this error has not 
automatically put you back in 
the edit mode. 

Now try the command. Print 
E (or D, A or any of the other 
variables), and there they are. 
Note that the Prlnf'Error" line 
must be the last line of your 
program. Even adding the word 
End to line 1000 will put you 
back in the edit mode! 

You're probably saying to 
yourself at this point, "That's 
fine for a small program like 
this one, but if my program fias 
250 lines in it and there is an 
error, how would I know if 
enough of the program has ex- 
ecuted that I could retrieve all 
the variables in the command 
mode?" Good question. And 
there is an answer. 

In your Level II Reference 
Manual there are two error- 
routine functions, ERR and 
ERL, and up to now they looked 
to me like interesting but 



relatively useless functions. 
ERL returns the line number in 
which the error occurred and 
ERR returns the code number 
of the error. So, let's change 
line 1000 to read: 



1000 PRINT-ERROR UNE";EBL," ER- 
ROR CODE";EHR/2 + 1 
(Run) 
? 2,3,4 

ERROR LINE 40 ERROR CODE 2 
NO RESUME IN 1000 



And there you have it, a syntax 
error in line 40 without being 
dropped Into the edit mode 
(look up the error code number 
in the Appendix). In Disk Basic 
there may be a way of printing 
out the actual error message 
using the Error function 
described on page 7-6 of the 
Disk Manual, but so far It has 
eluded me. 

At any rate, perhaps you 
have discovered some ideas for 
different ways to use the com- 
mand mode. If you're lucky, you 
may never need to use them, 
but there Is a lot of power there 
at your fingertips. ■ 



MAKE YOUR WORD PROCESSOR OO 
THE THINGS YOU BOUOHT IT TO OO 



SCRiPSrT LAZYWRrTER 

VOU UKE WHAT THEV OOI NOW . 



ELECTRIC PEMOL 

. maks tham do nwn moral 



AUTO-WRITER: the ultimata typing aid for the computar 

for: SALEB MANAGERS: kMp • custonMr list (by utoaman] 
SEim lAMES: sand out cuatomizad form laCtara 
BOOKKEEPERS: prapara raporta for tha boaa 
WRITERS: maintain, organiza and aort bibliograplMaa 
BOSSES; craata raporta and aort data ttlaa 
CLUB REPORTERS: mail out tha nmva lattar 
OFFICE MANAOERS: t^e tha load off tha MINI 
OUR BXTKiyBIWE [lOCUMENTATION BHOWS vau HOW VOU CANi 

• Uaa YOUR WORDPROCESSOR to craaca and maintain a mailing list or 
any data baaa. 

• Join that mailing Mat ta a torm-tattar with a wida ranga ol optiona. 

• Sort your Nama £ Addraaa tilaa by any kay, avan nuhan tha laat nama or 
(ip coda ara buriad in a lina ! 

• Sort 1000 "NAMES". Uaa up to SO itama par nama. 

■ Inaart into tha text of ■ torm-latter or raport conwnand linaa that Mrill 
changa tha printing format from ona lina to tha naxt ... in mid 
run. . EVEN WHEN UBIlua EUCTRIC PENCIL TO CREATE YOUR 
F1LESI 

• Uaa tha binlt-in Wordprocaaaor to odtt a lattar, or, CREATE a wholly 
now lattar or raport — and — itora tt in a tila that is losdabia by your 
Wordprocaaaor. 

• Paraonaliia (arm lattaraaa you runi Inaart "kays" [words or phrasas] 
FROM THE MAILING LIBTI Automatically inaart a nama or titia or a 
commant. sy^""" 

• Inaart any phraaa from tha kayboard. ,ft *^^ 2 '""* 

• STOP automatically for manual ahaat faad! ■ '^0'"'''" 

• SET spaca for AUTOMATIC shaat feada. '^ 

■O COMPOnTAHl-e to UBE that VOU can ■■ UP AND RUfUNINa 
MINUTKB AI^TKn RECEIVIISIO VOtJR SVHTKMS PACKAOS. 



■POR TRSaO I & 111. LOOS TRSOOS NEWOOS. NEWDOSeO. LTC • 
■ ■ -SPECIFY WHEN DRDEWNG WHLTHtB MODEL I or MGOEL HI" " " 



-578 



Vsa and Mastpridn) accepted 
NOW AVAILABLE FOR 17? B3 [tor reaibcnts of Mmesota add 5\ sales M>1 
Prce inckxles entire software pacVage. eiten&ve documentalioii arti shpping *ich*i USA 

Midwest Data Systema 

a business commutiication corr^oanv 

JlOQ tT-at avenuB norUi, minoeapo^'S. mnnesata 55401 — (B12| 33B-4615 



yWCROCOMPUTiR 

TECHNOLOGY 
NCORPORATH) 



TRS-60® MOD I 
TANDON DISK DRIVE 

comes complete with 
power supply, chassis, 
ONLY 
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• Mod III Internal disk drive kit: 
A new lowcosf inrernoi disk kit is ovoiloble ro expand 
your srorage copobiliiy. Wirh rhis kir now, you moy 
expend your 16K TRS80q, Mod III compurer up ro 
four MTI 40 rrock disl^ drives, giving you 175,000 
bytes of sroroge per drive for o rorol of 700K byres. 

The kir includes one 40 rrock disk drive, conrroller 
16Kmemory, power supply, cables, mounringhord- 
wore ond insrollorion documenrorion. 

40 track Dual head 40 rrock 

Drive #1 *695 Drive #1 *779 

Drive #2 ^279 Drive #3 *369 



00 track 
Drive #1 
Drive #2 



Duol head 00 track 

*769 Drive #1 *929 

399 Drive #2 *569 



• 4MH2 Mod III Speedup enchancement 

Doubles rtie processing speed of rhe Mod 
111 systems. 

With computer purchase: M49 



Retrofit 



M99 



SOFTWARE SALE 

Integroted Business Package *199 

Disk & System Diognostic Mod III *49 

Memory Kir (16K) *43 

Disk Head Cleoner Mod IN ^24.95 

Diskettes Verixitim (10) hard ring 5" ss *30 

. TRS-80® Model III DOS 
and Monual 



'24.95 



^28 




MICROCOMPUTER 
TECHNOLOGY INC. 

3304W.AAACARTHUR, 

SANTA ANA, CA 92704 

• (714) 979-9920 • 





[MasterCard] 


L A J 




US PRICES 

F0D5ANTAANA 

CALIFOf\NIA 



TTXS-flO IS O HeqiMered rrodemork O* Rodio Shock 



302 • 80 Microcomputing, November 1981 



IF YOU CAN RECOGNIZE 
VALUE, YOU CAN SAVE; 

$5QQ00 l««-««B^ 

M.T.I. 

MOD III PLUS 

Now You Con Save 

S500 over comparable model. 



$1996 



We hove token the bosic 16K Model III exporxJed 
rhe mennory ro 46K ond odded our MTI Double 
Density, Duo! Disk Drive system. System Is fully 
compotible with Radio Shock DOS ond peripherols. 



MOD lll/EXPANDED 

Some OS obove bur hos double sroroge copociry C70fi sroroge) 
Your choice of 2 duol headed 40 n-ocl^ drives or 2 single heoded 
flO frock disk drives 




»2499 



MOD 111/280 

Our lorgesf MOD III, opproximcrely 1 .5 mega byres of sroroge, 
urilizes 2 duol heoded flO rrock, double densiry disk drives. 
Complere wirh monuols ond professJonol operaring sysrem, 
Microsysrems DOS plus 0.3 



>2799 



MTI MOD III, SALES, PARTS (j SERVICE CENTERS-INDEPENDENT DEALERS 



PHOENIX. AZ (602) 244-9709 

SIERRA VISTA AZ (602) 458-2479 

TEMPE. AZ (602) 839-0546 

TUC50N, AZ (602) 323-9391 

ANAHEIM, OV (714) 773-0240 

COVINA CA C213) 332-4088 

HOLTVILLE, 0\ (714) 356-5185 

INGLEWOOD. CA (213) 673-3295 

LANCASTER. O (805) 942-5747 

OXNARD, CA (805) 486-5837 

SAN DIEGO, CA (714) 275-4243 

SAN X)SE, CA (408) 946-1265 

SANTA CRUZ, CA (408) 427-0836 



WALNUT, CA (714) 594-631 1 

FORT COUJN5, CO . . . (303) 221-1 776 

GROTON, a (203) 445-5166 

HOU.YWOOD. FL ....(305)981-1011 

GEORGIA (404) 449-8982 

KAILUAHI (808)261-6596 

IDAHO (208) 785-1497 

5HREVEPORT, LA (318) 865-7189 

JOPUN, MO (41 7) 781 -1 748 

MJDWEST (618) 345-5068 

AAISSOULA MT (406) 549-971 5 

RALEIGH. N,C (919) 755-1 175 

JERICHO, NY (516) 997-8668 



AAANHASSET, NY (516) 869-8335 

NEW ROCHELLE, NY . . (914) 235-4444 

TROY NY (516)273-6411 

N 6 S DAKOTA (701 ) 594-5674 

CLEVELAND, OH (216) 779-6040 

MAUMEE, OH (419) 893-4288 

DALLAS, TX (214) 247-6679 

CHEYENNE, WY (307) 632-9 1 32 

MEXICALI. DC (714) 357-471 7 

OVERSEAS 

AUSTRALIA 3677-6946 

BELGIUM 1663-2452 

REP. OF SOUTH AFRICA ... . 2145-1047 



EA 



MICROCOMPUTER TECHNOLOGY INC 

3304 W. MAO\RTHUR, SANTA ANA, CA 92704 
• (714) 979-9923 • TELEX 6780401 TADIWN - 



K^ 2S 




U3 PWCE5 

FO-D SANTA ANA, 

CAUFOftNlA 



v'Stfff List ot A{tvertis»rs an pag9 402 
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SOFTWARE FOR TRS-80 



UNITERM 
'The Universal Terminal Program' 

The FIRST and ONLY terminal program tor both ihe Model I antJ MoOel 111 
TRS-80 computers Written Dy Pete Roberls. ttiis program will soon Oecome 
the slanaard o) lermmal soltware. Unique features includes a Handsome 
binder with over 75 pages ot instructions and examples. Free upgrade policy 
using local Bulletin Poards and MicroNET, Expanded funclions such as 'Type 
to butter', 'Display Butter', Define Auto logon, polling, signon. and conned 
messages' Requires 32K disk system. Only S79.95 
ST80III. OMNIIER)^. SMARI80. SMARTIII owners!!! Upgrade to 
■UNITERM'i Send your ORIGINAL program disk and receive UNITERM' tor 
only$?9 95" 

CONNECTtON-80 BBS 

Run your own Computer Bulletin Board This software package when combin- 
ed with your Model I Or Model III TRS-80 and an Auto Answer Modem will 
convert your computer into a mini-tfmes share system. Functions include 
message leaving, both public and private, message retrieving. Bulletins, 
Downloading, merchandise, product ordermg, chai. etc. This is a full feature 
system, and well known tor excellence among modem users Only $199.95 

UTILITY PACK 

ffiis package includes three of the most useful programs available for the 

serious THS-80 user, by Mike Friedman. 

1) Spooler: Very fast, allows page parameters and perteralion skip over 

automatically you can even switch DOS's without mterupting printing! 

?) ErasB: Super Purge utility with multiple modes of operation. Allows you to 

display DIR and position cursor over file to be killed, and then a key stroke 

and lis gone! You will never use 'KILL' again* 

3) Map: Places a sector map (LUMP map for NEWOOS/80) of youf disk on 

the screen Shows tree, used and locket) out grans. 

tNTIRE PACKAGE ONLY (Specify Mod t or Ml). $49.95 

COPY III 

This Model Ml utility, written by Dick Baicom. allows you to toad system tapes 
into your computer at either 500 or 1500 Baud and then copy them onto a 
new tape at either 5O0 or 1500 Baud. Includes 10 page instruction manual 
S9.9S 



THE COPYRIGHT KIT 

A sellinstfuction booklet on copyrighting the computer software you wriie. 
Ircludes step by step instructions, sample forms, as well as discussions o( 

copyrights, patents and trade secrets, your rights secured by copyrights, 
legal remedies upon infringements, material not copyrightable and MUCH 
MORE' Written by Attorneys. Published by National Attorneys Publications 
and distributed exclusively through B T. Enterprises IF YOU EVER WROTE A 
COMPUTER PROGRAM. YOU NEED THIS BOOK! $11.95 



DOS PLUS OPERATING SYSTEM 

A fast, easy to use. and bug-free operating system lor the TRS-80 Model I 
and 111. This system is a must for business and hobby users. Easy to use. 
supports Single and Double tJensity m the Mod ill. (Mod i wilh Doubler) In- 
cludes a $100 reward for an error if you can locate one. (See Micro Systems 
Software ad lor details.) 
DOSPLUS 3.3S (Mod I Single Density), $99.95 
DQSPLUS 3. 3D (Mod 1 Double Density, Doubler required). $99.95 
DOS PLUS 3 3111 (Mod III Sing/Ooub Density). $99.95 

NEWDOS/80 OPERATING SYSTEM 

The Hottest Disk Operating System tor the TRS-80 Model I and III. Version 
2.0 with full single and. double density support, allows the use of and com- 
Dinaiton of disk drives types and densities. Full Double density support when 
used with a Doubler. On the Model I. you can read and write Model ill com- 
patable data disks On the Model Ml. you can write Model l single or double 
flensiiy data disks for use on the Model I, Includes Expanded directories, 
dynamic basic merge and delete, selective variable clearing, enhanced basic 
editing. Enhanced chaining functions. Superzap ulility. Disk enhanced editor 
assembler and disassembler, and much more Special Price. $139.95 

M-ZAL 

This is the most powerful Editor Assembler for the TRS-80 ever written 
Features a full screen editor, a menu driven asembler, and an interactive 
linker which allows the linking of /CMD and /RLD files. Files can be loaded 
to Disk or Tape! Assembly Language programers like Dick Baicom. and Pete 
Robert claim that this is the best Editor Assemt)ler on the market! Special 
Price, $1Z9.95 

OTHER MYSTERIES 

We carry the full line of IJG 'Other Mysteries' books at discount prices. These 
books are a must for computer uMrs 

TRS— 80 Disk and Other Mysteries $22 50 $19.95 

Basic Decoded and Other Mysteries $2^.95 $26.96 

Cuslom TRS-80 and Other Mysteries $29^5 $26.95 

Basic Faster & Better $29 9^, $26.95 



MX-80 RIBBON RELOADS 

Don't throw away your worn MX-80 ribbon cassettes. We carry endless loop 
ribbons to replace the worn ribbon in your MX-80 ribbon cassette and save 
money. Installation takes about 3 minutes each. Special offer $3.50/Ba., 
$35.0Q/doz. 

CASOP 

The CASOP utility by Paul Spoltore allows you to copy system tapes, lind load 
locations, check for hidden messages, modify program blocks, relocate pro- 
gram blocks, and merge two tape programs together. A sort of 'SUPERZAP' 
for tape users, $24.95. 

AVAILABLE AT 



Breeze Computing 

i'O H..\ Idi.l 
B.->klr>. Ml 48(172 

ill i] iiw ^y\22 



Micro Image! 

l-K) (1 1 :?rMti Rodd 

Hushmy NY ll.lM 



Confempotwy Comm Corp. Sicvenc Radio Shack 

.'.W2 Cocfll Wdy :H.2 Nuti Rii*d 

MsJ.^11 Ml 4«ft4(l PtH»'ii;vvillf. PA I'MMI 

r.l7l .f,« 102H • (SlXn M'i(.27') 



Ml Syetema Go 

\m W Planl St.**! 
Wini^i Garden FL 12781 
(:i<15l H77 28J<l 

Soft Secloi MarkFilng 

u2W M«1illt Belt Riad 
(".drdtn Cily. Ml 'JH1.15 
i:ilJl 4^:. 402(1 



CPU Compuln Corp. 

175 Main Sneei 
ChatleMon MA 02129 



Omni Systemi Aaaoclali 

P Bo> b32 

W Caldwell NJ U71X)6 

(2011 226 9185 



Piogiama Unlimited 

Jencho NY n7S3 
iWK)) b45-btl38 

Boba T.V. 

9:115 86th Drii-B 
Wcxlhai-cn NY 11421 
12121 441-2807 



Son John Enlcrprt*** 

PO BoT. !e71 
Fretrnont. CA 9453H 

[4151 &51 4147 

Compulei Serv of Danbiny 

P O Box W.i 
Danbury, CT (XiSlO 
(2031 744 S.510 




171 Hawkins Road 
Cenrereoch, New York 11720 



^^^22 



(516) 961-6566 (Voice) 
(516) 586-5636 (Data) 
MNET-70331, 105 



^^2 



Dealer Inquiries Welcome 

Add $2.00 S & H 

NYS res add appr. tax 
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'THE SYSTEM' 
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New TRS-80 Model III 

Model III, 48K 2 Slemans Disk Drive system, $1799.00, {plus 
shipping and handling) includes Dos Plus III operating system. 

ADD DISK DRIVES 

Internal Drive #1— Includes Micro Mainframes Controller board. 
Dual Drive Power Supply (tor 2 internal disk drives), Mounting 
Hardware (for 2 Internal disk drives), 40 Track Siemans Disk 
Drive, $629.95 

Internal Drive #2— Includes 40 Track Siemans Disk Drive 12 ms 
Disk Drive, $299.95 

Memory Upgrade, 150ns. Prime Chips, Add 16K. $44.95, Add 
32K. $79.95 

SPECIAL!!! 

Internal Drive #1 $629.95 

Internal Drive #2 $299.95 

32K RAM Memory Chips $79.00 

All Together TTTO^TftS^ 

Includes Complete Installation Instructions! $849.95 

External Drive #3— Includes case (as shown above, dual power 
supply, cable, mounting hardware for 2 external drives, $429.95 
External Drive #4— (same as Internal Drive #2) 40 track disk 
drive, $299.95 

External case (no drives)— Includes case, powers supply (for 2 
drives) cable, mounting hardware, (shown above) $179.95. 

SPECIAL!!! Dual External Drives & Case, $629.95 

NOTE: Dual Sided Drives— add $99.00 per drive. 
Flippy Drives (single sided only)— add $19.95 per drive. 
Dos Plus III (3.3) Operating System, $99.95 alone, $49.95 with 
drive purchase. 



ACCESSORIES 
Put Your Printer on a Pedestal! 

This printer stand allows you to place a stack ol paper under the 
printer for neat paper stacking— Available for most printers. 

(MX-80, MX-80F/T, LPIV, etc.) $24,95 

Largersland(MX-100, Anadex, etc.) $29.95 

Extra Shelves (Shown Above) $9.95 

MODEL I DISK DRIVE CASES 

Clear Cases lor your model I disk drives, complete with power 
supply (or 5-1/4 inch disk drives. 

Single Drive Case $79.95 

Dual Drive Case , , , $109.95 

Triple Drive Case $139.95 

Quad Drive Case $169.95 

Smoked Plexiglass Cases, Add $5.00/per drive. 

LYNX MODEMS 

The finest Aulo Answer/Dial Modem on the market! This is a 
direct connect modem for your model I or 111. Does not require an 
RS232-C interface in your computer! Season Special, $299:% 

$249.95 
AMBER EASE 
Amber filter for your computer. Amber has been shown to be the 
easiest on the eyes. Easy to install. (Shown on computer atwve.) 
Season Special. All TRS-80 Models, $19.95 

TIC-TOC-80 MICROCLOCK 

A microclock for your TRS-80 Model I. Gives your computer the 
correct time and date on powerup. Clock is maintained on a 
lithium battery for long life. Plugs onto the I/O Buss of the TRS-80 
Model I and does not require any modifications tor -most com- 
puters. Complete with extensive documentation and a disk with 
utilities, SPECIAL NOW AVAILABLE IN KIT FORM! 

Complete assembled and tested $99.95 

Kit with P/C board, parts and instructions $59.95 

Kit with P/C board, parts list and instructions $19.95 




M i71 Howkins Rood 

Centereoch, New York 11720 



^^^n ffl^S 



^ 122 



(516) 981-8568 (Voice) 

^ (516) 588-5836 (Doto) 
MNET-70301, 105 



Deoler Inquiries Welcome 

Add $2.00 S (j H 
NYS res. odd oppr. tax 



^See List of AOvtrlistts on pag» 402 
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EDUCATION 



The kids use the computer, so vjhy not you , professor?. 



Calling All Teachers 



Roger Hedden 
B22-8 151 Rte. 206 
Flanders. NJ 07836 



Computers are appearing in 
more schools each day. 
Their uses fall into one of three 
broad groups: Students interact 
with canned or teacher-written 
programs to reinforce previous- 
ly learned skills; students use 
the computers to learn a pro- 



gramming language; or teach- 
ers use them to ease paperwork 
burdens. Many vendors have at- 
tempted to answer the first two 
needs— this article will help you 
begin resolving the third. 

The programs included have 
been tested for two marking pe- 
riods. I have received positive 
comments from colleagues, ad- 
ministrators, and parents forthe 
increase in communication 
made possible by them. The ex- 
citing part of this is that I have 
been able to save time In the 
process I 

The package consists of 
seven modules (each module Is 
actually a separate program): 



IB HEM 'BUILD DATA BASE [INTERFACES WITH ALL OTHER BODULES)* 

2fl CLEAR 48BB:CLS!pRINTeB5,'**DATA BASE BUILDER**" [PRINT: PfilNTST 

HISGS(63,"*"1 :PHINTTAB(26) 'WRITTEN FOR' i PRI»TTAB( 21) "NORTHERN Kl 

DDLE SCHO0L*!PRIKTTAB(21) •BY*!PBINTTAB(25)"ROGEfi J HEDDEN' :PRINT 

*9B2,"*ALL RIGHTS RESERVED" ;: GOSUBlBlfliCLS 

3B DIH LHSdSi) ,FS(15B) ,NfS(15B| ,SCS(15i) 

31 STU-e 

it PBINT'LIST THE INFORNATION REQUESTED, PLEASE' : PRINT 

SB FOR I-1T015B 

68 INPUT'LAST NAME: * jLNS ( I) : STU-ETUH 

S5 IF LNS(I)«"END' THEN GOTO 158 

19 INPUT"fIHST NAHE: ■(FSIU 

SB INPUT'SEX[li/Fl : ';KFS(I1 

9B IHPUT'SECTION: ';SCS(I1 

IBB PRINT 

12a NEXTI:CLS 

15B PRINT"LOAD BLANK CASSETTE MiO PRESS RECORD i PLAY.*:PRINT 

160 INFUT'OhXE LOADED, PRESS ENTER. " ,GS :CLfi 

161 PRINT'THE FOLU)l*ING DATA IE BEING PLACED OM THE DATA BASE TA 
PE:'iPRIHT 

17B PTS-BrPP-PTS 

180 FORI-ITOSTU 

IBl PRIHT"HAME: '(LNSIU)", "iFSlH 

182 PRIHT'SEJl: "jHFSd) 

183 PRIMT'SECTIOHi " ,SCS (I) sPRI WT 

19B PRI»T»-1,LNS(1) ,FS(I) ,HFS(I1 ,SCS(I) ,PTS .PPtNEXT I 

2flB CLS:PRINT"LOAD COdPLETE. *: PRINT: PRINT: PRINT 

21B 1NPUT"IS THERE ANOTHER SECTION (Y/N) " jGS 

22B IF GS-'V THEN GOTO 28 

231 CLS:END 

IBBB END: 'TIMER DELAY 

lill FOR ZI-1T01BBB:HEXT:RETIIRN 

Program Listing 1. Data Base Builder. 



• The Data Base Builder 

• The Grading Program 

• The File Update 

• The Section Roster Printer 

• The Data Base Display 

• The Grade Book Printer 

• The Failure Notice Printer 

Data Base Builder 

The data base is actually a 
data file; it contains Information 
on every student I have during a 
marking period. Usually that 
amounts to about 120 (there's 
room for 150). After the program 
has been loaded and run, the 
title page is displayed followed 
by instructions to list the re- 
quested information. You 
should enter the names o( your 
students one at a time, with 
their sex (M/F), and section 
number. Once all the names are 
entered, you create a new stu- 
dent whose last name is End. 

Once this name has been en- 
tered the program will direct you 
to place your data tape in the 
cassette recorder; press play 
and record and enter. Your en- 
tire list will be recorded on tape. 
This is the last time you will 
have to type this information. All 
other programs in this package 
are designed to read and/or re- 
write this file. For your data tape 
use a high quality tape that 
won't lose data. It must also be 
long enough to handle the file. I 
presently have 117 students, 
which takes about seven min- 



utes of tape. 

There are some important 
flags built into this file. The End 
flag mentioned above is used to 
terminate reading the tape. 
Another is the section number. 
In my school, the student popu- 
lation is divided into five 
clusters which are labeled 
A,B,C,D,E. Each cluster has at 
least one grade and three to four 
homerooms in each grade. For 
example, a student's section 
might be6A1, meaning he or she 
is a 6th grader in A cluster, 
homeroom number 1. Within a 
teaching section, all students 
will be of the same grade and 
cluster but may not be of the 
same homeroom (see Table 1). 
The programs that use the data 
file look for a change in either of 
the first two places of the sec- 
tion from one student to the 
next in order to know that It is 
now looking at the beginning of 
3 new section. In the discussion 
of the other programs, you will 
see how this operates. 

I have structured the pro 
grams to make modifications as 
simple as possible. 

The data base builder is used 
once to establish a new list of 
students. Any changes there- 
after can be made by the file up- 
date program. 

File Update 

One program I've found to be 
an absolute necessity is the file 
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update. This program allows 
you to add a new student, delete 
one who has left, and change 
any field in any record of the file. 
When all changes have been 
made, the updated file is saved 
on tape. 

When you record this new 
data, use the other side of the 
tape. This is wise, because if 
something should happen dur- 
ing the recording phase of the 
program (@?#'&!)only the most 
recent data would be lost. Also, 
make a note on the cassette to 
remind you which side has the 
most recent data on it. If you go 
back later to use a program and, 
as the tape Is being read, it en- 
counters a bad record in the file, 
one of two error messages will 
be displayed— OD? or FD? Re- 
lax, type CONT and (enter). The 
program will resume. That rec- 
ord will be lost but you can put it 
back in with the update. If you 
find you are getting a lot of error 
messages, check the volume, 
clean the heads, or beat your 
head against the wall, but don't 



give up! 

You only have to run the pro- 
gram to see how it works. All the 
instructions are presented on 
the video screen to lead you 
through the program. Be sure 
you read these carefully. Also, 
when you add a name, a graph- 
ics block Is displayed on the 
screen to Indicate that the 
changes are being made. You 
may notice a period when the in- 
dicator stops changing. This oc- 
curs because the computer is 
searching for more string space. 
Be patient. 

The Grading Program 

The grading program is based 
on a few simple concepts. Over 
a period of time a teacher gives 
tests, quizzes, homework and 
class assignments, all of which 
are graded and recorded in a 
grade book. Most teachers tike 
to weight these grades— that is, 
a test counts more than a quiz, a 
quiz more than an assignment. 
This program allows for weight- 
ing. For example, John Doe has 



scored 15 out of 20 points on a 
quiz, four out of five on an 
assignment, and was absent for 
a second quiz. How would the 
program handle these grades? 
When the program starts up, it 
prompts you to place the data 
file in the cassette player. The 



file is then read. At this point, go 
get a cup of coffee and relax. 
For my 117 students, it takes 
just over seven minutes. If you 
have a faster I/O device, con- 
sider yourself lucky. 

Once the tape file has been 
read, a grade book will be dis- 





NORTHERN MIDDLE SCHOOL 




Setaflc*- 


-HwMwi 


SECTION ROSTER 




ClwatwA 


Able 


1. M. 


EA2 


50 




Crab 


John 


EA1 


60 




Orab 


Sam 


EA3 


100 




Drools 


Mike 


EAS 


81 




Falls 


Water 


EA1 


50 




Money 


Owen 


EA3 


86 




Dolly 


Piano 


EA2 


90 




Farce 


Polly 


EA1 


94 




Toys 


Attic 


EA3 
SECTION ROSTER 


61 


Cluster B 


FfOO 


Karmii 


6B5 


89 




Goose 


Fattier 


6B3 


98 




Hassle 


Adam 


6B7 


61 




Kong 


King 


6B3 


25 




Load 


cigar 


6B8 


58 




Anna 


Annie 


681 


78 




Disco 


D«bbie 


6B3 


84 




Kalz 


Kllly 


682 


85 




strain 


Adel 


6B2 

Table 1. 


69 





10 FEU 'FILE UPDATE FROM DATA BASE* 

15 CLEAR 4689 

29 CLS:PHI[n'S88,'**FlLe UPDATE*"" iPRINTjPRIHT STRIHGS(63, ■•") iPH 

1HTTAB(26)-WBITTEK FDR" !PRIHTTAB( 21) 'HORTHERH MIDDLE SCHOOL'iPRI 

NTTAB(31}-BY-:PRINTTftB(25)"ROGER J HEDDBH" iPRIHTISeZ , "•ALL RIGHT 

E RESERVED"; 

38 DIM LNS(158) ,ES(15e) ,NFS(15R) ,SC$(lJfl .PTSIISI) ,PP(15I] iCOeUB 

leie 

48 CLS:PmNTS512,"LOAD YOUR TAPE TO BE UPDATED, ": IHPUT"THE1I PRBS 

S 'ENTER":AS:GOSUBIIlfl 

6t CLS:PRIHT'ENTER THE APPROPRIATE CODE" sPRIWTl PHIUT'ADD HEW BEC 

ORD - ENTER A" : PRIHT-DELETE A RECORD - ENTER D" :PRINT"CORRECT 

A RECORD - ENTER C" ; PRINT"SAVE CHANGES - ENTER S" iPRIHtjPRINT'Y 

OUR CHOICE PLEASE" ( 

70 GS-INKEYSiIF GS-""THEK 78 

8B IF GS-"A"THEK GOSUB3eiB:GOT012< 

90 IF GS="D'THEN G0SUBitBlB!G0TO12» 

lae IF GS-"C"THEH GOSOBSaiBiCOTOiai 

105 IF GS="S" THEN GOTO 131 

110 PRINTi3e4,"HHHH - TRY THAT AaAIH"iCOSUB lllli t>RIHrl384, "YOUR 

CHOICE PLEASE 
128 PRINT-ARE THERE MORE RECORDS TO BE CRAHCED 1Y/H17" 

121 AS=INKEYS:IFAS-'"THEH121 

122 IF AS'"Y"THEHG0T06I 

123 IF AS<>"N"THEH CLS:GOT011I 

13B CLS:PRINT'PREPARE DATA TAPE AMD BIT ESTER" 1 IMPUT AS 

135 CLS:PR1ST'L0ADING- 

140 FOP S=ITOSU 

150 PRINTI-1,LNS(S) ,FS(S) ,KFS(S) ,SC$(S} ,PT8(8) ,PP(S} 

155 PRIWTS916, "RECORDS WRITTEN -"iSi 

160 NEXT S 

165 PRINTt-1," END", "OF", "FILE", "DATA", 1,1 

170 CLS!PRIHT"JOB CCWPLETE" 

180 END 

1000 END: 'TIMER DELAY 

1010 FOR IZ = lTOlBa0:NEIlT:RETUBN 

2000 END: 'READ DATA TAPE 

2010 FOR S=1T015B 

2020 INPUTt-l,LN5(S) ,F$(S) ,MF;(S] ,SC9(S) ,IT8(8} ,rP(Sl iKI-S 

2025 PRINT§90, "RECORDS BEAD = "jSi 

203B IF LNS(S)="eNO" THEN RETURN 

2040 NEXT S: RETURN 

3000 END: 'ADDS NAHE TO FILE 

3010 CLS:PRINT'"PLEASE LIST NAHE OF PERSON IHMEDIATELY PRECEDIHC 

NEW ENTRY-iIHPUT'LAST NAHE: "jPLS: INPUT"FIRST HANe:"|PF; 

3020 CLS:PB1NTCHRS(23) :PRIWT"SEARCH1HG - PLEASE WAIT" 

3030 FOR S-1T0SU:C-S 

3040 IF LNS|S)-PLS AMD FS(S)-PPS THEN 3061 

3055 NEXT S 

3060 CLS:PRINT LNS(C);", ";F$(C)i" SECTIOH! "iSCStO 

3070 PRINT:PRINT"ENTER NEW NAHE AND INFORMATION:" 

3BB0 INPUT-LAST NAME" jNLS: INPUT'FIfiST NAME" ;H$: INPUT'SEXIM/F] * iS 

XS:INPUT-SECTI0N";NSS:INPUT"POIHTS EARNED TO DATE" (PE: IHPUT'POIH 

TS POSSIBLE TO DATE",-PO 

3090 CLS:PR1NTCHRS[23) :PRINT"WAIT, PLEASE"iFOR 1-SU TO Ctl STEP- 

l!pRINTeiB,CHRSU66) :LHS ( I+l) .LHS( I) : ES(I*1) -FS( 1) ;HFS(I*1) -Mf S( 

I):SCSII*1S=SC51I) :PTSlI*-l)=PTSllliPPfI+l)-PPlI)iPFIKTIll,CHRS(l 

53) :NEXTI 



3095 SU=SU+l!LNS(C+l)=NLS:£ S (C + 1) =NS:MFS IC+) ) -SXS: SCS (C+I) -NSStP 

TS {C*1)=PE I PP(C+1).P0:CLS! RETURN 

4B0I ENDt 'DELETES A NAME 

4111 CLSiPRIHTCHBS(23) !F=l!PRlNT»512, "WARNING, THIS ROUTINE IS 

POWERFtJLI"iGOSUBlBli:PRIHT* ONCE A NAME IS DELETED, IT IS 

LOST.'iPRIMT" DO YO(J HAST TO DELETE A NAHE (Y/N)7" 
4115 AS-INKEYSiir AS.""TaEN 4115 
4I1S IF ASO'Y" THEN RETURN 

4117 CLSi INPUT" LAST NAHE OF STUDENT TO BE DELETED* iNLS: IHPUT-PIR 
ST HAME"jNS!lHPUT"SECT10H'|HSS 
4H8 CLSjPRIHT'THAHR YOU - PLEASE WAIT. " 
4121 FOR S-ITOSU 

4I3I IF ILNS(S)-IILSIWID(P(|S)-HS)A1ID(SCS(S)-KSS} THEN F = 1:C<S: 
GOTO4I60 
4tSS NEXT S 

4I6B IP P-B THEN PRINT "STUDENT NOT FOUND IN FILE -- CHECK SPELL 
INGSl'iRETURH 
4»«5 FOR S=CTOSU 

4B66 LN5(S)-LN$(S+1) :FS{S1 -FS(S+1) iHFS (S) =KFS(S+1) : SCS (S) -SCSI 
S+1) :PTS(S)-PTS(S+1) :PP(S) =>PP(S-tl) 
4167 NEXT SiSU-SU-1 
4111 RETURN 

Slli END; 'CORRECTS ERRORS IN PILE 
SBH CLS:F-i!PRlNT"ENTER ALL INFORMATION REQUESTED FOR RECORD TO 

BE CUANGED*:PRINT'REMEMBER - ENTER IT AS IT PRESENTLY APPEARS. - 

5I2< INPUT'OLD LAST NAME" (ENS: INPUT- FIRST NAME" ; EFS: IHFL'T- 

SECTION'jESS 
5125 CI/S:PRI(IT-SEARCaiNG - PLEASE WAIT- 
5131 FOR S'lTOSU 

5040 IF ILNS(S)=ENS)AND(FS(S)-EFS)AHDISCS(S)=ESS)THEN F-1:C»S; 
GOTO508B 
5B7» NBXTS 

5iaB IF F=0 THEN PRINT'NOTHING FOUND IN FILE HATCHING REQUEST" :R 
ETURN 

5191 CLStPRINT'KHAT FIELD IS TO BE CHANGED?" 
51»i PRINT''LAST NAME - ENTER L- 
Slil Pfilfn-'FIRST NAME - ENTER F" 
S1I2 PRINT"SECTION - ENTER S" 
SH3 PRIHT'SEXt 11) - ENTER X" 
5114 PRINT'PTS EARNED - ENTER P" 
51t5 PRINT"PTS POSSIBLE- ENTER O' 
51B6 PRINTjPRIHT'YOUR CHOICE?" 
51B7 AS-INKEYS:IF AS'""THEN51I7ELSECLS 

5111 IP AS-"L" THEN INPUT "CORRECT LAST NAME" ; LNS(C) :GOTO6BI0 
5121 IF AS="F" THEN INPUT'CORBECT FIRST NAME" ; F$(C) :COTO6flB0 
5131 IF AS-*S" THEN INPUT"CORRECT SECTION" ;SCS (C) :GOT06aB8 
5141 IF AS-"X" THEN INPUT'CORRECT SEX' ;MFS (C) :GOTO60aa 
5150 IF AS="P" THEN INPUT"CORRECT POINTS EARNED" fPTS (C) iGOTO6aB0 

516B IF AS="0" THEN INPUT'CORRECT POINTS POSSIBLE' jPP (C) :GOTO600 

tlfi PKINT'MS THERE MORE CHANCES TO BE HADE TO THIS RECORD (Y/H 

)?" 

£Sli AS-IHREYS:IF AS=""TUEN 611* 

6818 IF AS-"Y"THEN 5898 

6131 RETURN 

6848 END 



Program Listing 2. File Update. 



80 Microcomputing, November 1981 • 307 



played on the screen with a mes- 
sage requesting the number of 
grades for this section. Going 
back to our example, the re- 
sponse would be three (don't 
forget the absence). Once the re- 
sponse is given, the next ques- 
tion appears at the bottom, ask- 
ing the maximum possible 
points for each grade. In our ex- 
ample, we would respond with 
20,5,15— the quiz John missed 
was worth 15 points. After the 
third maximum is entered, the 
first student's name is dis- 
played at the top of the page. 
For John we would enter 15,4 
and - 1 (I'll explain this later). At 
the right side of the screen. 



John's percent grade will ap- 
pear. If you don't have a printer, 
you'll need to copy this grade or 
use the data base display pro- 
gram to record your grades. If 
your school uses letter grades, 
you'll need to convert them or 
add a few lines of code to 
display the letter grade. 

As soon as John's grade is 
displayed, the next student's 
name Is shown on the following 
line and the process continues. 
When the next section Is en- 
countered (rememtjer the pro- 
gram detects this by the section 
number) you are given an oppor- 
tunity to change the maximum 
number of points for each score 



1* REH 'STUDENr GRADES FROM DATA BASE' 

10 CLS:PBlNT?a6,-*'STliDEHT GRADES"'" iPBINT i PHI OT STHIHGS(«3, ""■ ) 

:P8INTTAB(26)-WRITTEN FOB" iPRIHTTABl 21) "NORTHERN I1IDDLE SCHOOL' i 

PRIin'TAB(31) ■BY'!PBIIlTTAB|25)"ROCER J KEDDEK" ! PRI(rr*9e2 , "ALL BI 

GHTS RES£RVED'(!G0SUB1H1B;CLS 

7» PRINT" PUT YOUR DATA TAPE IN THE CASSETTE PLAYER AKD PRESS 'P 

LAY'.VFOR X-1T01B:PRIHT:NEXT:1HPUT"THEN PRESS 'ENTER' " I ASiCLS 

BI PRINT CHRSI23) :PRI»T:PRINT"YOUR TAPE IS HOM L0ADI)4G. WREK IT 

HAS FINISHED LOADING, TURN KOUR CASSETTE TO THE OPPOSITE SI 
DE AND REWIND IT TO THE BEGIN-HING. " :FOR ZZ-ITOIBBI :NEXTZZ :CLS:P 
RINT'yOUR DAT* IS AS FOLLOWS i " 
91 CLEAR leSB 

IBI DIK LHS(lSe) ,FS(l^fl) ,f<PSUSf),SC$(15fl] ,PTS(15a) ,PP<13a] ,T{15 
),I(25) 
111 0-129 

121 GOSUB 3ffll:'*READS INPUT riLE'rCLS 
1)1 SC$(S)-SCS(l}:CLSiCOSU8 lISBsGOSDB 1171 
Hi FOB S-1T0{SU-1) 
ISB IF LEFTS(SCS(E) ,21<>[.EFTS(SCS(S-I) ,2) THEN PBIKTK, "END OF 

SECTION-; : INPUT "//PRESS ENTER FOR NEXT SECTION" ;*S :G0SUB lISBt 
GOSUB 3971 

161 PRINT?Q,STBINGS163," ") : PfiINTIQ,LNS (S) j " , " jLEFTS [PS[S) ,1) 
178 T-17 
ISB FOR I-ITOM 

191 PRINTP(0»T) ,"j:INPOT STU) 
2Bfl PBlNTg(OtT) ,ST{I) sT-T+l 

211 IF ST[I)>.B THEN PTS ( S) -PTS (SI tST ( I ) : PP{S) -PPIS) *T[I) : HEXTI : 
ELSE IF ST(I)--1THEN NEXTl ! ELSE IF ST(I)— 2 THEN GOSUB 321B!PTSI 
Sl-BiPPISl-aiNEXT S ELSE IF ST|I1— 3 THEN S-S-1 iPTS (SJ -B: PP(S) -B 
iHEXTS ELSE IF ST(I1— 4 THEN S-S-3! PTS(S1 -B t PPIS) -BsNEXT S 
Jli ON ERROR GOTO 24B 
22B F'INT((PTS(S)'lBa)/PP|S)) 

231 PRINTS(Ot^B) ,F;:0-0*6«:IF 0>832 THEN Q-129 
241 NEXT S 

2SB PRINT?Q,ETRINGS163." "1 : PRINTSQ , "LAST STUDENT OP LAST SECTIO 
H--PRESE 'ENTER' TO PROCEED" | : INPUT AS 
261 CLS:PRIHT i;HR$(21) 

271 INPUT"MAKE SURE YOUR TAPE IS WOUND PAST IT'S LEADER. PRES 

S 'PLAK' AND 'RECORD'. wHEN YOU'RE HEADY PRESS ' ENTER' .'i INPUT 
AStPRINT 

28B PRINT"THE NEWEST DATA IE BEING RECORD-ED ON TAPE—THIS WILL 
TAKE A FEW MINUTES." 
29B GOEUB 315B 
25 5 PRINTI- J, "END", "OF*, "FILE", "SECTION ",1,1 

3Ba CLSiPRINT CHRS(23) |FRINT"ALL DOBE BYE." 

31 B END 

IBBB END:'TIKER DELAY 

IBIB FOR ZZ"1T01IB8:NEXT:RETUBN 

3BBB END: 'READS INPUT FILE F.ROH LINE 12fl 

]aie FOR S-1 TO 15B:INPL'TI-1,LNS(S| ,FSIE) ,MF$<S1 ,SCS(S) ,PTS(S] ,P 

PIS):SU-S:IF LNS(S)-"END' THEN RETURN 

3B15 PRINT LNS(S)|", "jFSCS)!" "iSCS(Sl;" "f:IP PTS(S)<>B THEN P 

BINT INT|PTS1S)/PP[S1 "IBB) ;"»" ELSE PRINT "NO GRADE* 

3Ble NEXT 5:RETURN 

3B2B END: '•FEINTS HEADERS' 

3B3B CLS.-PRINT"NAME*;TAB(2B)*CHADES ■iTAB(62)"%* 

1B4B FOR X-flT0127:SET(X,3) :SET(X,44) iNEXT 

3BSB PRINTi9«B,"C0DES:STUDENT ABSENT! -1] ■*C0RltECTI0HS-HM(e(-2] -A 

LL|-3)-LAST(-4) "cRETURN 

3B6B END: 'SET NUNBER OF INPUT GRADES 

3(71 PBIHT§S41,""j:INPUT"H0W HAHY GRADBS ABB THERC POR THIS SECT 

ION";N 

3BBS PRINT!64I,STRINCS(Gfl," "):K-BBB 

3l9fl PRINT§833,*HAX. P0INTS*|:F0R I-l TO Bl PRINTW, "";: INPUT Til 

) iPBIWTgW,T(Il :W-W+3iNEXT I 

31BB RETURN 

311B END; 'CORRECT NAME OR GRADE 

312B PBINTSO,STRINGSi63," ') : PRINTSO,'" I = IHPUT'CORRECT LAST NAME 

■jLNSIS) :PRINTIQ,LNS(5);", " i LEFTS (FS, 1 ) 

3131 RETURN 

314B END: 'OUTPUTS DATA TO TAPE. 

3151 FOB S-ITOSU 

3161 PR[NTI-1,LN$[5] ,PS(S) ,MF$(S] ,SCS(S1 ,PTS (S) ,PP (8) 

317B NEXT S 

318B RETURN 

32IB END 

321B IF ST(I)— 2 THEN GOSUB 112B;S-S-1 : RETURN 

3115 EBD 

Program Listing 3. Grading Program. 



and the number of scores. 

Now, that - 1 mentioned 
earlier is one of four codes avail- 
able during the operation of the 
program. They are listed at the 
bottom of the grading page. 
They are: -1: The student was 
absent and the grade is to be ig- 
nored; -2: Correct the spelling of 
the individual's last name; -3: 
Correct the line because of a 
grade input error; -4: Correct the 
previous line because of an er- 
ror. 

After all grades have been 
entered for all sections, the 
screen is cleared and you are in- 
structed to place your data tape 
in the cassette recorder; play, 
record, and enter. The new data 
will be recorded and the pro- 
gram will end. The percent grade 
displayed is not recorded on 
tape, but the number of points 
earned and the number of points 
possible for that student are 



recorded. This is one of the most 
Important features of the pro- 
gram because it allows you to 
update your grade book at any 
time without worrying about 
throwing the grades out of bal- 
ance. The next time the grading 
program is run, the previous 
grades are read and the new 
grades accumulated. 

Display Data Base 

This program was designed 
for schools that do not have a 
printer. It will display the con- 
tents of the data file. No 
changes can be made by this 
program. Execution can be halt- 
ed by a shifted @ and resumed 
by depressing any key. 

Printed Output 

So far none of the programs 
provide printed output. If you 
have a printer, read onl The 
three following programs are for 



IB REM 'LIST SECTION ROSTERS' 

2B CLEAi)SBS:CLS:PRIHT«87,"**PRINT ROSTERS"" i PRINT: PRINT STRINGS 

(6J,"') :PBINTTAB[2S) "WRITTEN FOR" : PRINTTABI 21) "NORTHERN MIDDLE 

SCH00L"iPRINTTAB(31)*BY*:PRINTTAB(25)'ROCER J HEDDEN" :PRINTB9S2 , 

"ALL RIGHTS RESERVED"] 

3B L-e3:GOS0B lIlBiCLS 

41 INPUT*YOUR NAME PLEASE' |TS 

6B INPUT'WKAT SUBJECT";SS 

71 CLSiPRINT"THAHK YOU" IG0SUB1B1B|PRINTI512, "LOAD YOUR DATA TAPE 

- THEN PRESS ENTER' ): INPUT A$ 
BB LS$--AAA" 

9B IHPUTt-l,LH$,F$,MF$,SC$,PTS,PP 

IBB IF LEFT$ISCS,2)<>LEPT$(L5$,2)THEN GOSUB 2BBS 

111 LPRINTTAB(S1LK$|TA8(2BIFS|TAB(35]SCSmIF PPOB THEN LPRINTTA 
B(SI] INT(PTS'1BB/PP)ELSE LPRIHTTAB( SI] 'NO GRADE" 
12B L-L+1:GOTO 9t 
IBBB END: 'TIMER DELAY 
IBlB FOR Il-lT01BBa:NEXTiRETUBN 
2BBB END 

2BI5 IF LHS-"END"THEN GOSUB SBlBiCND 
2Bie FOB Z-LT0fi6:LFBINT" "tHEXT Z 

2l2fl LFR1HTTAB(16) "N ORTHERN KIDDLE SCHOOL. 

":LPR1MT" " 

283B LPRIIITTAB(5] SSi" - " ;T$|TAB(6B} 'CLUSTER " tHIDS (SC$ , 2 , U 
2841 LPRINTTAB(S] 5TRING$(24, "■") ] " SECTICM ROSTER " (STRINGS! 24 , 
"'■):LPRINT" ■ 
2B^B L-t:LSS-5C5:RETURN 
3BBB END 

3B1B CLE:PBINT'EKD OF FILE' : PRIirTiGO&DBlBie: PBINT'TO ADVANCE PAP 
ER, PRESS 'A'.":PRINT'TO END PROGRAM, PRESS 'E'." 
3B2B AS-INXEYS 
3125 IFA$-*"TKEN 3B2B 

3B3I IF AS-"A"THEN LPRINT* *:GOTO 3B2B 
3B4B IF ASO'E" THEN GOTO 3121 
3851 END 



Program Listmg 4. Secf/on Roster Printer. 



18 BEH *CBT DISPLAY OF DATA BASE* 

2B CLS!PRINT§B5, •"DISPLAY DATA BASE**" : PRINT; PRINTSTRINGS (S3 , "• 

") :PRINTTAB(26) "WRITTEN FOR" : PBINTTABI 21) •NOBTBERN KIDDLE SCHOOL 

":PBIKTTAB131)'BY*:PRI»TTAB(25)*BOGEB J HEDDEN" :PRIWTe982,**ALL 

RIGHTS RESERVED") :GO&U8ieiB I CLS:PBIHTCBB5( 23) 

3B CLEAR 4BIB:DIM LNS (ISB) , F$< l^D ,HFS ( 151) ,SCS<15I) iFTS(lSI) ,FP 

115B) 

31 INPUT"PREPARE TAPE - THEN HIT ENTER" lOS 

58 FOR I-l TO ISB 

6B INPUTt-1, LHSUl iFSdl ,MP8(I) ,SCS Ul ,PTS! 1 ) ,PP( U 

65 IF LHS(I)--END" THEN GOTO IBB 

fi6 PBIHT:PR1NT*NUMBEH *il|" OP LIST.* 

7fl PRINT LNSdll*, *lF51I)j" •iHFSlHl' — "iBCSlD 

7S IF PP(I)>B THEN PRIHT"CRADE * i IKTIPTSd) •lll/PPt II ) I •»*■ 

BB PRINT 

9B NEXT I 

IBB PRINT "JOB COMPLETE" 

IIB END 

lilB EHDi'TIHER DELAY 

nil FOR Zl-lTOlBBBiNEXTiRETURN 

Program Listing 5. Data Base Display. 
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PROVEN MONEY MAKERS FOR YOUR TRS-80" 

"Tandy Corp. Trademark 



MAIL LIST SYSTEM [ditkonin $69.95 

Our easy-to-use svstem will accomodate almost any "custom" 
requirement of even your most demanding clients. A glance 
below will show that we are far ahead of any other system in 
speed, variety of features, and sheer volume of names 
handled but don't let that tool you This system can be used 
just as easily on one disk for a small Christmas card list. 

• Maintain virtually an infinite number of disks all in con- 
tinuous alph. or zip order, essential for large lists. 

• Sort 2320 entries (2 full 40 track double density disks) in 
only 32K or an incredible 4640 entires (2 full 80 track 
double density disks) in only 48K! . Made possible with 
ouruniquedatecompression techniques on the Model III 

• Super fast sort by alph or zip order (8 sec, for 1000 
entries) both orders can exist simultaneously on disk 

• High speed recovery of entries from disk. ..speed of sort is 
meaningless if retreival from disk is slow.. .ours pulls in 
over 11 perse*-! 

NEW • Transfers old files over to our system. 

• In zip order all entries with same zip code are also 
arranged alphabetically 

• Four digit zips have a leading "0" appended on labels. 

• Backup data disks are easily updated as entries are 
created, edited, or sorted .extremely usefull I 

• Optional reversal of name about comma for that non- 
computer, personalized look. 

• Master printouts of your list in several formats (not just a 
rehash of the labels) Optionally continous or pages 
oriented -.Your customers will want this! 

• Ail 0's in address labels are replaced by easier to read lYs. 

• All labels optionally support an "Attn:" line 

• Many user defined fields with plenty of options for 
simultaneous purging and selecting,, even allows for 
inequalities.. .powerful and easy to use! I 

• Continuous display of how many addresses printed. 

• Each disk entry automatically "remembers" how many 
mailings have been made for that particular entry.. Can 
be tied in with purge/select, 

• Primarily written in BASIC for easy modification,,, 
embedded machine code for those speed sensitive areas 

• Editing is simple and fast automatic search, 

• Optional 9 digit zip. 

• Deleted entries have "holes" on disk filled automatically 
.,,and alph order is still maintained! 

• Test label printing lets you make horizontal and vertical 
adjustments with ease, 

• Optional "one time" mailing for some selected entries, 

• Extensive use of error traps (both operator and machine 
induced) even recovers from a power failure during a 
printout!, recycling on disk errors, 

• Patch program allows you to upgrade the system to 
any DOS 

• Documentation manual available separately for $3 95, 

• Hardware requirements: 32K printer, and 1 or 2 disk drives. 



Provide your customers with a CALENDAR $19.95 

printed calendar [along with standard banker's holidays] of any 
month of any year,,, Useful in motivating history students. Holds 
the same fascination for students as a game. Tape only for 
Model I or III. 



Same features as Calendar. SUPER CALENDAR 

Additionally prints out large 

"graphics" type wall calendars (tap* only) $29.95 

with memos under each day Use as a planning calendar with 
optional disk storage... requires 16K and printer. 



Football Scouting Report [^fi^) $89.95 

How many high schools and colleges are there within a 75 mile 
radius of you? Did you know that each is a potential customer at 
the rate of from S50&$1000 per season? Many already subscribe 
to more expensive [but inferior) computer analysis services of 
their scouting reports Using such a service a coach will typically 
have an opponent scouted several times prior to actually playing 
them. ..This series of programs was written to the specifications 
of a coach with two state championships to his credit. As a 
result, the emphasis is on producing statistics that will help in 
predicting what the opponent will do in a given situation ..This is 
a sophisticated set of program^ fully equivalent to that used by 
professional football teams 

• Separate and detailed analysis of running, passing, and 
kicking 

• Passing and running tendancies by field position 

• Point of attack tendancies and statistics for runs 

• Tendancies and statistics for wide/short side, weak/strong 
side, and left/right run. 

• Each analysis can be broken down according to forma- 
tion, down, and yards to go. 

• Allows for up to 5 games to be analyzed simultaneously. 

• Convenient disk storage of plays and games 

• Extensive error traps, won't let you make an error. 

• Two actual games [almost 100 plays) on disk to facilitate 
your learning and evaluation 

• Documentation available separately for t3, 95.,, even 
includes some advertising and price samples to help plan 
your promotion Also included are some sample printouts 

• Hardware requirements 32K. 1 disk driver and printer 



Interfaces to your own 
basic programs, sort with 
the speed of machine code 
but with the convenience 
of basic. You don't have to 



FAST SORT 

[handles multiple dim. arrays] 

alpha'betizer 

[disk only] $19.95 



know assembly language programming to use these programs 
Just use your disk to merge our short basic programs (with 
embedded machine code) with your own basic program Follow 
our simple instructions to poke several values before making the 
user call from basic The pokes will set up a sort for string, 
integer, single, or double precision arrays Also ascending or 
descending order is controlled by a single poke Use one of two 
programs to sort arrays of the form A[1) or A(Q(1)) The disk 
includes 8 simple basic programs that are ready to merge with 
the main sort programs. Use them for learning and 
evaluation Also included is a ready to use basic program 
[already merged with the ORDER program). Use it to obtain a 
printout of alphabetized names. This program alone is worth 
$19.95. 

Sample Sort Times 
8 sec. for 1000 dbl prec numbers.. 50 sec for 5000 integers 
(Ours is one of the only alphabetizers that both ignores non alph 
characters and treats upper and lower case alike] 



Loan amortization sche- LOAN AMORTIZATION 

dules are a must for banks, ^ - _ 

S 8i L institutions, and $19.95 

accounting firms You will ^*P* *»"'y *d' Model I & III) 

be able to charge J5 plus per schedule. Multiply that times the 
number of all loans your clients make per day easiest money we 
know of! runs in about 2 minutes and achieves pin point 
accuracy with a built in calendar This sophisticated program 
produces an exceptionally professional looking printout. 



Precision Prototypes 



41Uf R<K.) 
RllilRin I. "8r 



• SptM ii\ Moiirl I or III when onlcrinK 

• Arid *tl in posLij-r .tnd h.indtirt^ 



M.islff* h.iiKf 



^S»» List of AOwUsmrs on p*g» 402 
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use with a printer only. If you at- 
tempt to use them with no print- 
er attached or the printer oft, the 
computer will freeze when it at- 
tempts to execute a print. 

Grade Book Printer 

Remember that when you 
typed the names of your stu- 
dents into the data base builder, 
I said it was the last time you'd 
have to do it? Here's proof: The 
program is designed for 9.5 inch 
by 11 inch pin feed paper. After 
the print operation is com- 
pleted, I tear off the perfor- 
ations, punch three holes in it 
and put it in a looseleat note- 
book. If the page gets full, I gen- 
erate another. The program 
prints 10 characters per inch 
and six lines per inch vertically. 
It will print one section per page 
and automatically advance to 
the next page for the next sec- 
tion. I use Okidata's Microline 
80. If you use this program, you 
should change line 1015 to 
reflect the name of your school. 



There are two operator entries 
required at the beginning of the 
program, the teacher's name 
and subject. Once these have 
been entered and the tape is in 
place, the program takes it from 
there. 

The Section Roster Printer 
program is similar to the grade 
book printer except that it prints 
the grade status of each student 
instead of a series of boxes. 

The Failure Notice Printer 

One of the objections often 
heard from parents is that the 
school doesn't communicate 
with them regarding their child's 
grade. Teachers have a tremen- 
dous amount of paperwork to 
do, and it is easy to ignore a fail- 
ing grade. This program reads 
the data tape and generates a 
note to the parent of each child 
who is not passing the course. 
After all notices have been 
printed, the program prints a 
report for the teacher so he can 
keep track of the signed notes 




"NEW USES FOR THE 

HOME 
COMPUTER 

IN THE 

STOCK 
MARKET" 



A new book— contains a gold mine of ideas!! 

Do you have the great stock and commodity trading advantages 
given by the hofne computer to the few who properly us if This 
book gives you a new insight into cycles and seasonal factors as 
they affect stock and commodity prices It g.ves you solid tools for 
measuring and profiting from them Ob' .iin ideas and programming 
never before published The writer has over 20 years experience as a 
stock brokfr and 8 years experience pfogramm'ng computers Book 
IS 8'/! inches by 1 1 inches artd has ?54 paqes and 34 programs writ- 
ten in TRS-80 BASIC 

The book txjrrows methods long understood by rddio and electronic 
engineers but overlooked by most statisticians Thus, n is able to 
present methods, never before published, of stock and commodity 
market t'mmg usmg cydes ar'cl se^ssonai vana^ions 

To order book— send check $19.95 and your name and address 
to: 

Thomas V. Lcnz, Dept. M 
596 W. Karval Ct. Spring Creek 
V Elko, Nevada 8 9801 ''", 

310 • dO Microcomputing. November 1981 



as they come back. I use roll 
paper to print these notes with a 
cut line for separating them. 
They are designed so they can 
be folded and stapled vi/ith the 
name and section showing. 

If you want to ease into it, try 
the data base builder and grad- 
ing program first. Once you've 
done this much, you'll either be 



hooked or hate it. If my ex- 
perience is any indication, you'll 
spark a lot of other people's in- 
terest when you sit with your 
feet propped up reading your 
favorite professional journal 
while your colleagues sweat 
over their grade reports. What 
used to take me two hours now 
takes me 20 minutes! ■ 



IB REH •PRINTS A GRADE BOOK PAGE FOR EACH SECTION' 

28 CLEAB 5ae:CLS:FRINT?85, ""GRADE BOOK CRINTER* •": PRINT: PRINTS7 

R1NGSI63,*") iPRINTTABlZfil'KRlTTEN FOB' ; PRINTTAB ( 21 ) "NOBTHERN HI 

DDLE SCHOOL" ;PR1NTTAB1311 "BY" iPRIhn'TABf 25) 'ROGER J HEDDEN" ;PBINT 

e9B2,"»AI.L RIGHTS RESERVEO'cGOSUBSBlBiCLS 

2i L-66!LSS-"AAA":INPUT"TEACHER'S NAHE " ;TS : INPUT"SUBJECT ";SS:C 

LS; INPUT"INSERT DATA TAPE AND PRESS ' PLAY ' " iCS: CLS : PRl NT'WORf; ING 

JB GOSUB ieiBi'READ RECORD FROn INPUT FILE 
4B IF LEFTS(ECS,2)<>LEFTS(LSS,2)THEN GOSUBIBIB 
^B IF LNS';>'END'THENG0SUB3Blfl:GOTO3fl 
te PHIST"JOB COMPLETE" :END 

leee end 

IBIB IF L066THEN GOSUB^BlBiIF LNS'"END"THEN RETOHH 

IB15 LPRlNTTABIlbl "N ORTHERN MIDDLE SCHOOL 

"iLPRINT" ■ 

lB2e LPRINTTABl^) SS; " - * ITS;TAB1681 "CLUSTER " |«IDS I UCS , 2 , 1 ) : LP 

BINTTABl 5) STRINGS (79, "•*) iLPRINT" ■ : L=6iLSS»CSS 

!03e RETURN 

2eBe EKD 

281 B INPUT! -1 .l.NS,FS,MFS,SCS.PTS,PP 

2fl28 RETURN 

JBBB END 

3B1B LPHINTTABI4) LNSi', ' jLEFTS [FS, 1 1 i TAB( 291 SCS; TABl 24 1 ' "; 

3B2e FOB X-1T017 

3BiB LPHINT'..:'; 

3B*e NEXT X 

JB45 LPRINT" " 

iibB L=L-1:LSS=SCS 

3B6e RETURN 

4BBB END 

481B FORS^LT066 iLPRINT" 'iNEXT S 

4B2B RETURN 

SBeB ENDi 'TIMER DELAY 

SeiB F0RIZ-lTOieB«:KEXTTRETUFtl 

Program Listing 6- Grade Book Printer. 



la REM 'PRINT FAILURE NOTICE REPORTS AND REPORT' 

28 CLSiCLEAB 4ee8;E-a;I-I:PRISTtie6, ""FAILURE NOTICES' "i PRINT: P 

RINTSTHINi;SI6 3,"'"l :PRIKTTAB(2ti 'WRITTEN FOR" i PR1NTTAB( 21) 'NORTH 

ERN MIDDLE SCH00L":PRINTTAB(3I) ■BY":PRINTTAB12M "ROGER J HEDDEN" 

:PR1NT09B2,"*ALI. RIGHTS RESERVED": 

2S UIM LlSdSBI (FlSflSB) ,S1S(15B) ,GH15B| :G0SUB1 Blfl iCLS : I NPUT'TE 

ArWER'S NAME-;TS:1NPUT'TEACHE!I'S SllBJECT";SS:rNPUT"REPORT DATE"; 

DS:l.L£:INPl'T"LOAD DATA TAPE, PRESS 'PLAY', THEN 'ENTeR":GS 

38 INPUT(-1,LNS,FS.MFS,SCS,PTS,PP 

4e IF LNS^'END" THEN GOS'JB 2eie;END 

SB IF INTtP-rS'lBB/PPXte THEN GOSUB SBIB 

fi B GOTO i e 

7B ill.......... tND OF MAIN PROGRAM """•.'•.•"•••""••" 

IBBB END: 'TIMER DELAY 

IBlB FOR ZZ=1T01BBB:NEXT-RETURN 

2880 ENDi'PRIOTS MASTER REPORT 

2B1B LPPlNTSTBJNG5(aB,'-*) :FOR L-1T03: LPBIHT" 'iHEXT 

2028 LPPINTTABU6) "N ORTHERN MIDDLE SCHOOL 

"iLPBlNT" " 

2fl3B LPPINTTAB|5)SS;* - * iTS;TAB(6e| DS 

2848 LPPTNTTAB(^).STHINGS(24,"') i" FAIMIRE REPORT " ; STMl NGSl 24 , ' 

•■] :LPR1NT" ■ 

Zdbd FOR S=l TO E 

2ei,e LPKINTTAB(5) L1$U;) iTAB(ZB) FIS(S) ;TAB|3'il SI S (S) : TAB 1 451 

Gl (S) ;TAFi{55) "PI.TUBNED-( ) ' 
2B7B NEXT .^ 
2880 RETURN 

3fl0B END: 'PRINTS A FAILURE NOTICE FOB EACH FAILING STUDENT 
3Ble IF Hf;-*K" then PNS="HI«':P0S-'HTS' ELSE PNS>*HEP':POS-'HER 

3B3B LPRlNTSTRINGStSB,'-"! :LPRINT" ":LPKINT* " 

3B4B LPBINTTABfBJLNSl", ' iFSjTAB165) "SECTION " j SCSi LPRINT" " : LPR 

INT" " 

38^8 LPPINTTABlia)"! THOUGHT THAT VOO SHOULD KNOW THAT "iFSl^'S 

■jSS;" GRADE IS" 

3868 LPRINT'PRESENTLY " ; INT( PTS'ieS/PP) ; "t . PLEASE TAKE A FEW 

MINUTES TO DiaCUSa THIS iilTH ";PNS:"." 

3876 LPRINT"IF YOU HAVE ANY QUESTIONS ABOUT "jPOS;" WORK, PLEASE 

GIVE ME A CALL. ■ iLPBINT' " 
30BB LPRINTTABI 10) "PLEASE SIGN AND RETURN THIS WITH ";FS;". TllA 
NK YOU." iLPRINT' " 

3B9e LPRINTTAB(4B) "SINCERELY, 'iLPRINT" " 
llaa LPBINTTAB(4a)TSi' - 'iSSiLPBIHT" " 
31 IB LPRINnAP(i) STRINGS I 2B,CHPS( 95)) :TABI60)DS 
3128 LPBINTTABlal-Slgnatuie" 
3130 FOR L-1T015:LPHINT" ':HEXT 

3140 LlSlIl-LNS:FlS(I)-F!-.SlSlIJ-SCS:Glll)-INT(PrS*iee/PP) : 1-1*1 
!E-I 
31SB RETURN 

Program Listing 7. Failure Notice Printer. 
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Enter The Soft Sector Morketing 

ARCADE CENTER 



ALIEN 
DEFENSE 

1981 Soft Sactor Miet. 

Mod I or III Tape. 16K 

$19.95 
Mod I or III Disk*. 32K 

$24.95 

Ori'v Mod II \/9mor\ ros 




ROBOT AHACK 

Dv' Big 5 

Mod I & III Tope 
$15.95 

Mod I & III Disk 
$19.95 




GALAXY 
INVASION 

Mod I & III TcX3e 
$15.95 

Mod 1 & iir Disk 
$19.95 




SUPER 
VADERS 

•-"Vei Soft Secto 

Mod I or ni Tape $19.95 

Mod I Dis* $24.95 

'vloa II Dis-: $24.95 

- 2 Piay«r- 10 Lsvvis- 

^jk kn uD0»Od» into tor 




SCARPMAN 

•H561 CofnsoT Groi45 
Mod I & III Tope 

$15.95 

Mod I & lit Disk 

$19.95 



METEOR 

MISSION 2 

bvBig£> 

Mod I & III Tope 
$15.95 

Mod I 8i 111 Disk* 
$19.96 





AHACK FORCE 

by Big 5 

Mod I & III Tape 

$15.95 
Moc: '■ & III Disk' 

$19.95 




SUPER NOVA 

cv Big £ 

Mod I 8c lit Tape 
$15.95 

Mod I & ir Disk 
$19.95 



«ai« 
l^ ifr -oi * •> ifr 4i * * 

A ,% #, * A * A ♦. 



LUNAR LANDER 

by Ai^w«ntijFe 

Mod I & III Tape 

$15.95 
Mod I 8c III Disk 

$20.95 





STAR FIGHTER 

Mod 1 8c III Tope 

$24.95 

^/od I Disk 

$29.95 



'these Disfc versions cava high score ic cIisk 

SPECIAL DEAL - This Month Only 

Purchase 1 Game - List Price / Purchase 2 Games - Deduct 10% 
Purclxise 3 Gannes - Deduct 15% / Purchase 5 Games - Deduct 20% 

5Dcc^A. 0£A1. opo-o; only fo gcmes porchosea trcr- t^t^s od. ol one ^^^^e n'^c <r tr p'+ce - 

SOFt'sECTo'r MAnKEXINoT 

INCORPORATED 



^ 



s 



Oraer Line Only 
800-521-6504 



^51* 



6250 Middlebelt 
Garden City. Michigan 48135 



Ml OrdersSc Questions 
(313)425-4020^ 

|poB« 1 d 



«• S«* im at ACntftiaerf an fMft *0i 
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If you are looking for 

The Finest In 

Word Processing Systems 

you can . . . 

1. Purchase and examine all other 
word processing programs on the 
market, and then purchase Lazy 
Writer® 

or . . . 

2. You can purchase Lazy Writer^ 
first. If s your money! 



^-^ GUARANTEE ^^ 

Lazy Writer® comes with a 

30 DAY, MONEY BACKt GUARANTEE 
Guarantying There Is Nothing Even Close! 

tLwi 10% restoclfing chaiys 



Lazy Writer® Mod I still only $125.00 

till Dec. 31 1981 

Lozy Writer® Mod III $175.00 

'Requires 2 Disk Drives to convert only. 
IHHHHHHHI^H SPECIAL DEAL 

Purchase Lazy Writer® and receive, this month only, 
MICRO PROOF v^/ith the correction feature and patched to Lazy Writer® 

Only $149.50 extra 
Reg. $184,50 

Now available from 

SOFT SECTOR MARKETING, 

INCORPORATED ^495 

For those of you who requested 
a spelling checker to use with Lazy Writer® 

MICRO PROOF 

Product of ComLx:opia Software 
EASY TO USE 

50,000 WORD VOCABULARY & EXPANDABLE 

RECOGNIZES PREFIXES & SUFFIXES 

REQUIRES ONLY 32K OF MEMORY & 2 DISK DRIVES 

AFFORDABLE & AVAILABLE IN THREE FORMS: fully independent program to identify errors- 
independent program to identify and correct errors; or with a conversion program that 
will permit MICRO PROOF to operate from within. 



New Lower Price! Was Now Only 

Tl^SMOD I or III Version S125,CX3 $89.00 
Correcting Feature Add $60.00 
Word Processing Con- 
version for Lazy Writer* Add $35.00 



Let MICRO PROOF 

Find Your Errors 

Before Someone Else Does! 




COD- certified crtock. M.O. or cash only Mosi otders shipoed next day All orders must have shipping included 
Pteose odd 2% or S2 50, whichever IS higher to* shipping. Michigan residents. pleoseadd<l% tax Adde)(traS1 50 
tor COD, PetsorvDl checks tolte 3 weeks to clear. 
Out or trie country orders odd S10.00 extra shipping. Order Line 80u-521-o504 

■TOSflO u o p(o<*x:t ci< Ooaw Shodi Ow»or oT ffw JonO, Cc*Dorarton f\/l| OfdefS 8c QueStiOOS 31 3-425-4020 



ViSA 
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'The Serious Side of Computing . 

Business Programs 



THE COMPLEAT IDIOTS BOOKKEEPER (TCIB) 

Product Overview 



GENERAL DESCAIPTION 

■ACKOaOUMO -SEPAfiATF - Thii program leodi o SMcmM Ocrta «« ond ctMcU •cxyi oaiB Bach month » 

ice woiv*ffl*n bvLonvBopw Lofty a a ChortwBd Uto UnOsiwrttw and IJt»nt«d LI* tianKicno™CT«copt«cllnloawpOfOl«tl» «mor»or»noHo™ocfionilaaoiv»nrT>ontt\ no 
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CRITPATH- 

"1980 PM Pfogrommif^g 
OHTrATH* w(il help 

- Defwmine tt>e eartiest pc«slO*e cofhpletion date for yom 
Pfoject 

- Wentltv ttw crtticol octivlties in your DfOi&ct: ttM joOs thai 
will Oekiv completion of the entHs Dfoject ff ttwv ore rwi 
comoWed or. time 

- ProviOe you wth the scneOuiad iton orxl finish Oote tor 
an protect octivit>«i so vou con plan youi loOof and 
motenoi r^eecK to sucoort the proiect corrWefon dote 

- Develop n\e inlormotKin needed to permrt you to tfMft 
resources ana furWs to crit>cai octryities from troM 



activities mdenNTied Dy trie Drogram OS bemg copoUe ol 
deiov without deloyioQ the completKiri ol ttie prajact 
CtfTFAnr pre»<de i you Hrtlh 

- Both screen and printer output! or your schedule in woik 
boys tobulatlrio ttieeorfieit itort/Tirwhond loteflslofl/ fi- 
nish day OS well OS the total float tor eoch project octMiy 

- The lerigth ol ttie critical path in wofV doys. 

■ A Ustififl of oJi octrvthes ttx:t ore on trio crlticoi pott\ (oos 
thot conrwt Oe deloywd wtttwut detoy*^ th© enfre 
pioject 

- A pnfitei output o( the octuoi caienOoi dotes for ttw 
eofliesf stoit/finish and loteit start/finijh otong with tx;th 
tree arxi totoi ftod toi each octuflty 

- Vour crwice of pnnhrio out dota sorted coraecutivWv 



MUKEVC 

•19B1 Sfi Chor^ges OiOl files to VSt CAlC rtoicfxjTje 
tormot or toKe ^ nies arid rncKes it into IDIOT raodobie tile 
Now Only f 24.9S 

Make VC leQuiras Complaot Idiots Bookkeepef 



Specioliv de*igr«d for builOeri by a boildei Also v^oiks 

well WTth mony other Dusinetses 

MOD I «MN).00 

MOD 111 $710.00 

Monuo' lUJM) 

CXeiview , Free 

ReQures48K I disli dnvei and 132 column pnntor 




COD - coftified Check, M.O oicashonly. Most orctere shipped next day, Allorctersrnust hove shipping inclucJed. 
Please odd 2% ofS2.50.whichevef is higher for shippir^g Michigan residents, pleoseaddi% tax. Add extra SI. 50 
for COD F>ersonai checks take 3 weeks to clear OrHar i ir-ia AOiX *94 AUU 

Out a( the cixintry ofders add $10 00 extra shipping Uroer Line OUV-a^l -09V4 

■T?S8Clisoo(oduC'o<RoaioShocl>. dviiran of ttie lonoy Corporoton Ml Ord©rS & QU8StiOnS 313*425-4020 



►^434 



VISA 



r'Sov List ol Aaveitisers on page 402 
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UTILITY 



An old fashioned project for sentimental Model 15 owners. 



Baudot LPRINT 



Wlntord Rister 
Route 10, Box 33 
Lake City. FL 32055 



It only took a few hours on my 
new TRS-80 for me to realize 
that some type of hard copy was 
essential for any serious pro- 
gramming. Not being willing to 
Invest the amount of money nec- 
essary to purchase a good print- 
er, and preferring not to buy an 
inferior one, i toolt a hard look at 
using my model 15 teletype, at 
least as a temporary measure. 

Now, unless you either own a 
baudot machine or can get one 
for a short song, the conces- 
sions which go along with using 
one make It impractical. The ma- 
jor disadvantage is not the lack 
of speed, but the Inability to 
pfint many of the standard ASCI) 
characters. The snail's pace 
printing is annoying, but if you 
plan your evenings well you can 
overcome that part. J ust do your 
LLISTs and long LPRiNTs as 
you watch television or while 
having your evening meal. 

if you are still reading I as- 
sume you are either as stubborn 
as i am, have your own baudot 
printer, or are curious. Assum- 
ing you have a current loop driv- 
er which is TTL compatible, the 
hardware Interface is very sim- 
ple, requires no modification to 

314 • 80 Microcomputing, November 1981 



the TRS-80, no connection to the 
keyboard port, and does not in- 
terfere with any cassette opera- 
tion. It does connect to the cas- 
sette port and therefore requires 
a method of connecting to the 
miniature phone plug that goes 
to the recorder. I installed a sim- 
ple Y adapter In my recorder, 
plugged the lead from the key- 
traard into one side, and the wire 
going to the printer interface in- 
to the other side. This elimi- 
nates constantly plugging and 
unplugging the recorder, and 
running the risk of breaking the 
wires from fatigue. The two 
functions work well, though 
wired parallel. 



Hardware 

The circuit is shown In Fig. 1. 
A machine-language program 
takes input from the LPRINT 
function, converts the data to 
baudot, serializes it, and out- 
puts it to the cassette plug. 

This output Is fed into one 
section of an LM3900 op amp to 

TiSSETTt -*U"" 



J 



I/* LM3900 



iOO> 
6V 



bring theO.8 volt pulses from the 
recorder port up to TTL level. 
The two sections of the 7414 
Schmidt trigger Inverters serve 
as buffers. The output of the 
7414 goes to your TTL drivable 
current loop. Several articles 
have been published in 73 and 
Kilobaud for 60 and 20 mA cur- 
rent loops. 

In this configuration a mark 
condition Is represented by a 
high TTL level. This causes the 
loop to be active when the pow- 
er Is on the interface except 
when the TRS-60 sends a space 
signal. This prevents the ma- 
chine from running "open". 

Since this is a temporary mea- 
sure for me, 1 stopped with the 
breadboard version of the inter- 
face. Ihavetieen using it forsev- 
eral months without any prot>- 
lems. 

Softwani 

The program Is straightfor- 
ward, although It may not ap- 
pear so. Program Listing 1 is the 




1/6 741^ 



10 TTT 
LOOP 



RtSI5T0«5 ' 1/4 WATT 



Fig. 1. Circuit Diagram. 



assembly listing (the program 
was hand assembled). The char- 
acter to t>e LPRINTed is passed 
to the LPRINT routine in the C 
register by Basic. The normal 
LPRINT routine begins at loca- 
tion 058D H, which is pointed to 
by locations 4026H and 4027H 
of the printer device control 
block (DCB). This Basic program 
POKES the starting address of 
the new routine into these loca- 
tions. That is, it puts location 
7F00H Into locations 4026H and 
4027H. All subsequent LPRINT 
or LLIST commands will now go 
to our new location. 

The character to be printed is 
limited to 7FH (to limit the table 
size). The program checks the 
incoming character for specials 
such as space, carriage return, 
%, <, =, etc. After this check- 
ing, a determination is made as 
to whether or not the carriage 
should be shifted. Once this de- 
cision is made, a flag is checked 
to see if the printer is in the nec- 
essary condition, and if not, sets 
it to the proper condition. Since 
there is no feedback from the 
printer It is necessary to disable 
the "unshift on space" feature. 
(On the model 15 this is a lever 
just above the keyboard.) 

Now that our routine has prop- 
erly determined the printer con- 
dition, it gets a substitute char- 
acter from the table 7E00H to 
7E7FH, for the ASCII character 
to be printed. This character is 
passed to the OUTCH subrou- 



6 ways to give 
yourTRS-80*a 



+ PLUS 



EAhaustive research and professional standards 
bring you the best in business software. 



EASYTRAK"^ 

KEEP YOUR SALES CURVING UP- 
WARD WITH EASYTRAK"". a powerful 

all-purpose activity tracking system. User- 
specified options enable you to monitor 
sales activity by territory, product line, 
salesman, or by combinations. Can 
monitor inquiries, sales calls and order 
booking. Production activity (by shift, by 
product, by day. by team. 
etc.). spending or in- 
come activity are simple 
to set up with tASY- 
TRAK'"" . Extensive video 
displays make available 
individual, group or total summaries, rela- 
tive averages, and percentage data all at the 
touch of a button- Use of an 80-column 
printer is optional. 



MODEL I/Ill 
MODEL [l 



$125 
$150 



' GENERAL LEDGER 

SLICE OUT MORE PROFIT by using 
' General Ledger to monitor your financial 
status. Features include fully-flexible finan- 
cial statements, both budget and last year 
comparisons, special report options, 
monthly and quarterly trial balances, man- 
ual and, or automatic journal entries all with 
extensive audit trails. You structure the 
chart of accounts with up to 5 digit account 

numbers. 

MODEL l/Ili $325 

MODEL II $350 





+ ACCOUNTS RECEIVABLE 

PUT MORE CASH IN 
YOUR BANK AC- 
COUNT with -t-Account 
Receivables many col- ej 
lection/credit features, 
including average pay- 
ment days. aging 
schedule and statements. 
Open-item system records sales activity 
this year and last, optional automatic dis- 
counts and salesman assignment. Cash re- 
ceipts and A, R adjustments feature exten- 
sive on-line validation. And. yes. ^ Accounts 
Receivable handles the pesky new 9-digit 
zip code. Other optional features include 
service charges to selective customers: 
partial and ■on-account" payments- Posts, 
at your option, to t- General Ledger. 



MODEL I/Ill 
MODEL II 



S325 
5350 



+ FIXED ASSETS 

A POWERFUL SET OF TOOLS TO 
CALCULATE and monitor fixed asset ex- 
penditures, book and tax depreciation, in- 
vestment tax credit, etc. Will even forecast 
future depreciation for you. {Handy at 
budget time!) Code structure enables you 
to classify assets by departments, buildings, 
groups or other categories. Handles seven 
depreciation methods. Can post to t Gen- 
eral Ledger for you. 

MODEL l/III $325 
MODEL II $350 




+ACCOUNTS PAYABLE 

FUNNEL THAT STACK OF BILLS into 
-^Accounts Payable system and create an 
orderly, manageable flow of vendor his- 
tories, cash requirements forecasts, check 
registers and checks, aging schedules, etc. 
Will accept manual checks. 
reversals, and adjustments 
Pay by selected vendor, in- 
voice, due dale, discount 
dates, and optionally post di- 
rectly to your + General 
Ledger. Supports 5-digit 
vendor numbers. 



MODEL I/III $325 
MODEL II $350 




$ 
$ 



+ PAYROLL 

KEEP YOUR EMPLOYEES HAPPY and 

smiling with prompt, accurate and profes- 
sional payroll records Will handle weekly. 
biweekly, semimonthly, monthly payrolls, 
produce checks, check 
registers, labor reports, 
earnings reports. Form 
94 Is. W2s. etc. Can 
handle fixed/ voluntary 
deductions, hourly ' 
salary employees. 
bonuses, city and state taxes, etc. Lasy to 
use and update tax tables. AuloiTiattc 
* General Ledger posting. 




MODEL I/III 
MODEL II 



$325 
$350 



SPECIAL! AU of the above: MODEL I/III $ 1600. MODEL II $ 1 750. 

+ PLUS SOFTWARE comes to you feature-packed from on-line validation to 
machine-language tile handling. Extensive documentation and thorough installa- 
tion guide accompany each order. All systems are furnished on disc. Source code 
IS included. Texas residents add 5% sales tax. 



To order, call TOLL-FREE 24 hours 
1-800-231-7315 

•'Sve List Qf Atl<i9'tiS9rs onpt>g9 402 



+ PLUS 



PLUS COMPUTER TECHNOLOGY, INC, 

POSIOfFICE 80XnS2 

ANCUTON, TtXAS 77S1 S (71 J) 94*1108 



^ 131 



Dealer inquiries invited 

TRS-30 IS a FctiJilpicd (raOenar- ot lard; Corp 
[ASVTRAK 15 a tfad*mjrl< o> Plos Cc:mcuiei Tpch (nt 
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tine in the A register. By using a 
timing loop the character is 
shifted out serially through port 
FF, the cassette port. All bits ex- 
cept bit are forced to during 
the LPRlNTing. This keeps the 
cassette motor relay from trying 
to open and close at 45 baud! 

If you look at the baudot sub- 
stitution table. Fig. 2, you will 
see that the five-bit character 
has an eight-bit code. That is be- 
cause the substitute character 
contains the data bits, the start 
bit and two stop bits. The stop 
bit requirement is actually about 
one and one half times the peri- 
od for a data bit. But I found that 
my printer works perfectly with 
only one data-bit-length stop bit. 
So I Ignore the second stop bit 



by only shifting out seven bits 
(location 7FBBH). If your ma- 
chine has problems you can 
change this to 08H and output 
eight bits. However, this will 
cost about 12 percent In speed. 

The timing loop period is de- 
termined by the value stored in 
k>cations 7E84H, 7E85H. I found 
that there is a wide range of ac- 
ceptable values, and this is the 
center of the range. If you have a 
faster baudot machine, this 
number will have to be reduced 
accordingly. 

Location 7F31 contains the 
character number upon which 
an automatic carriage return 
and line feed will be issued. No 
characters are lost in this func- 
tion. I made no provision for 



page format, yet a counter could 
be incremented after each 
CR,LF and checked for page 
length. 

Using the Program 

All addresses given are for a 
16K system, but this program 
works well in a 4K system as 
well. Fig. 3 lists the changes for 
a 4K system. Program Listing 1 
is the Basic listing. 

To use the program enter a 
number less than 32255 to the 
memory size prompt. For sim- 
plicity, I always enter 32000 
tMcause It causes problems if I 
forget and put a five where a two 
should be. Next CLOAD the pro- 
gram and run it. As the program 
executes, it prints the hex code 



on the screen while It POKEs in- 
to memory. As soon as you get 
the Ready prompt you can re- 
move this Basic program from 
memory and use Basic as usual. 
Now the LUST and LPRINT 
functions will operate your 
printer. 

For safety, I always LPRINT a 
number and letter to get the 
printer In position after 1 first 
load the routine. The motor 
should be turned on after the 
k>op is activated and turned off 
before the loop is deactivated. 
Programs which do not heed the 
memory size restrictions such 
as the Editor/Assembler will 
have to be modified {Kilobaud, 
Jan. 80) if you want to use this 
hard copy routine with them. 



Character Hex Code 


Character 


Hex Code 


A - 


C6 


Q 


1 


EE 


B ? 


F2 


R 


4 


D4 


C : 


DC 


S 


Bell 


CA 


D $ 


D2 


T 


5 


EO 


E 3 


C2 


U 


7 


CE 


F r 


DA 


V 


; 


FC 


G & 


F4 


w 


2 


E6 


H # 


E8 


X 


1 


FA 


1 8 


cc 


Y 


6 


EA 


4 ' 


D8 


z 


■■ 


E2 


K ( 


DE 


LFLF 


C4 


L ) 


E4 


CRCR 


CX) 


M . 


ra 


SPSP 


C8 


N , 


06 


LTRS 


FE 


9 


FO 


FIGS 


F6 


P 


EC 


IDLE 


FF 




Fig. 2. Substitution Table 





UNE 10 M - 19968 ■ FIRST BYTE OF PROTECTED MEMORY 

UNE 100 IF M * 20102 THEN GOTO 500 

UNE 105 rF M > 20430 THEN END 

UNE SOOMa 20224 

UNES 1001 TO 1065 CHANGE ALL REMARKS OF 7EXX OR 7FXX TO 4EXX OR 

4FXX RESPECTIVELY 

1040 DATA 79.Ee.7F.FE.0O,CA.AA.4F,FE.25^«2,FE.20,28.67 
1042 DATA FE,K.28.6C.Fe.30.28,73.FE.3E^7A.FE.5e,CA,A1 
1044 DATA 4F,FD.21.00.4E,CO,2B,4F.C3,3A,4F,F5,3A.B0,4E,3C 
1046 DATA FE,49,CC,AA,4F,32,B0.4E,F1,C9.32.82.4E.FE,41.30 
1048 DATA 11.FD.CB,81.46.2fi.1C,DD,2A,S2.4E,DD.4E.00.CD,BA 
10S0 DATA 4F,C9.FD.CB^1.46.2a,EF.FD.CB.81.a6,3E.FE.CD,BA 
1062 DATA 4F.18,E4,FD,CB,81,C6.3E.Ffl.CD,BA.7F.18,DS,3E^ 
1054 DATA CD,25,4F,CO.47,4F,C9,3E,Ce.CD,26,4F,C0,BA,4F,C9 
1056 DATA 3E,4C,CD,25,4F,3E.54,CD.26.4F,C9,3E,45,CD,25.4F 
1058 DATA 3E,51,CD,26,4F,C8,3E,47.CD.25,4F.3E.54,CD,25.4F 
1060 DATA C9.3E.1B.CD.2S,4F,CO.47.4F,C9.3E.D0,CD,BA.4F^E 
1062 DATA C4,CD.BA.4F,3E,00,32,80.4E.C9.06.07.F5,a,Ot,EE 
1064 DATA 01,D3,FF,F1,CB^F,CD,CC.4F,10,F1.C9.11,01,00,2A 
1066 DATA 64,4e,ED.S2.20.FC.C9 

Fig. 3. Substitutions for 4K System. 



- - - LIICOS - - - 

CASSETTE OPERATING SYSTEM 
FOR RS MODEL I LEVEL II USERS 

THE LOWEST ALTERNATIVE TO DISK 
FEATURES: 

■ UP TO 9 TIMES FASTER THRUPUT 

■ LOGICAL RECORD PROCESSING 

■ NEW UIC05 STATEMENTS 

OPEN - CLOSE - EOF - DEFM 

■ INCREASED TAPE CAPACITY 

UP TO 700.000 BYTES/60 MIN 

• OPTIONAL 2000 BAUD TAPE ROUTINES 

LIICOS $34 99 COS-2000 BAUD S44 95 

ADD 2 OO S8tH DOCUMENTATION S8 95 

1904)478-0769 

■-390 

CANTY ft ASSOCIATES 

890e BELUNGTON. PENSACOLA FL 32504 



«DEflTHBLakU» 

Rn kncredibkerieuj 

SPftCE ftDUEHTURE 

From L0.5. In Basic 




Send Check 
On IVIoney 
Order To : 

I.D.S. 
PO. Box 14SS 
Dallas. Texas 

'522T ocxuMfHiAi 



O 1BK -$1500 
D 32K- $17.50 
D4BK- $2QOO 
OAII 3- $3000 



ion IHCIUMD 



►-365 

• lot lt«l 




* HARNESS* 

♦GREYHOUND • 
HANDICAPPING AIDS 

P\] t A CO-PU'EH ON ■ilX.n SIDC 

a^0 GtT ISIO THE HiNNi-JC. 

"*BFI WITH WHMuf , SOf IWARE 

MANDICAr^rNG AIDS 

DBienad ticluiivtlv lor ui* »iih 'TRStQ <Mod*l I or 
Pockai CompuKr v«(iioi>[|, >w btlicvt our HARNESS inO 
GHEVHOUND uttiHri hundicapptng aidi «ii Ihi moit 
Mtttntaii and uiatul «*ch iviTami availaUa anyvvtitft With 
OUT bIivib'*, you' lioma computar dovi all o( your dillicull 
and iMhMii hanctiapp'ng chorn quxhlv. aflorilatriv. and 
■xurataly in iha Ouial and eomtori ol your home (or oiih 
Bia pocktt eornputar. lata it le tna track mth you I Noi 
limply a mattiamii.cal tiarciir too!, riihtr yaari ct roMrch 
'wva (on* inlQ ina dnalopmvnT of Tha alporiihrrH ui»d. 
Onignad for mm of opariiion whil* inuring a rno« csiD' 
^•ftaniiva approacn. BOTfi anil art availaMa on taualla and 
diih tS%" and S") formaii and mciuda a w«ful a«fy io-r*ad 
Uw'i ManMt (NOTE In addilion to •THSSO'i Modal I 
and Pothat Csmputft. boih iyit*mi wa •>■! labia >n 
WlASIC-tor "CP/MI, RaouiTH mim-ryj^ t6< Lnal II 

Shop around -you wit baat tha W«Mur yalua tha rrwfl 
mn ('fattiva yyiiami nn tha markai Juit (79 95 (oi 
oiHtM and t34 9S for O'lti pint SI 00 lot handling arri 
rfiipptng cDiti ICalit. add 6% lalai laa) Sava wih t^• 
puichau o( tno or mora Mi* lytianu Oaalai dncourtt 
availabl*. Allow thraaiHMht tof dalntry. 

Sand Chick, Monty Ordtr or rfgunt fof Md'tiQi*' inform*- 
uon w 

nalMv o< Calitorna inc .^411 

PO flDiM nc 

Framoni. CA94537 



T-Adtmjfh o' Tandy Co 



•I'ldtnu'i ot DigiKl nnnrt^rt. in 
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AMERICAN 



\L 



118 SO. MILL ST • PRYOR, OK 74761 
PHONE (918) 827-4844 



ALL LISTED PRICES ARE CASH DISCOUNTED. WE ACCEPT MC. VISA, AND COD {REQUIRES CERTIFIED CHECK, CASHIER'S CHECK OR 
CASH), FOR CHARGE ORDERS, PLEASE ADD 3%. FOR COD SERVICE, PLEASE ADD 5%. 
OKLAHOMA RESIDENTS PLEASE ADD 4% SALES TAX. 

TRS-80 MODEL 1 
MINI DISK DRIVES 



Our Mini Disk Drives are based on the world tamous 
TEAC Mini Disk Unit, TheTEAC Unit features an esti- 
mated 8000 power-on-tiours mean time between failure 
(that's 8 hours a day, 5 days a week, for 3.85 years!!). 
Our drives also feature a lead screw head positioner-not 
a band type positioner. This type of positioner insures 
accurate head positioning over the read-write media 
while giving a very quiet, noise-free read-write opera- 
tion. If you have any doubts about our drives, our on» 
year warranty should convince you that we know this 
unit is the b«il drive at the bMl price on the American 
market. This is one example where you can pay less 

and get morel! 

MODEL 1 40 TRACK FULLY TRS-eO COMPATIBLE 

DISK DRIVE >2«5 

MODEL 1 80TRACK DRIVE (R«qutrei NEW DOS 80 

or aqulvtlanl software to work) (369.95 

NEWDOSeO (Version 2.0) $139.95 

BOX OF 10 VERBATIM 

DATALIFE DISKETTES $29.95 



$267 



COMPLETE DRIVE 
WITH POWER SUPPLY 




►-584 



TRS 

DISCOUNT PRICES ON TRS-80 
M ICROSOFT SOFTWARE 

Basic Comptltr — MODI 159.95 

CPM or TRSDOS - MOD 2 319.95 

Fortran-SO — MOD 1 79.95 

CPM Vortlon — MOD 2 399.95 

COBOL (CPM Version MOD 2) 599.95 

M /SORT (CPM Version MOD 2) 119.95 

"ADVENTURE (MODI, Disk Version). ..19.95" 
Olympic Decalhton (Mod 1, Disk Version). ...23.00 

Typing TutOf(C*sselle Version Only) 14.00 

mu MATH/mu MATH SIMP-80 Symbolic Math 

Package % Call 

Ed (tor/ Assembler Plus 

(Cassette Version Only) 24.00 

DISCOUNT PRICES 

ON OTHER SOFTWARE PRODUCTS 

FORTHETRS-SO 

i N EWDOS 80 (Version 2.0} 

I MOD 3 or MODI 139.00 

I COflDOS (An enhancement to the TRS-80 MOD 2 
TRSDOS operating syslem which allows the use 
el a CORVUS Winchester Disk System). .300.00 



80 SOFTWARE 

Proofreader-Proofreader will check your scrip- COLOR COMPUTER OAMES 
sit', electric pencil, soft-tex, or other documents AT DISCOUNT PRICES 
for spelling and typographical errors. Proof- 
reader can check every single word of even the Packet Man— Very similar to the popular arcade 
longest document in under 5 minutes! The 38,000 game 'Pac-Man'. In this exciting game you must 
word dictionary, one of the largest available, can dodge the munchkins who are out to eat you. 
be easily extended with a user auxiliary dictionary very challenging and impossible to beat. Our 
to add any number of new words (only limited by most played computer game!! Only. ..24. 95 

disk file space). Only 99.95 

Color Space Invaders 21.95 

Soft-Screen— Soft-Screen is a state of the art full Meteroids 21.95 

screen text editor. If you have never used a full Game of Life 14,95 

screen editor before, you will be amazed at the Lunar Lander 14.95 

power it gives you. Soft-Screen can literally save 

you hours of work!! Only. ..99.95 BUY ALL 5 COLOR COMPUTER GAMES AND 

SAVEEVENMOREII 

GrammatiK-A speilmg checker rnay not be aiISoI theabovegames Only...e«.»5 
enough to catch all the dumb mistakes made by 
that less than efficient secretary!! Grammatik 

checks for capitalization, punctuation, balanced 918-825-4844 

parentheses, and doubled words ('The The"). RETAIL STORE LOCATION 

Grammatik also checks for sexist terms or esoteric SOUTHWOOD PLAZA SHOPPING CTR. 

jargon, word overuse, and misused phrases. PRYOR OK. 
Grammatik also includes utilities for adding your 

own dictionary of misused words and phrases. yiyj tanDY CORP. ^ uq 
Only... 99.95 



IT^ere are a few subtle traps 
which you should be aware of. 
An example Is the substitution 
for less than, which Is LT. If you 
list a program and later reenter 
it from the listing and don't 
catch the substitutions, you will 
run Into problems. The break key 
does not seem to work while the 
printer Is going, but It will It you 
will just hold It down until the 
TRS-80 Issues a CR,LF. 

In summary I would like to list 



what I think are the most Impor- 
tant advantages and disadvan- 
tages of using a model 15 printer 
with your TRS-80. 



AdvinttQM 

Baudot printers are easily ob- 
tained and cheap. This Interface 
can be constructed for less than 
five dollars (excluding power 
supply). This routine Is easily 
stored on cassette for easy 



7Ta« 


79 




LD 


A,C 


GET CHARACTII 


7rii 


ES 7F 




AND 


A,7 7H 


LirllT TO TF 


7Ft3 


FI BD 




CP 


A,gDH 


CHK FOR CR 


TfBJ 


C* ** 7r 




JP 


z,oirrcRLF 




TFas 


Ft 2i 




CP 


A,25K 


CMK 70R " 


TFBA 


28 t2 




JR 


z,oin" 




77IC 


FT 29 




CP 


A,28K 


CHK FOR SPACE 


7FIE 


28 <T 




JK 


3, OUTSP 




7rn 


FI :c 




CP 


A, sex 


CHK FOR LT 


7n2 


38 5C 




JH 


I.OITTLT 




TFl* 


Ft 3D 




CP 


A, SDH 


CHK FOG Ed 


7716 


as 73 




Ji 


7,0inTll 




7F18 


Ft SE 




CP 


A,3EK 


CHK FOR CT 


TFIA 


28 7A 




J8 


iiOincT 




TFIC 


n SB 




CP 


4,5BM 


CHK FOB 1 1 


TFlt 


C* 41 7F 




JP 


l.OUTII 
IT ,7EMH 
IHlT 




7F21 


7D 21 BS 7E 




LD 


INITIALIZE Y 


7ra5 


CD 2B 77 


INI71 


CALL 




7Fa8 


es 3* 77 




JP 


CONVERT 




7728 


75 


IMIT 


POSH 


A7 




7F2C 


34 BB 7E 




LD 


A,C0»JKT11 




7r2F 


3C 




IKC 


A 




7ni 


Ft 49 




CP 


A,49M 


CHX FOR 73RD CMCTR 


TFJ2 


CC 4A 77 




CALL 


A.OUTCBLF 

COU)CR,A 




7F35 


33 M 7t 




LD 




mt 


71 




POP 


AF 




Tra* 


O 




(ET 






7^3* 


32 B2 7E 


CON VI 11 


LD 


MBOX.A 
A,41H 
»e, LTRSET 
B,<IT47LAC] 




7F3D 


7t 41 




CP 


CKX FOR SkET or UKSK7T 


7TiT 


31 11 




JH 




7741 


7D CB SI «< 


71CSET 


BIT 


SH7T TST 


714) 


28 IC 




JR 


Z,0UT71C 
it.KBOX 




7F47 


VD 24 82 7E 


CLOin 


LD 


617 077SET 


7F4B 


DD 7E M 




LD 


A,(lIlTSTIT)CtT Sub chrtr I 


7741 


CD 84 7 F 




CALL 


OUTCH 




TDl 


c» 




RET 






7752 


7D CS 81 44 


LTRSET 


BIT 


B,(ITt7L4C> 


SHH TST 


77M 


28 tr 




JH 


7,aouT 




7F58 


7D CB 81 S< 


0UTL7R 


RES 


B,CIT47LAG) 


CLR 


7r)C 


3t 71 




LD 


A.riH 

OUTCH 


PRINT LTRS 


7F)I 


CD 84 7 7 




CALL 




TFd 


18 E4 




JR 


CLOUT 




7F43 


7D CB 81 CS 


OUTFIC 


SET 


B,(IY4n.AC) 


SET FLC 


7rt7 


3E 78 




LD 


A,7(H 
OUTCH 


PRINT FICS 


77(1 


CD B4 77 




CALL 




7F«C 


IB D9 




JR 


CLOUT 




7F«I 


3E 29 


OUT' ' 


LD 


A,25H 
INITl 


PRINT ■■ 


7rTi 


CD 23 77 




CALL 




7773 


CD 47 77 




CALL 


CLOUT 




7F7« 


C9 




RET 






7777 


3t C8 


OUTSP 


LD 


A.CBH 

INIT 


PRIWT SPACE 


777» 


CD 2B T7 




CALL 




7nc 


CD BA 77 




CALL 


OUTCH 




77T7 


C9 




RET 






7ru 


3E 4C 


OUTLT 


LD 


A,«CH 
INITl 


PRIHT LT 


7782 


CD 25 77 




CALL 




7 7B5 


31 34 




LD 


4,54H 
IHITl 




77B7 


CD 23 77 




CALL 




7F8A 


09 




RET 






778B 


3t 45 


OUTEO 


LD 


A,45H 


PRINT EO 


7FSD 


CD 25 77 




CALL 


INITl 




7rM 


IE 31 




LD 


A,3IH 




TFM 


CD 23 77 




CALL 


IHITl 




77« 


C9 




RET 






77)C 


3E 47 


OUTCT 


LD 


A,47H 


PRIMT ET 


77M 


CD 23 77 




CALL 


INITl 




7F»B 


3E 34 




LD 


A,54K 
INITl 




7F>[) 


CD 23 77 




CALL 




77A« 


C> 




RET 






7FAI 


3E 18 


wrni 


LD 


A,5BH 


PHIPfT It 


7FA3 


CD 25 77 




CALL 


INITl 




77AC 


CD 47 77 




CALL 


CLOUT 


□0 IT ACAIN 


77AS 


C9 




RIT 






77U 


3E DB 


OOTCRLr LD 


A,DBH 


PRIWT CRLF 


774C 


CD BA 77 




CALL 


OUTCH 




774F 


3E C4 




LD 


A,C4H 




7781 


CD BA 77 




CALL 


OOTCH 




7784 


3E BS 




LD 


D.HK 

COU«TR,« 


CLEAR CHRTR CffTR 


77B« 


3 3 St 7E 




LD 




Tn» 


C9 




RET 






77B* 


B< f7 


OUTCH 


LD 


B,B7H 
AT 


SET FOR 1 STOP BIT 


7TK 


75 


HOLD 


PUSH 


SAVE CHARACTER 


77BD 


E6 Bl 




AND 


A,B1H 


PRESERVE OTHER BITS 


7787 


EI Bl 




XOR 


A,B1H 




77C1 


D3 77 




OUT 


AjFEH 
A* 


SEND DATA BIT TO PRTR 


7FC3 


71 




POP 




77C4 


CB 27 




SRA 


A 


SHIFT IN (ffXT BIT 


7rC( 


CD CC 77 




CALL 


DELAY 




7rcs 


IB 71 




0JH7 


HXD 




77CB 


C> 




RET 






7 FCC 


11 Bl »» 


DEL4Y 


LD 


DE,B«B1K 




7rcr 


24 84 7E 




LD 


HL, CYCLES 


CET DELAY PERIOD 


77D2 


ED 32 


LOOP 


SBC 


HL,DE 


DECREKENT BY ONE 


7704 


2B 7C 




JR 


H7,LO0P 




•trot 


Cf 




RET 




END 07 PROGRtll 






Program Listing 1. 





kiadlng and editing, and the 
POKEd version is about a half 
kilobyte. Regular paper can be 
used, which Is much easier to 
read than 20 or 40 column print. 

Dttadvantages 

All ASCII characters cannot 
be printed, so substitutes must 
be made. The print is very slow 
and very noisy, and some spe- 
cialized forms are difficult to 
use. The processor Is tied up do- 
ing the trivial task of counting 
while In the timing loop, and In- 
terrupts should be disabled 
while using this routine. 



Now that you have some of 
the facts you can decide if It's 
worth the effort to get that 
cheap hard copy. Once I got the 
routine all debugged I wondered 
why I waited so long to do it. A 
good fast printer Is certainly in 
my future, but for now I can print 
summaries, reports and even 
gummed labels for a mailing list 
which look as nice as many of 
those from expensive printers. 
Withalittlecarein reading, I can 
list all my programs when they 
get too large to fit on the screen. 
My conclusion is: The effort was 
certainly worthwhile.H 



1 REM 


LPRINT TO BAUDOT TTY ::: KR ::: JUNE 


28 


,1980 


16K 




5 CLS 


iPRINT'WRITING PROGRAM PLEASE WAIT" 










7 POKE 16*22, B:P0KE 16423,127 










10 M- 


32256 'FIRST BYTE OF PROTECTED MEMORY 










2e READ KS 










21 PS-H$ 










22 H- 













25 FOB I-l TO LEN(HS) 










30 AS-RIGHTS(HS,1) 










40 IP AS>-'A"ANDAS<-"F"THENA=ASC(AS)-55 ELSE A'VAL(A5) 




50 H-H+A*161 (I-l) 










60 H5-LEFTS(HS.LEN(HS)-1) 










70 NEXT 










75 PRINTPS;" " ; 










efl POKE H,H 










90 H' 


M+1 










100 IP M-32390 THEN GOTO 50fl 










105 IF H>32726 THEN END 










110 GOTO 20 










500 M-32512;GOTO20 










999 REM KEH LOCATION 7E00 










10BB 


DATA FF,FF,FF,FF,FF,FF,FF,CA,FF,C4,C4 


C4 


C4,DB 


FF 


FF 


1001 


REM 7E10 










1002 


DATA FF,FF,FF,PF,FF,FF,FF,FF,FF,FF,FF 


DA 


FP,FE 


FF 


FF 


1003 


REM 7E20 










1004 


DATA ce,DA,E2,EB,D2,D6,F4,D6,DE,E4,DA 


F4 


D8,C6 


F8 


FA 


1009 


REM 7E30 










1010 


DATA EC,EE,E6,C2,D4,E0,EA,CE,CC,F0,DC 


EC 


FF,FF 


FF 


F2 


1011 


REM 7E40 










1012 


DATA FA,C6,F2,DC,D2,C2,DA,P4,EB,CC,D6 


DE 


E4,F8 


DB 


FB 


1013 


REM 7E50 










1014 


DATA EC,EE,D4,CA,E0,CE,FC,E6,FA,EA,E2 


DA 


FF,FF 


CB 


FE 


1019 


REM 7E60 










1020 


DATA FE,C6,F2,DC,D2,C2,DA,F4,E8,CC,D6 


□ E 


E4,P8 


DB 


F0 


1021 


REM 7E70 










1022 


DATA EC,EE,D4,CA,E0,CE,FC,E6,FA,EA,E2 


FF 


FFpFF 


FF 


FE 


1029 


REM 7E80 THRU 7E85 










1030 


DATA 0B,00,B0,7E,AB,05 










1039 


REM 7P00 










104B 


DATA 7 9,E6,7F,PE,0D,CA,AA,7F,FE,25,28 


62 


FE,20 


28 


67 


1041 


REM 7F10 










1042 


DATA FE,3C,2e,6C,FE,3D,28,73,FE,3E,28 


7A 


FE,5B 


CA 


Al 


1043 


REM 7F20 










1044 


DATA 7F,FD,21,00,7E,CD,2B,7F,C3,3A,7F 


F5 


3A,B0 


7E 


3C 


1045 


REM 7F30 










1046 


DATA FE,49,CC,AA,7F,32,e0,7E,Fl,C9,32 


82 


7E,FE 


41 


30 


1047 


REM 7F40 










1048 


DATA 11,FD,CB,81,46,28,1C,DD,2A,82,7E 


DD 


7E,00 


CD 


BA 


1049 


REM 7F50 










1050 


DATA 7F,C9,FD,CB,81,46,28,EF,FD,CB,81 


86 


3E,FE 


CD 


BA 


1051 


REM 7Fe0 










1052 


DATA 7P,1B,E4,FD,CB,B1,C6,3E,F6,CD,BA 


7F 


18, D9 


3E 


25 


1053 


REM 7F70 










1054 


DATA CD,25,7F,CD,47,7F,C9,3E,C8,CD,2B 


7F 


CD,BA 


7F 


C9 


1055 


REM 7F80 










1056 


DATA 3E,4C,CD,25,7F,3E,54,CD,25,7F,C9 


3E 


45, CD 


25 


7F 


1057 


REM 7F90 










105B 


DATA 3E,51,CD,25,7F,C9,3e,47,CD,25,7F 


3E 


54, CD 


35 


7P 


1059 


REM 7FAa 










1060 


DATA C9,3E,1B,CD,25,7P,CD,47,7F,C9,3E 


D0 


CD,BA 


7F 


3E 


1061 


REM 7FBB 










1062 


DATA C4,CD,BA,7F,3E,00,32,80,7E,C9,06 


07 


F5,E6 


01 


EE 


1063 


R»t 7FCB 










1064 


DATA B1,D3,FF,F1,CB,2P,CD,CC,7F,10,F1 


C9 


11,01 


00 


2A 


1065 


REM 7PD0 










1066 


DATA 84,7E,ED,52,20,FC,C9 










1070 


END 

Program Listing 2. 
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Color Computer News 

Coloi Comput«i Nam Is the tlist and only magazine devoted lo the useis 
ot Radio Shack s Color Computer Coloi Computei Ifem allows CC users to 
hove a source of inlormotion about theli machine plus loiums loi the ex- 
change o( ideas, discoveries. help& oikI complaints. CCH is published every 
other month and contoirw teatures like 6(109 Assembler programming 
Novice Basic. Advanced Basic, Letters and Technical Forums CCN reviews 
current products lor the Color Computer and lells the truth about ihem good 
or bad 

[I's not Just a begliiners magazine either It pilnts what old hackers need 
to know too. Things like entry points to the tiOiA and pointers in the Basic 
scratchpad 

Coin ComputM Newt is more than just a rrtogozine. irs also a software 
exchcmge service Color Computer owners can exchor^e onglnal sofl 
ware by contributing It lo the CCW library where several ol these programs 
aie put on a tope and distributed lor a nomiruil lee CCN is also a rvitlon 
wide User's Group. CCN helps eslablish local Users Groups with lorm letters. 
posters names and publicity 

U you own a Color Computer you need a subscription to Coloi Computet 
News. While the olher magazines will prlnl some articles about the Color 
Computer you r\eed a conslani source ol inlormotion to stay abreast ot 
whdls happening with Ihe Color Computer 

A charter subscnption to Color Corr^iuter News is just S9 OO tor 6 issues But 
you'd belt« hurry, you don I want lo miss a single issue 

Available Frorrii 

REMoikable Software 

P.O.BOZU92 
Muskegon. MI 49443 



Some back issues available tor S250 includlr^g postage and handling 



.^77 




COMPUTER INTERFACES 
& PERIPHERALS 



*ANNOUNCING: POS 800/1SO0 UNIVERSAL TAPE DRIVE CONTROLLER* 
Ttiii "b1«k bo^" controller/formatter ii deiigned i% t st*nililortf interlace 
between induitry-itindicd NR71 (800 BPI) and PC (1600 BPI) tape d rivet and a 
pirillel or RS-232 serial port ot an Sbil ASCII computer. Serial interface emulaiei 
a terminal vis-a-vitvoursvitem jottware, parallel inierlact emulates a readet/punth 
ind tetponds ioCPM-*tvle PIP tommandt from your computer. Tape speeds 1 2.S. 
25 and 37.5 ips. Interface is microprocessor -controlled, includes power supply anil 
4K or 16K buffer memory. Prices and details available upon request. 

• POS-100 NRZ1 TAPE DRIVE CONTROLLER/FORMATTER No^» >ouf 
micro can read and write IBM/AfSSI compalitile NR/1 format 9-tricl> rnaKnclit 

tapes. Ttie POS 100 consists of Si 00 bus card, 6' ribbon cable, tape drive conirolkr 
card, cable to PertecStandard NK/I Tape ddvc, plus docuntenlalion and L-iO or 
8080 software (spetifiy). Power is derived from tape drive and S 100 bus. Ship Wt . 
10 lbs SuRttested Retail Price iigS.OO 

• POS OAISY-WHEEL PRINTER INTERFACE for TRSSO Will dnv.- DiaMo 
HyType I. HyType II, and Qumf O anil Sprinr t pnnicn Inilud.i IK mei 

available memory for cuilom print routines (such as jiraplms, bidircdionji pnni 
i"tl, elej, PrOBrammed lo respond lo prim commands trOm BASIC 1 LI C I Klf 
PENCIL™ jnd SCRIPSIT'" joflware. Draws its powfr Irorn printer Sbip wi. 

5 lbs. Price i>'^U.OU 

Cables, each (Specify HyType I, Hy I ype II, or Qume| i ."^.(lO 

• POS ASCII INTERFACE for IBM I/O SELECTRIC I his C.vntiorim stv U 
parallel printer interface will drive m IBM Miidel / .* 1 cii 7 15 1/U i> pi.>» nli-r 

(t BCD and Correspondence codes). No son ware needcil 1 raiuics on bojid ( PKtiM 
which holds up to 8 ASCII to. IBM lode tables lor dillcivni Ufi: spln-'ris ( lostil 
loop operation runs al maiimum pnniei speed: stops and siarison j sin^lf ibjcaiui 
without loss ot data. Retjuires » I JVDC and -SVOt pi-wei muicf. Ship *{ : 

5 lbs. Price IJrivS 

Power Supply (-WDC, '13VUC, *i-JVDC lor Si.lrnoidMiii I'nnkr] H I'i y^ 

• CONVERT OFFICE SELECTRIC TO I/O TYPEWRITER Kil iriJuili-. 
assembled solenoids, switthss, wire tiarncss, man"tl ilrnn P( tJ phu iniiniuiii'i) 

for installation and mCPU mlerlaci;. Price S I ^U Ul) 

• ■■FORMALINER" Variable Width Forms Traitor (ill 1 SiliUn.s , . Jlvou 

• GTE Model 560 ASCII SELECTRIC I/O Terminal Willi K\lil btiul Inl.cljn 
and digital cassette deck lof use as memory lypewiilci. Ship hI.' 100 lh\. 

Price, tested and adiusted il.l'i'.im 

• PCS ASCII IBM SELECTRIC PRINTER 15 Scl.ur.i i„.m i.l 1 i.fniinji 
cleaned and adiubled wnh POS Centronics-iiile ASCII pnnui miufIjh- IJ( /l.i , 

carbon and labric ribbons. Compatible with fkS By, Appit-, S(H jnd uitur tKli 
parallf I primer ports. Ship wi , 75 lbs. Price ... , (W'JS.Ull 

PACIFIC OFFICE SYSTEMS y' i^3 

226J Old Middlefietd Way • Mountain View, CA 94043 • (415)493-7455 



FIXED ASSETS 

Put your TRS-80 computer to work keeping track of 
all Information related to your fixed assets and deprecia- 
tion. This versatile system, developed by a CPA, will 
compute depreciation according to straight line, declining 
balance, and SYD methods and maintain the complete 
audit trail you need for financial and tax reporting, in- 
cluding fixed asset ledger and acquisition and disposal 
reports. You will be able to project depreciation for cur- 
rent and future years, use different methods for financial 
and tax reporting, switch from declining balance to 
straight line when advantageous, compute investment 
tax credit and additional first-year depreciation. Reports 
are available in both summarized and detailed formats, 
and can be organized by general ledger account, location, 
department, ADR class, and year of acquisition. 

Currently available for the TRS-80 Model I with at 
least 32K and 2 disk drives, and for the Model III with at 
least 32K and 1 disk drive. Requires Disk Basic and a 
TRSDOS-compatible operating system. 

FAAS-1 for Model I $ 1 49 

FAAS-3 for Mode! Ill $ 1 49 



TAB132 



At last, here is the solution to LPRINT TAB problems 
with your TRS-80 Model I computer. Increase your pro- 
gramming productivity with this enhancement to Basic. 
Stop going through string manipulations and contortions 
trying to overcome the TAB(63) limitation. With 
TAB132, you will never again have to fret over tabbing 
past position 63 on your line printer. TAB132 will allow 
you to correctly tab to any print position up to 255 with 
the normal TAB( ) statement. 

TAB! 32 is a machine language routine which oc- 
cupies 1 00 bytes of memory, and will operate with either 
Level II or Disk Basic on the TRS-80 Model i. The TAB1 32 
tape or disk includes modules for several different modes 
of operation. It can be loaded in the System mode or from 
DOS, can be loaded and run as a Basic program or merged 
into your Basic program and activated with a single 
GOSUB at the beginning of the program. System and 
DOS modules include a relocating loader to move 
TABl 32 to anywhere in memory. Also supplied is a pro- 
gram which will patch the routine permanently into Disk 
Basic. Specify media when ordering. 

TABl 32 on tape. .. $12.95 on disk . . .S14 95 



P.O. BOX 359 



►^60 



The Systemworks 

Professional Quality Software for the TRS-80 Computer 
MARLBOROUGH, CONN. 06447 



(203) 295-8108 



t'Sw List ol Adiferlisers on page 402 
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The ea^aiH 80 Book of BASIC 

ADVENTURES 

ni tforU'i Moil eonrliti bodk if BASIC ADVENTURES! ElshUm, VES 18, of thi noti ror>l«r 
ADVENTURES ftMilibli to^iy. til li om koek, oiiy lo rui llitlafli roaiy to bo koyi' t"' ADVENTURES ky Beair, 
Ko^Mr, Potfori, Mieklai, Foriytkt, Orog Haiiott t*i otkiri. 

Uela4l«| TEMPLE OF THE SUN, DOd STAR, LOST SHIP, SPIDER MOUNTAIN, LOST DUTCHMAN'S OOLD, 
THUNDER ROAD, SORCERER'S CASTLE, DEADLY DUNOEON, ATUNTEAN ODVSSEV AND OTHERS. 

Tkli M\^M kook alto ioitaiai in ADVENTURE 6ENERAT0R pregraM, iiel a«aiUklo aaytfkoro tlio. YES, 
fkit ^rogron will aelaally «riU aaofkor BASIC ADVENTURE ^n%tM\ 

Chaffers on wkat an advantura If, hoM to play advaatnros, how to mfrlto advinturoi, kow to lail your 
advaatarai, taa adtfoatara prograai Idaai, aad Maral 

Altkoa§h ipaetfleally Hrltlaa far tka TRS-80 
Madal I and III, tkata prosrani ara adaptakia ta 

otkar eonpatofi ailag MIereioft'i BASIC. 

Ordar yoari today aad ordar aaatkar for a^ 
gift, iuil la tina for Ckrlot«ai gWlag. 




It's Here!!! 



ONLY M9.9S 

tS PROGRAMS!!! 

Sand To: 80-U.S. Journal 
38S8 South Warnor Streot 
Taeomo, Wathlngton 98409 
(206) 47S-2219 -^ 
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Ploaia toad. 



jCtpy (Coplot) of tkt ADVENTURE BOOK far 



:|C ; oaly M9.9S oaok plat * »2.0S for pottaoo t kaadllai. Plaata ata a 
: taparalt tkaat for 61ft erdart, m Mill taad a« aaaaaaotaiaat eard 

i «itk all gift ordari. 

:Ckaek M.O. Vlta/MC# Eaelettd 

i Naiaa 



: Addratt 

: City 

1 Vtta/MC 

* Ej(p. Data Slgaataro 



Jtata. 



-Zip 



80M-11 



BUSINESS 



A financial trend monitor for credit unions. 



State of the Union 



R. M. Reid. Jr. 
6519 Velasco 
Dallas. TX 75214 



Credit union managers and 
directors spend a lot of 
time analyzing financial data. 
Many methods are used to de- 
termine ttie relative l^ealth of the 
organization, and one of the 
most popular is the calculation 
of ratios between items appear- 
ing on financial statements. 

The consistent calculation of 
a significant number of relation- 
ships can be time consuming, 
especially since the results are 
most indicative when compared 
with previous relationships so 
trends can be detected. 

An excellent discussion of 
some of the most significant in- 
dicators is presented In the 
August 1979 issue of Credit 
Union Executive magazine. The 
trend-monitoring sheet suggest- 
ed in that article was adopted by 
the credit union of which 1 am a 
member and resulted in the pre- 
paration of this program. 

The data for the program is 
obtained directly from the regu- 
lar financial statements pre- 
pared by the credit union staff. 
Our credit union uses the ac- 
count number structure recom- 
mended in the credit union ac- 
counting manual published by 



the National Credit Union Ad- 
ministration. 1 included these 
account numbers in the input re- 
quests so the information would 
be easier for me to locate and in- 
put. A sample financial and 
statistical report is shown in 
Fig. 1. 

A sample of the output report 
used by the managers and direc- 
tors is shown in Fig. 2. The tabu- 
lar presentation makes it easy 
to scan the data for each indica- 
tor to see if significant trends 
are developing. 

Ratios ar>d Indicators 

The ratios and indicators cal- 
culated by the program are as 
follows: 

• The rate of return on assets 
is the total income earned dur- 
ing the period divided by aver- 
age total assets, then annu- 
alized and multiplied by 100 to 
give a percentage answer. 

• The rate of return on loans 
to members Is the total loan in- 
terest received during the period 
divided by average total loans 
outstanding, annualized and 
converted to a percentage. 

• The expense-to-income 
ratio represents the total 
operating expenses to date 
divided by total operating in- 
come to date. 

• The percent loans-to- 
shares are 100 times total loans 
divided by total shares. 

• The maximum allowable 
dividend rate is one calculation 
you might want to adjust so it 
fits the conditions of your credit 
union. As written, the program 



calculates 95 percent of the net 
operating income divided by 94 
percent of total shares. This cal- 
culation assumes that five per- 
cent of net income must be put 
in reserves (thus the .95 multipli- 
er) and that only 94 percent of 
total shares will be eligible for 
dividends. The 94 percent factor 
results from the way we calcu- 
late dividends and is a factor we 
learn from experience. You may 
edit program line 650 to include 
factors more applicable to your 
situation. 

• The ioans-t&assets ratio is 
the total loans outstanding 
divided by total assets. 

• The reserves-to-delin- 
quency ratio Is the total reserves 
divided by the dollar amount of 
delinquencies. 

• The percent reserves-to- 
loans are 100 times the sum of 
total reserves plus the allow- 
ance for loan losses divided by 
total loans. 

• The percent liquidity re- 
serve, depending on your invest- 
ment portfolio, might also re- 
quire some adjustment to fit 
your particular situation. The 
program is intended to calculate 
the product of 100 times cash 
plus all investments with maturi- 
ties of less than one year, divid- 
ed by total shares not pledged 
as loan collateral. As written, it 
will Include ail investments in 
jumbo CD's, because ail our In- 
vestments of this type have 
shorter-term maturities. 

• The liquidation value of 
members' shares calculates 
whether members could antici- 



pate receiving 100 percent of 
their shares if the credit union 
were liquidated. It is obtained by 
subtracting anticipated loan 
losses from the sum of shares 
and reserves, then dividing the 
result by total shares and multi- 
plying the result by 100. Obvi- 
ously, the indicator should nev- 
er fall below 100, or the credit 
union is insolvent. 

• The percent delinquencies- 
to-loans is calculated in dollars 
(delinquent amount divided by 
total loans) and number(number 
of delinquent loans divided by 
the number of loans outstand- 
ing). A comparison of these 
two measures can yield some in- 
formation about the relative 
sizes of the delinquencies. 

• The percent of members 
borrowing is the number of 
loans outstanding divided by 
the total number of members — 
a rough measure of member ser- 
vice. 

• The loan turnover ratio Is a 
measure of the rate at which 
loans turn over per year, it is the 
annualized quotient of total 
loans granted year-to-date divid- 
ed by the average loans out- 
standing during the period. 

• The average loan account 
balance is the total outstanding 
loan amount divided by the num- 
ber of loans. 

• The annual membership 
growth represents the annual- 
ized net increase in total mem- 
bership year-to-date. 

• The annual savings growth 
is the dollar growth in total 
shares on an annual basis. The 
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annualized growth indicators 
are possibly most useful in 
preparing budgets for future pe- 
riods. 

• The average share balance 
is the total shares divided by to- 
tal membership. It is a measure 
of members' saving habits. 

• The average annual sav- 
ings per member Is calculated 
by annualizing the year-to-date 



increase in total shares divided 
by the average membership dur- 
ing the period. 

• Shares are determined by 
dividing the dollar amount in the 
money market certificates by 
the amount of total shares. As 
we began to offer money market 
share certificates in amounts 
over $10,000, we were concerned 
that the percent of total shares 



earning the higher interest rates 
might be worth watching. 

The Program 

The program proceeds with a 
minimum of jumps and no sub- 
routines. Table 1 contains a list 
of all numerical variables used. 
In Program Listing 1, line lOOful- 
fllls the necessary housekeep- 
ing duties. Lines 110-170 ask if 



you are about to make the first 
entries for a new year. If so. you 
are asked tor the year and some 
beginning data. Since several of 
the indicators are calculated on 
an annualized basis, these pre- 
vious year-end numbers are 
necessary. 

If the answer to the line 110 
question is that you are going to 
add data to a file, then line 180 







For 


FINANCIAL AND STATISTICAL REPORT 
Period £ndcd 19 ChArretMo 
















ADOR 


FSS 








STHEET AND NUMBER CITVANDSIAIE ZIP CODE 






STATEMENT OF FINANCIAL CONDITION STATEMENT OF INCOME 




ACCT. 
NO. 


ASSETS 


END OF THIS PERIOD 


ACCT, 
NO 


OPERATING INCOME 


THIS MONTH 


YEAR TO DATE 


701 


Loini 






m 


Intereit on Loam 


















113 


iFKorne from Loam ol Liq. CUl 




















Total 










712 


Loani Pur. tiom Liq. CUt (Lxi Due ) 






119 


Lau - IniHMI R«lurvl 




















N«< 












JoiU 






171 


Income from lnveilme»>ti | 








719 


Lm - Allo*rjnc« lO' Lo»n Loun 






131 


Fee! »nd C^»'9e^ 












Ncl 






161 


M<ic. Ofwrating Income 










730 


C»h 








TotdJ Operaiin^ Irtcomc 










740 


invfirmenri 








OPERATING EXPENSES 










210 


CorKpsnuiion 


















270 


EmplovM Benefit I 


















?30 


Travel ft Conleranc* Eapcniai 


















240 


AttocpJlion Dun , 


















250 


Oir-ce Occupancy £i|paniei 


















?60 


Office Operaiioni Eaiwnui 










753 


Accrued fncorne on Inveitmtmi 






270 


Educ. & Promotional Eio- 










760 


Prvpaid and Deferred EHptniai 






280 


Loan Servicioq Eipeniei 










774,5 


Furn,turB & Equipmenl Inat) 






790 


Prof. & Outline Service! 


















300 


Praviiion for Loan Louei 










790 


Other Aueii 






310 


Memberi' lnturar>ce 
















320 


Fed Supv< fr Eiam Eip 












TOTAL ASSETS 


t 
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Caih Ovt^ aod Sho' t 












LIASatTIES ANO EQUITY 
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Int. o" 8orro»^*d Money 










B01 


Account) fnabit 






3M> 


Annual Meeting Eiipei%» 


















360 


Viu 0pera1ir>9 E'penm 
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Dividendi Ptytbit 




























Total Operaiing Enpaniet 










B40 


T»<ei P»Yabl« 








INCOME (Lou) FROM OPER 










860 


Other Liab'iion 








NONOPERATtVG GAINS (Loiwil 










420 


Gain iLotsI on InveiTmenti 
















43G 


Gain (Lojil on Diip ol Aiwti 












TOTAL LIABILITIES 


















901 


Shsrsi 








Total Non-Oper. Garni ILoiiail 




















Income ILoii) Before Diiidendi 






] 
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Rffulsr Rnarvc 
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Dividendi 


















NET INCOME (Loill 






1 
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UndTVid«d Eprnir^gi 
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N(t Income ILoti) 






1 
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> 
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b 
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c 
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n trut and corrcci •"d p'cunii f»ily )li( linancdl pouiion anO ir>c 
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2 
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3 
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■ 
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b 
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b. 
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7. 
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B 
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. 1. Typical f 


-man 


c/a/ and Statistical Report. 
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E-SYSTEMS GARLAND FEDERAL CREDIT UNION 
















MONTHLY INDICATORS 






















19S0 




















JAN 


FEB 


MAR 


APR 


MAY 


JUNE 


JULY 


AUG 


SEPT 


OCT 


NOV 


DEC 


ANNUAL RATE OF RETURN ON 


13.45 


11.82 


10.47 


11.25 


11,18 


1048 


10,76 


10.55 


10 37 


10.62 


0.00 


0.00 


TOTAL ASSETS 


























ANNUAL RATE OF RETURN ON 


1433 


12 85 


1215 


12.23 


12 26 


12-09 


12.17 


12.21 


12.10 


12.34 


000 


0.00 


LOANS TO MEMBERS 


























ACTUAL EXPENSE-INCOME RATIO 


OX 


0-26 


027 


0.25 


024 


0-27 


026 


025 


027 


026 


000 


000 


TO DATE 


























PERCENT LOANS-TO-SHARES 


79 22 


78.80 


78.44 


81.58 


7874 


7597 


73.24 


69.89 


67 36 


64 80 


0.00 


000 


MAXIMUM ALLOWABLE DIVIDEND 


10 16 


9.40 


BIB 


9.23 


932 


8 24 


852 


8,33 


786 


805 


o,x 


o.x 


RATE YEAR-TO-DATE 


























LOANST& ASSETS RATIO 


0.75 


0.74 


0.73 


0.77 


0.74 


0.71 


0.69 


0.65 


0.63 


0.B1 


000 


0.00 


RESERVES-TO-DELINQUENCY RATIO 


15.86 


1099 


20.14 


16.12 


13.94 


9 18 


1063 


10.04 


18.40 


17,25 


0,00 


0.00 


PERCENT RESERVES-TO-LOANS 


466 


4 75 


466 


4.82 


4.91 


507 


513 


623 


6.15 


553 


0.00 


0.00 


PERCENT LICXJIDITY RESERVE [5% MIN) 


9.17 


10.35 


11.71 


7,12 


1092 


14.83 


18.22 


22.06 


26 54 


27 25 


0.00 


000 


LIQUIDATION VALUE OF MEMBERS' 


103 50 


103,51 


103.49 


103-75 


10368 


103.52 


103.43 


103.34 


103.35 


103 44 


0.00 


000 


SHARES 


























PERCENT DELINQUENCIES-TO- 


0.29 


0.42 


0.23 


0-29 


0.34 


0.53 


0.46 


0.50 


0.28 


0,31 


0.00 


0-00 


LOANS {$) 


























PERCENT DELINQUENCIES-TO-LOANS 


0.4a 


0.62 


0.42 


0,52 


0.61 


0,70 


0.93 


1.03 


0.66 


0.80 


000 


0.00 


(QTY) 


























PERCENT OF MEMBERS BORROWING 


63.33 


63 54 


63.99 


63.74 


63.29 


63 42 


6291 


62 56 


61,72 


E0.3B 


000 


0.00 


LOAN TURNOVER RATIO (YEARS) 


0.72 


0.74 


0.81 


0.85 


0.82 


082 


0.84 


0.83 


0.84 


0.85 


0.00 


000 


AVERAGE LOAN ACCOUNT BALANCE 


24S5 


2416 


2401 


2377 


2351 


2302 


2263 


2222 


2206 


2161 








ANNUAL MEMBERSHIP GROWTH 


420 


276 


304 


291 


225 


234 


282 


266 


284 


»3 








ANNUAL SAVINGS GTK)WTH (S X 10OO) 


-M3 


-722 


-106 


-982 


-533 


-146 


163 


417 


606 


615 








AVEFIAGE SHARE BALANCE 


1970 


1948 


1959 


1857 


1890 


1921 


1944 


1989 


2021 


2014 








AVERAGE ANNUAL SAVINGS PER 


- 257 91 


-220.68 


- 32.24 


-297 75 


-161.64 


-44.07 


48.99 


125 23 


161,52 


1B2 40 


0.00 


0,00 


MEMBER 


























CEHTIFlCATESn'OTAL SHARES 


0.13 


015 


0.18 


023 


0.21 


0.21 


0-23 


0.23 


0.22 


0.23 


000 


0.00 






Fig 


2. Sample Output Report. 















CONVERT YOUR SERIAL PRINTER TO PARALLEL 



NEW MODEL UPI-3 SERIAL PRINTER INTERFACE MAKES IT 
POSSIBLE TO CONNECT AN ASCII SERIAL PRINTER TO THE 
PARALLEL PRINTER PORT ON THE TKS-80. 

Software compatibility problems are totally eliminated because 
the TRS-80 "THINKS" that it has a parallel printer attached. 
NO MACHINE LANGUAGE DRIVER NEEDS TO BE LOADED 
INTO HIGH MEMORY BECAUSE THE DRIVER ROUTINE FOR 
THE UPI-3 IS ALREADY IN THE TRS80 ROM' SCRIPSIT, PENCIL, 
RSM 2. ST80D, NEWDOS, FORTRAN, BASIC etc .ill work as if a 
parallel inntef was in use 

The UPI-3 is completely self contained and ready to use. A 34 
conductor edge card connector plugs onto the parallel printer 
port of the model I Expansion Interface or onto the parallel 
printer port on the TRS-BO III. A DB25 socket mates with the 
cable from your serial printer. The UPI-3 converts the parallel 
output of the TRS-80 printer port into serial data in both the 
RS232-C and 20 MA. loop formats. 



bd 



SPEEDWAY ELECTRONICS 

Division 01 BifM'Y Devnes 

nSbOTIMBERLAKE LANE 
NOBLESVILLE. IN 46060 
(317)842-5020 

IRS BO II d trademdtk ol T^ndy 



.^275 



VISA MasterCard 




Switch selectable options include: 

• Linefeed after Carriage Return 

• Handshake polarity {RS232-C) 

• Nulls after Carriage Return 

• 7 or 8 Data Bits per word 

• 1 or 2 Stop Bits per Word 

• Parity or No parity 

• ODD or EVEN Parity 

UPI-2 for TRS80 Model II 

UPI-3 for TRS80 Model I or 3 

UPI-4 for use with Model 1 and RS Printer 

Interface Cable (no expansion interface required) 

Manual only {may be applied to order) 

Ten day return privilege — 90 day warranly 

Shipping and Handling on ail orders 

Specify BAUD rale 50-9600 BAUD 



NOW 
AVAILABLE 
FOR 
MODEL II 



$149.95 
$149.95 

$159.95 
$ 5.00 

$ 4.00 



r' Sve List ol Advartlstrs on page 402 
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TIME ... 

METHUSELAH' has time for you 
and your TRS'80° 



The name Melhuselnh has always be«n aaaociated with lDnt[ Ijfe The Methuselah 
computer cluck board with ita24 hour clock and its perpetual calendar is indeed worthy 
of the title Methuselah puts slate ofthe art technology into action with the on board four 
year lithium battery bark up to keep it running even when youi t-ompuler is off. That 
means no more fooling around with the aoftwate or hardware "docks" that become Rip 
Van Winkles when the computer is reset or turned off 

Methuselahhasman> other timely features. Software patches keep the DOSand BASIC 
lime and clock commands licking. Only two screws mount Methuselah inside the expan- 
sion interface without soldering, clipping, cutting, or Jumpering. There is even a spare 
I port and four different interrupts available for people who love to tinker. 

SPECS. MM. DD'YY. HH:MM:SS and day of the week Four year lithium battery 

back-up. Crystal conlrotled liming (adjUBtable 32.768 oacillator). Twenty four 
hour clock and perpetual calendar. 



Send check < 



ey order to. 



mdim] 



NDM DESIGNS ^13S 

G330 W North «». 

Wiuwaloii. Wl SJ113 

(414) ZS9-0I20 



M-Sl S97.00 

{add $4.50 P and H) 

S-Sl 117.50 

(add S2 50Pand Hi 
(If you wish to use Methuselah 
and the RS232 board (26-1145) 
Uigelher, order this option which 
includes a new cover and con- 
nector.) 
WI reaidenU add *% sales tax. 



METHUSELAH ll ■ 
iri«a mttk of NDM Deaigni 



Software. 
For the 80s. 

Pensadyne Computer Servicas. The organization that haa brought 
affordable software to hundreds ol users in the over 40 of the United 
Stales and 16 countries around the world. The organization with the 
people, the support, the service and the expertise to bring you the 
highest quality products available. 

Pansa-write 1 -- Our BASIC word processing system for the 
owner who requires performance at low cost. Many of the features 
of more expensive word processing systems at a fraction of the cost. 
Comes complete with mailing irat capable of handling 300 names. 
$19.95 (Specify Model i or Model III). 

Pen»-wrfle2 - A machine language word processing system tor 
the TRS-80 Model I or III with the power and speeo that is really 
needed in a word processing environment. Word wrap around, 
unlimited insert and delete, block moves, chaining of files, 20 user 
definable commands, ASCII control code generation for printed 
output to allow subscripts, superscripts, underlining or any other 
feature your prinier supports, and much more. All this In a package 
that costs just $79-95- Manual $10.00 Deductable. (See full page ad 
in April, 1981 80-Microcompuling for a full description). 

Software publishing - Pensadyne is now publishing software for 
independent software authors. Send SASE for complete details, or 
send machine readable copy of your program with any 
documentation. TRS-80 Model I, It, III and Colour Computer fully 
supported. Subject material unlimited. 

Now, with that kind of record, and these products and services, 
aren't you Just a little curious about Pensadyne Computer Services? 

Visa and Maatercharge orders welcome. Phone orders welcome 
or write, specifying system configuration, and product desired. 
Please add $1.00 for first class shipping. 

PENSADYNE - Giving you the power to think. 



i^^'l''//; 
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COMPUTER SERVICES 
4441 WEST FIRST AVE- VANCOUVER. B.C.. V6R4H9 604-224-3107 



obtains all previous data from 
the disk. 

Lines 200-360 ask for data 
from the balance sheet. You are 
reminded to make all entries in 
whole dollars. You also should 
omit all commas from the dollar 
entries. 

Lines 370-410 ask for data 
from the income statement, and 
you are reminded to use year-to- 
date figures. The year-to-date 
data is necessary because 
some of the indicators are annu- 
al projections based on the aver- 
age performance from the be- 
ginning of the year through the 
latest entry. 

Lines 420-500 ask for data 
from the statistical report plus 
jne item— shares pledged as 
loan collateral— that does not 
appear on any financial report. 
This last item is necessary tor 
the computation of percent li- 
quidity reserve. The minimum 
value for this reserve in federal 
credit unions is five percent, so 
the board of directors will want 
to watch the reserve very closely 
when it approaches the border- 
line- 



Lines 600-720 contain most 
of the computations in the pro- 
gram. The only exceptions are 
some totals and multiple-use 
factors that were calculated at 
the time of input. (Refer to lines 
220, 300 and 360.) The arithmetic 
is relatively straightforward. 

Lines 730-770 permit you to 
enter data for as many months 
as you wish before printing the 
results. When you have finished 
entering data, the program pro- 
ceeds immediately to print the 
results. 

The print routine is contained 
in lines 900-1250. Lines 900, 910 
and 915 are the three major print 
formats. Line 900 is the format 
for most indicators that are ex- 
pressed as a number with two 
possible decimal places. Line 
910 is used for those indicators 
that are always whole numbers. 
Line 915 is almost the same as 
line 900, except it allows four 
digits prior to the decimal point. 
This format is necessary for the 
larger results In the "average an- 
nual savings per member" cal- 
culation. 

Lines 980, 990 and 1000 may 



VsrIabU 


Definition 


A 


Tolal Assets 


AA 


Avetage Assets 


AL 


Avetage Loans 


AS 


Average Shares 


BA 


Beginning Assets 


BL 


Beginning Loans 


BM 


Beginning Number ol Members 


BS 


Beginning Shares 


C 


Cash 


CT 


Common Trust Investments 


CU 


Deposits and Shares in Other Credit Unions 


DA 


Delinquent Loan Amount 


E 


Annualiier 


F 


AnnualUer limes 100 


FA 


Federal Agency Securities 


1 


Inletest on Loans 


L 


Loans Oulstanding 


LA 


Loan Amownl, Veai-loDale 


LL 


Allowance lor Loan Losses 


MM 


Money MarKel Certihcate Investments 


N 


Month Number 


ND 


Number ol DeUnquer)! Loans 


NM 


Number ol Members 


OE 


Total Operating Expense 


01 


Total Operating income 


PS 


PleCnfld Shares 


RC 


F<«serve lor ConKngency 


RR 


Regular Reserve 


S 


Regular Shares 


SC 


Money Market Share Certilicales 


ST 


Investments With Malurilles Less Than One Year 


Tl 


Total Investments 


TL 


Total Number ol Loans 


TR 


Total Resen/es 


TS 


Total Shares 


X 


Counter 


Y 


Year 


Z 


Counter 




Table 1. Definition of Variables. 



324 • 80 Microcomputing, November 1981 



EPSON 

MX-80 



EPSON 

MX-70 

EPSON 
EPSON , 

MX-lOO * 
MX-80 FT 



MX-80 

MX-80 FT 

MX-lOO 

EPSON 
EPSON 
EPSON 





SmaU 

AMERICAN BtsiNEss 

COMPUTERS 



118 S. MILL ST. PRYOR, OK 

AMERICAN SMALL BUSINESS 
COMPUTERS STOCKS THE 
ENTIRE LINE OF EPSON 
PRODUCTS AND ACCESSORIES 



tusiNEss .-t:: »t;:::Siiii il Jl^Jlll Ifh^ 

J 



CALL FOR OUR 
PRICING ! 

WE PROMISE IT WILL BE 
WORTH THE CALL !! 





^^'918-825-4844 



RETAIL STORE LOCATION - SOUTHWOOD 
SHOPPING CENTER - PRYOR, OK. 



THE BHSQCST NAME IN UTTLE COMPUTE/IS^ 

TRS-80 Model U— Your Best Buy 
In a Business Microcomputer 




UP 
TO 

15% 



TRS-80 computers. °" 
software and peripherals 

Stmilar volu«i on oil oixchondu* 

CALL COLLECT: 

800-351-1580 

T*xa« Rasfdant* call: 915-283-2920 

Van Horn Office Supply 

701 W. Broadway - P O Box 1060 
Von Horn, Texas 79855 

DEALER G055 

Form F48 Provided 

Standard Warranty in Effect 

rW NATIONWIDE SUPERMMKET Of SOUND* 



■137 



require modification tor your 
particular printer. I use an 
IDS-440 Paper Tiger and some of 
my commands might not t>e nec- 
essary with other printers. The 
command LPRINTCHR$(31) in 
line 980 is a control command 
that adjusts the line length to 
132 characters. The command 
LPRINTCHR$(01) in the same 
line switches the printer to an 
enhanced printing mode so the 
report heading will appear to be 
in larger and bolder type. The 
command LPRINTCHR$(02) in 
line 1000 returns the printer to 



normal characters. 

You would, of course, want to 
change line 960 so the name of 
your organization is printed at 
the top of your reports. You also 
probably will wish to revise the 
tabs in lines 980, 990 and 1000 to 
adjust the heading. Lines 1300- 
1320 record all your latest data 
on the disk, and line 1400 ends 
the program. 

I hope you find this program 
as useful to your credit union as 
tt has t}een to mine. I would be 
interested In hearing your com- 
ments or questkms-l 








wmm- 




Our ongtonal Super Utilily was haid to beat- we tned anyway Now Kim Walt, 
of Breeze Computing. Inc offers you SUPER UTILITY PLUS, an exceplionaL 
ccwnpletely rewnllen program, including in excess of 70 possible programming 
selections In addition, il now operates on Single or Double Density througtioul 
all program utilities Truely the "Utility of Utilities' 

Listed below are only the highlights of Super Utility Pluss oulslandmg 
features 



ZAP 

- R«*d iod'ni rrvrii.lv iia\a m HEX. ASCII 
DECIMAL BINARY n. OCTAL 

- Svarrh roulmv lucam hL^vfi en lo^esJ 
fonfi^ufinJ iTdck. ufdrc^ A"M lor t^>i« \*si. 
ASCII *(rng 4ord li*L o* ^Tvfnpf^d cod« 

- Dijplay wit™ (diik t'l« m^moiv 

- Contp«i^ topv iiifrly and /(todiik ircinn 
PURGE 

- Fjll fcrvn rdif.nq kkll conrrol 

- Cofipirttf d:*" drrectory 

- Z*fo a-y-mi drfrcforv *nTTi*i oi LjnuKfd dik 

- Compui< tfvfv'ir,^ pdsv*4'>rdi 

- dungr diik ran* d»i* pai«u>ordv aulo 
nvnma'vi Ar>d M« parafnai^rs 

FORPtAT 

- Sia-fdaid tormai or loi-.i*! vnttioul eiaw 

- Sp^fiAl fuTiTur 

- Build totmil nark 

- Soft^ditf bulk tin* 
DISK COPY 

- Siand&id (opv' *i*^ D' ** ihouT formal 

- Special Cop\' iio back jp ir.^ny protecied 
diiky - pufc^a&«r Lii* only 



TAPE COPY 

- Kr.id itlir« IH eerily lapft 

flir ^v t'lt ropyiny ruurmf - purnhjwr wiv 
DISK REPAIR 

- K^pa 1 HIT and GAT wtloii and B."'l 

- Cirfnpitft* dirtttofv ch^tk 

- Rtftcii kl]»d t,lr* 

Rtf^l proEtfft. un-r^ad pKuta^ror iTK>kvdrrvtto<% 

- Ad'.-Wi'>lall nacl>v<fil«i 
MEMORY 

- DiSl^V '"<*^^ *^^ ^ofT^pa'w /ifrt> ^luhanijr 
ifiput Of ou'put a b\W •(, a-^v prm 

- tiifKar>9^ |ijfT>pii.» rtf^true. til ifnf^ijitfaTcih 
oi load/wfiw tiMf wtionto/ lioin mrmorv 

nL£ 

- Displav compare Ai^d ccipv' lil« «<fclort 
Lotair Irpf tpacr lilct driif ttarus 
(_iei!« lilifi snd tli-ai til« fiom di*k 

CONnCURE SYSTEM 

- Cuifom tor>f (Jure S U Plu* lo your sy^Ctfrn 

- ^.n^l^ or dout>]v d*nvirv ii^ ariy comt».narr'>i 
^ dn^*^ wl<rtr ^ur H*p**Ar;r>g syi(em t«oL 
Lippf r or k>^tf r c d^ir high ipr*d ctock sin^l* 
'}f d>jut>l¥ hifad^-d diivvs i»r contiqurv your 
pmitfr 



1 1 yo J i^d n I r 



omplHi^ oi^rvurw Or it your already as extiledaboul Super 



Ulility Pliiiaiiicarv "wnd cbfck or MO [ui*?!! "t^ pluiiS 00 shippir)9and handling lo 

BREEZE COMPUTING. INC. 

PO Box lOL-J • Berkley Michigan 4H072 

I 'Mithtgan t«rd*nli *nc!.>w a.uln.onjl 4t. .*;** ■t^ l.jr.vqn imJ^Ts milow Sin 'Wl iS.pp ^.j ard 
I handling con n,d^:* mai. .Tdir K ,-«!ln^ ji a: i U «' 2-<H--t\>l ^75 
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Program Listing 



nOSmtLY INDICATORS 



CREDIT IJHIOH PERFORHANCE 



NABII RCID 

6519 veu^co 

DALLAS, TX 7&114 



11 ••••••■•••■• 

15 ■• 

II ■• 

25 '• 

IB •• 

35 •• 

4« '• 

45 •• 

51 '• 

55 ■• 

61 " • 

65 ••" ...•••.*.••*•.... 

III CLEAIl9lllDIHF(lI,]ll :DEFINTX,T,I 

111 CI^sPRIHT'IS THIS THE BEGINNING OP A HEM YEAR (I/N) 7 
115 Z$-lNKeY$:IPI$-"THEN115 
121 IFZ$*'N*THEH1SI 

125 IFIS-'K'THENiai 
127 REM 

126 RDI • • • • • IKPUT FIBST-OF-YEAR DATA • • • • • 
139 KFX 

111 CL£:PRIKT-NAKE ALL FINANCIAL ENTRIES IN WHOLE DOLLARS* i PRINT 

tlHPUT'NHAT YEAR ARE YOU BECIKKING'iY 

14* IHPUT*BEGIHK1NC LOANS'tBL 

151 ISPUT-BEGINNIHG ASSETS";BA 

161 IHFIJT-BEGINNlt*G SHABES'lBS 

171 INPUT'BEGIKNING NUMBER OF HERBERS'iBNiCOTOIf • 

177 RDI 

17B RBI • • • ' • READ DATA PROH DISK 

179 KOI 

IB! OPEIl"l",l,*CU/DAT';IHPUTIl,Y,BL,BA,BS,BII:rORX-lT012!PORI-ITO 

2fltIMPDTIl,P(I,I) :NEXTI:KEXTX:CLOSEl 

2BI CLS:PBIHT*RDieilBER TO MAKE ALL riKAHCIAL ENTRIES IN VBOLE DO 

LLAKS'lFRINT 

217 RBI 

2BB RQI ..... INPUT BALANCE SBECT DATA • > > • > 

2i9 REH 

211 PRINT'INPUT IKE POLLOWIHC DATA PROH yOOR BALANCE SBEET' 

221 INPUr'NOHTll HO.>(H:E-12/N:F-12BS/H 

23B INPUT'LOANS OUTSTANDING, ACCT 7Bl*iL 

24B INPUT'ALLOWAIKE FOR LOAN LOSSES, ACCT 719*]LL 

25B INPUT'CASH, ACCT Tll'jC 

261 INPUT-FEDERAL AGENCY SECURITIES, ACCT 742'iPA 

271 IHPUT'COtlWN TRUST ISVESINENTS, ACCT 741'|CT 

288 INPUT-SHARES, DEPOSITS, CERTS - OTHER CU'E, ACCT 745'rCU 

291 INPUT'OTHER SHARES, DEPOSITS CERTIFICATES, ACCT 746'iHlt 

3BB TI-FA*CTtCU*l«iST-CT«CU+l« 

311 INPUT-TOTAL ASSETS'jA 

121 INPUT-REGULAR SHARES, ACCT 9I1'|S 

331 INPUT'HM SHARE CERTIFICATES, ACCT 9IB*]SC 

141 INPUT'RECUCJkR RESERVES, ACCT 931*|RIt 

351 INPUT'RESERVE FOR CONTINGENCIES, ACCT 913-;RC 

361 TIt-RIt*RC 

367 RtM 

168 BDl ..... INPUT INCOME STATEXENT DATA . « • • • 

369 RDI 

171 CLS:PRIHT'IHPUT TOE FOLLOWING DATA FROM TOUR INCOME STATEMEH 

T' 

181 PRIHT'BC SURE TO USE yEAX-TO-DATE PIGORES'iPRINT 

39i INPL-T'IHTEREST ON LOANS, ACCT lll'il 

4lf IHPUT'TOTAL OPERATING IHCOHE'iOI 

411 IKPVT-TOTAL OPERATING EXPENSES* lOE 

417 REM 

41B RDI ..... INPUT STATISTICAL DATA • ■ » . . 

419 RDI 

42B CU:PRItrr*INPUT THE FOLLOWING DATA PROM YOUR* 

431 PRINT'STATISTICAL REPORT' ! PR IHT 

44B INPUT* NUMBER OF DELINQUENT LOAHS'fND 

45B INPUT-DELINQUENT AMOUMT'iDA 

468 INPUT-TOTAL NUMBER OF LOANS'jTL 

478 IHPUT'LOAN AMOUNT, TEAR TO DATE*iLA 

488 INPUT'HUNBER OF HCHBERS'lKH 

498 PRINT'YOU WILL PROBABLY HAVE TO SEE VOUR BOOKKEEPER FOR* 

511 IHPUT*SRARES PLEDGED AS LOAN COLLATERAL* | PS 

597 HEK 

598 REM* » . . • COMPUTATIONS 

599 RDI 

611 TS'S*SCiAS-(BStTS)/2:AL-(BL+L)/2iAA-(BA*A)/2 

«ll P(N,ll-<OI/AA)*FEP(H,l)'(IHT(P(H,l|*ll8*.5))/lia 

fi2l P(N, l)-(I/AL)*F:P{H, 21 -{ItlT(P[N,f )■!••+. 5) )/lM 

638 P(H,8)-OE/Ol!FIH,3)-(INT(P(H,l)»lll*.511/18t 

£41 P(H,l)-[L/TS)*IlliPIN,4)-(Iin[PIR,l)*lll*.5))/188 

ESI P(N,Sl-.)S*P*[OI-OE)/[.94*TSIiP|N,5)-tII'T(P|K,l|*l»4.5))/ll 

8 

Program conunuti 



III. II 
(ll.il 



mill 
iiiiii 



tii.t* 
lit. II 



(iiiii 

iitiii 



iiii.ti tilt. 11 



Prog/am continued 

((■ P(N,i)-L/*:P(H,6)-nKT(P(H,B)'ll9 + .5))/lBB 

871 P(K,l)-TB/DA,p{N,7)-(IHT(P{N,B)*ieit.5))/lflB 

688 PlH,t)-ltB'(TR+LL)/LiP(N,B).(IKT{P(N,fl)*lBB+.5))/lB9 

691 P{H,B)-1BB»(C*ST1/(TS-PS) : P(N,9) «{IHT(P(N, B) •IBB*. 5) )/lBB 

7iB PCN,9)-lBB'[TS+TB-LLl/TS.P(N,lB)-{IHT(P[N,B)'lB9+.5))/lflB 

71B P(N,B)-19B*DVL:PlN,ll)-(IMT{P[H,B)*lBB-t.5})/lB9 

712 PlM,B)-ltB»KD/TLiP(H,12)-(INT(P(H,B)*lBB*.5))/laB 

713 P(lt,B)-liB*TL/IU(iP(N,l])-(IHT(F(N,B)*18et.51 )/19B 

714 P(tl,a)-tLA/AL)*ElP(N,14}-(INT(P(N,0)*lBB*.5) )/19B 

715 P(H,B)-L/TLlP(tl,15)-IHT(P(H,B)) 

716 P{N,B)-(KM-tll1)*E:P(N,16)-IKT{P(N,«) ) 

717 P(H,B)*(TS-BSl»E:P(N,17)-IHT(P(N,?l/19flB) 
71 B P(N,B)-TS/N«!P[N,18)-INT(P(K,BJ ) 

719 P[r,«l-E*(TS-BS)/l lSfllSH)/2) .-PCN, 19) - I INTl P (N, B) 'IBB*. 5) ) /H 

73 e P(K,t)-SC/TS:P(N,2B)-(lHT(P(N,B)»lBB+.S))/lBB 

73B PRIMT'WOULD YCU LIKE TO INPUT DATA FOR" 

749 PRIMT'ANOTHER MONTH AT THIS TIRE?" 

JiB t$-INKEyj:triS--*THEN7^B 

7CB IFtS''N'n<E»9BB 

77B IFI5>'y-THEN2a9 

897 REM 

898 REM OUTPUT FORHATS • • • ■ • 

B99 REM 

9BB PlS-"» \ 

11.11 til.tl til. II Itt.tl tit. It ttl.tt 

It. II lit. II- 

91B P2S-'t t 

ttlll Ittlll lltttt unit titlll tittti 

llltl Ittltf 

915 MS-'t « 

It. I* ttti.tt till. II int. It nil. It till. It ittt.ti itit.ti t 
ti.ii ttit.tt- 

977 REM 

978 REM FCRK HEADING • • • • • 

979 REM 

9BB LPRINTCHRSI31) :LPRINTCI<II¥IB1) :LPRIHTTAB(1B)*E-SISTEII8 CAMJUI 
D PEI>EKAL CREDIT UMIOM 
99B I.PRIKrTAB(2B] 'HOtmiLy IKDICATORS 
IBBI LPRIMTTAD(14)V:LPi)IHTCHR$(B2) 

IBIB LPRIrfT- JAW FEB 

KAB APB MA* JUNE JULY AUG SEPT OCT 

MOV DEC" 

1B2B LPSIMTSTHIHCf (I.H,*-*} 
1B27 Rn 

1828 RQl • • • • * PRIWT ROUTINE • • * » • 
1819 REM 

183B LPRIWTUSIMCPlSi'ANHUAL RATE OF RETURN OH'i P{1 ,1) I P( 2 , 1] j PI 1 
,ll(Pl4,l)|P15,ll;P(6,l),Pn,ll;P(8,l);P(9,l);PI19,l|iP(ll,ll,P{ 

1848 LPRIHT' TOTAL ASSETS* 

185B LPRIHTUSINCPlSi 'ANNUAL RATE OF RETURN 0N*| P( 1 , 2) ; P( 2,2) r P t 3 

,21,P(4,21,P(5,21,P{(,2),P[7,2)iP(8,2),P(9,2),P|lB,21;P(ll,2),Pl 

1868 LPRIWT- LOANS TO MEMBERS* 

1878 LPRIHTUSIHGPIS, -ACTUAL EXPENSE/ 1 HCOMZ RATIO" iP(l .3) j PI 2, J) , 

P(3,3i;P(4,3)rP[5,31:P(6,3),P(7,3);P{8,3))P[9,31;P(18,3)jP(ll,3| 

|P(1J,J):LPHINT" TO DATE' 

1B8B LPRJHTUSISGE'l$i"PeKCEHT LOANS TO SHARES' |P[1 , 4) ) P< 2,4) |Pt3 , 

4)iP(4,4)|P(5,4),P((,4)|P(7,4)rP(e,41iP{9,4)(P(lB,41|P(ll,4)|P[l 

2,4) iLPRIKT 

1B9B LPRIhmiSINCPlS;'MAXIMirM ALLOWABLE DIVIDEND RATE" ,P(1 ,5) i P( 2 

r5)iP(3,S),p(4,!)TP(S,5)rP(6,51 jP(7,5)jP(8,5ljP(9,5)iP(18,5)jP[l 

1.S)|P(12,S) 

IIBB LPRINT' YEAR TO DATE' 

1118 LPRIHTUSINGP1$|'L0ANS TO ASSETS RATIO'] F(l,t) ) P( 2,6) ; P(3 ,6) 

tP{4,6liP15,6)iP(6,6)iP{7,6)fP(8,6)iP(9,6)jP(18,Sl|P(ll,6)iP{12, 

€) iLPRIHT 

1128 LP8IHTUSINGP1$; "RESERVES TO DELINQUENCY RATIO'j P(l ,7) ;P{ 2,7 

l;P(J,7t(PI4,7)iP(5,7)iP{6,71 jPI7,7))P(B,7)iP(9,71|P(lB,7)iP(ll, 

7} rP(12,7) iLPRlVT 

113fl LPRINTUSINGP1$( 'PERCENT RESERVES TO LOANS' t P(l .8) iP(2,e) j P( 

l,8)|P(4,8),P(5,8)rPI6,B),P(7,8)iP(8,B)|P(9,8),P(18,8),Ptll,Bl tP 

(12,81 tLPftINT 

114B LPRINTUSIHGPlSi'PERCEKT LIQUIDITY RESERVE { S» HIHf 'lP(l ,9) j 

P(2,9)fP(3,»);P(4,9)iP(5,9)|P(6,9J|P(7,9);P(8,9)|P(9,9)|P(lB,9)| 

P(11,9)|P(13,9) iLPRIhT 

11S8 LPRIirTUSIHGPlSi "LIQUIDATION VALUE OF MEMBERS " | P( 1 >18] | PI 2, 

181,P(3,18)tP(4,18);P(5,lB),P{«,lBl;P(7,lB)pP(8,18t,P(9,18),PllB 

,18)iP(ll,18)iP112,lB)]LPRINT" SHARES' 

1168 LPRIITTUSINGPlSi'PERCEHT DELINQUENCIES TO LOANS ($)'|P(1.11) 

lP{2,Il)|P(3,ll);P(4,ll)|P15,ll),P{(,lll,P(7,ll),P[i,ll),P(9,ll) 

IP{18,111,P(11,11),P(12,11)!LPR1I»T 

1178 LPRIimjSIHGPlfi"PERCBHT DBLINOCEKCieS TO LOANS' (P(l,12) i PI 2 

,13|;P(3,12),p(4,lI)iP(S,12)jPt6,121(P{7,12))P(8,121iP(9,12)jP(l 

8,12)}P(ll,12|,p(l],12),LPXIirr" (QTY)" 

llBi tPRHmiSIMCPK, ■PERCENT OF MEMBERS BORROWING' j P( 1 ,13) iP(2,l 

3)(P(3,13)jPt4,13) jP(5,13)iP(S,13),P(7,13)jP|8,13),P(9,13),P(lB, 

ll)|P(11.13l|P(12.11)iLPRIirr 

1198 LPRIimjSIMGPlSt'LOAH TURNOVER RATIO [YEARS) ' iPU < 14) | P( 2,14 

>|F(3,14),P(4,14),P(5,141:P(6,14)|P17,141;P{B,14))P(9,141,P(1B,1 

4)iP(ll,14)|Ptl2,14)iLPRIOT 

1288 LP8IimJSIHGP2St "AVERAGE LOAN ACCOUNT BALANCE' j PU ,15) iP[2, 1 

S»jPlJ,15),P(4,15),P(5,15)!P(6,15)jP(7,15)iP{8,15HP19,15)tP(lB, 

ISliPdl, 15), PI12, 15). LPRINT 

1218 LPRIHTUSIHGPiSi 'ANNUAL MEMBERSHIP GROWTH", P(l ,16) ,P(2, 16) |P 

(3,16) jP(4,16)|P(5,16),P(6,16);P(7,161|P[8,16)iPl9,J61,Pai.l4)l 
P{11,I(),P{12,16).LPRIW 

121i LPRINTUSIHGP2SI 'ANNUAL SAVINGS GROimi ($ X 18881 * ,P[1 il7) |P 

l2,l7)iP(3,17),P(4,17),P(5,17))P(6,17),P{7,17)(Pie,17),P(9,17),P 

(18,n),P(ll,l7),P(12,17),LPRIin' 

1238 LPRIirrUSIHCP2f( "AVERAGE SHARE BALANCE' fP(1 , 18) iP( 2 ,18) I P(3 , 

181,P[4,la)iP(5,18),P(6,lB),Pn,lBI,P(8,18),P|9,lB)|P(18,18),P(l 

1, 18), P{1I, IB) .LPRINT 

1248 LPRINTUSINCPSt, 'AVERAGE ANNDAL SAVINGS PER MEMBER', PI 1 ,19) i 

P(2,19),P[3,19),p[4,Ul,p(5,lS)iP{6,I9),P(7,19),P(8,19),P(9,191p 

P(1I.19) jP{II,19|,P{ia.ll)iLPRINT 

1258 LPRlimJSIMGPKi'CERTiriCATES/TOTAL SHARES' |P1 1 , 28) , P( 2 ,28) i 

P13,281,P(4,28),P(S,281,P(6,28)jP(7,2tl,P(B,28)iP(9,281,PI18,2B) 

,P(11,28),P(12,2B) 

1297 REM 

1298 REM • • • • • SAVE DATA OH DISK • * * • • 
12M An 

1388 OPEN'0",l,"CU/DAT",PRINTtl,YrBL,BA,BS,BH 
1318 F0RX-1T01JIF0R1-1TO28 

1328 PRIHTtl,F(X,I);",",,|lElTtiHEXTX:CLOSEl 
1488 END 




UG would 

tike to apologise to all 

readers, and dealers, who ordered 

The Custom TRS-SO and have been wonderin^t where it is. 

Magazine advertisements have to be prepared 2 to 3 
months before they actually appear in print. Originally the 
book was scheduled for printing in early May, just as the 
first advertisements were to appear, but the Editor must 
have been in a time-warp when he made the original 
production estimates! 

He completely under-estimated the time needed to 
prepare and process the dozens of photographs, circuit 
diagrams, printed circuit layouts, assembly language 
programs and reams of information that Dennis Kitsz had 
provided. 

The book has now been scheduled for printing in early 
November, and should be available before the end of the 
month. It will be worth the wait, it's one heck of a book! 

Credit card orders are not being processed until the book 
is back from the printers. If you prepaid by check, and 
would prefer not to wait, then you can obtain a full refund 
prior to shipment - or use your credit towards other IJG 
products. 

Sorry about this, thank you for waiting. 



:3^P 



*-i 



Jim {'What year is it?') Perry, Editor 




1260 West Foothill Blvd., 
Upland. California 91786 

(714) 946-5805 

TRS-80 is a trademark of Tandy 



GAME 



Outmaneuver a friend with your Color Computer. 



Colorful Maneuvers 



James W. Wood 

424 N. Missouri. Box 507 

Atwood. IL 61913 



Tired of running games that 
involve no decisions or 
games in which you iearn to 
beat the program? This game 
uses the computer to generate 
the playing field and rapidly 
lengthens two player's lines till 
one runs into something. You 
cannot predict your opponent's 



HI playpi on iigii 

S Oeieimirws imiiil U redion 

WS FNflht pidyeis inoui 

RS lelt clayeis i"inil 

OS delerminesdi'eclPixi 

U nghl players starTing X cooidindile 

V Tigni pUyprs sliitiiig * coo'il'inal'- 
X lell playei^ sta'ting I. iix>i*nale 

V lefl cJjj''''* ^Ta'tinq y coori)<ndle 
Z cokQi o( ijnc 

N dvecis program Troin le<l (O'ighl pLjyer 
A number of ^ames l^fr pJaye' *on 
Q nuT-[ier o' games 'ighT pUyef j*on 
O usM in 0>a*ing Dt-Oet 



Table 1. Variable List. 



strategy. Will he attack and try 
to surround you, or will he just 
try to stay in the open with lots 
of running room? 

I bought one version of this 
game in a book, but it didn't 
work. One player could perma- 
nently block the other by hold- 
ing down a key. In my program 
if pushing a letter doesn't 
change your direction, immedi- 
ately release and push again. 
The second push will work. 
Many hours of study by stu- 
dents in my computer class 
have shown that the program is 
functional. ■ 

Contact the author for irjfor- 
fTiation on purchasing the pro- 
gram. 




1 5 oelpirtn™> slariing direcuor 
fl dele'mines iTarling position 

9 d*aws bofrtc' 

10 U 101 make-i ie impossiOle loi 
piay^' 10 pon-nj'>enTly titock hcyDoaid 
JO 50 ami \K IWluinsline 

52 152 (IslerminM i( gam* oyw 
JOOiid sivxas niws gtme Nni 
lOOC IlAJin^truClionS 



Table 2. Lir\e Descriptiori. 



Program Listing 1. 4K Color Basic. 



t CLStlHPUT'PLAYER OK LEFT * |G$t IMPUT^PLAVBR OH RICH? 'tB$iCOSUB 
111! 

1 CLSiS-I<MD(4} 

2 IFS-lTHBim$->J>iRf'*A*iC<yr08 

3 IFS-2THEHHS-'L"iBS-"D"iCOTOB 

4 IFS-STHENWS-'I'tRS-'E'iGOTOa 

5 WS-"K"iRS-"C" 

8 ll-BiV>>15iX-55iY-15iN-l 

9 CLS0iZ-RND(8) :FOR0-flTO63 :SET(0,a , Z] :SET(0,31,Z) :HEXTQtrORQ-BTO 
31iSET(0,Q,Z) iSET(e3,0,2) iHEXTQ 

11 IFN-lTUEN12ELSBleR 

12 QS-INl[EYS!lFOS-"THeKQS-WS 
11 IFASC(0$! <7aTHENlB2 

15 HS-QS 

2» IF0S-*J"THENX-X-l:GOTO52 

3B IFQS-*L"TaENX-X*l:GOT05J 

4B IF0S-"I"TaEHY-Y-l:GOTO52 

5B IFQS-"N"THENY-Y+1 

52 IFI>OINT<X,YU>BTHEN3BB 



P'ogra'Ti corilmues 
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WE WILL NOT BE UNDERSOLD 



DISK DRIVES 



I 



FOR TRS-80- 
CCt-100 



Mod*) I 

5V4"40Track(102K) 



ADDON DRIVES FOR ZENITH Z-69 
CCM89 5V4- 40 Track n02K) 

Z-87 Dual 574' system 



$299 



$389 
$995 



External card edge and power supply included. 90 day warranty/one 
year on power supply. 

CORVUS 5mg S30S9 lOmg $4489 Mirror $699 

RAWDRIVES 8'SHUGART801R $399 

574- TANDON $CALL POWERSUPPLIES $CALL 

DISKETTES -Box of 10 

574- Maxell $40 

8* Maxell $45 

PLASTIC FILE BOX-Holds 50 5 V4 ' diskettes 
PLASTIC LIBRARY CASE 5V4' $ZJOO 

HEAD CLEANING DISKETTE 
FLOPPY SAVER $10.95 



16K RAM KITS 

200ns for TRS-80,*Apple II. (specify): 

COMPUTERS/SYSTEMS 



BASF/VeibatIm 


$26.95 


BASF/Veibatim 


$3800 




$19.00 


1 8" 


$ 4.00 




$2500 


RINGS 


$ 6.95 


2 lor $37 


$19 


^lurnpers 


$2.50 




$CALL 




$CALL 




$2200 


800 


$ 789 




$ 259 




$CALL 



ARCHIVES 64K. 2-Drives. 77 Track 

ALTOS ACS8000 Series 

ZENITH 46K. all-in-one computer 

ATARI 400 $ 359 

MATTEL INTELLIVISION 

APPLE PERIPHERALS 

SYSTEM SPECIAL 

Apple II Plus 48K w/drive and controller. Epson MX-80 printer and 

interface. SUP-R Mod RF Modulator: List $2965 You Pay $2295 

TERMINALS 

ADDS Viewpoint $CALL 

ZENITH Z-19 $ 725 

TELEVIDEO 910 $ 559 9200 $729 950 $ 939 

IBM 3101-10 $1189 

&100 CALIFORNIA COMPUTER SYSTEMS 

MAINFRAME $359 ZOO CPU $ 269 
e4KRAM $599 FLOPPY DISC CNTRL $ 359 

INTEGRATED SYSTEM WIINTERNAL CABLES, TESTED $1975 

2P-f2SI/0 $ 269 

4 PORT SERIAL I/O $ 249 

4 PORT PARALLEL I/O $ 179 

CABLES $CALL 

CASIO CALCULATORS 

POCKET COMPUTER FX702 $199.00 

DESK PRINTER/CALCULATOR FR100 $ 79.95 

SCIENTIRC CALCULATOR FX8100 $ 49:95 

QAME WATCH CA90 Plastic $ 49.95 

GAME WATCH CA901 Steel $ 69.95 

SPORT WATCH AX210 Calendar $ 59J»5 

BUSINESS SOFTWARE 

WORDSTAR for Apple II $ 329 

WORDSTAR for Zenith Z89 $ 329 



PRINTERS 




NEC SPINWRITER 
7710 R.O. Par 
7710 H.O. Par wrftractor 
7720 KSR w/ tractor 
7730 R.O. Ser 
7730 R.O. Ser w/tractor 
NEW 3500 Series 
MX-80 MX-80FT 



EPSON MX70 

PAPER TIGER 

IDS 445 Graptiics & 2K buffer 

IDS 460 Graptiics & 2K buffer 

IDS 560 Graphics 

ACCESSORIES 



ANADEX 

OKI DATA 
Microllm 80 
MIcrollrw 82 
Microllm 83 



DP 8000 $849 



MX100 



DP-9500/01 



Friction & pin feed 
Friction & pin feed 
120 cps, uses up to 15' paper 
Call for new Microllne series! 
CENTRONICS 739, new model with graphics 
C. ITOH 
Starwritar I 
Starwriter I 
Starwrlter II 
Starwriter II 
AXIOM 
DATA SOUTH 

MONITORS 

BELL ft HOWELL 
LEEDEX 



25 cps, parallel interface 
25 cps, serial interface 
45 cps, parallel interface 
45 cps, serial interface 
GP-80M 
180 cps 



$2395 
$2595 
$2795 
$2395 
$2595 
$CALL 
$CALL 

$ 639 

$ 799 

$1049 

$CALL 

$1295 

$CALL 
$CALL 
$CALL 

$ 739 

$1439 
$1495 
$1770 
$1870 
$ 319 
$CALL 



$155 

12' Green Screen $159 



12" Green Screen $238 
13- Color $399 

12" Green Screen $129 



9'B&WBHD911 

12'B&W $129 

13- Color $329 
SANYO 9' B & W $149 

12' B & W $219 
ZENITH 13' Color $349 

TELECOMMUNICATIONS 

LIVERMORE STAR MODEM 2-year guarantee $125 
UNIVERSAL DATA SYSTEMS UDS103LP $149 UDS103JP $215 

NOVATION CAT $139 CAT $149 

AUTOCAT $199 APPLE CAT II $339 

D.C. HAYES SMART/STACK MODEM $235 

MICRO-MODEM II $295 

CCI Telnet Communications Package S13S 

APPLE ACCESSORIES AND SOFTWARE 

Mfr by Microsoft - Mountain Computers 



VISICALC $185.00 

VISITERM $119.00 

Z-80SOFTCARO $259.00 

KEYBOARD ENHANCER $110.00 

APPLE JOYSTICK $ 49.00 

SUP-R MOD $ 25.00 

APPLE CARDS $ CALL 

SUPERCALC $199.00 
CPS MULTIFUNCTION CARD 

ENTERTAINMENT 

Mir. by On Line - Broderbund 

FLIGHT SIMULATOR $29.00 

WIZARD & PRINCESS $28.00 

MYSTERY HOUSE $24.00 

HI-RES FOOTBALL $35.00 

RASTER PLASTER $25.95 

SPACE EGGS $17.95 



Videx - CCS - Personal Software 
VISIDEX $159.00 

VISIPLOT $139.00 

VIDEX BOARD $249.00 

16KCARD $159.00 

SUPR FAN $ 39^ 

CCS CARDS SCALL 

ASCII EXPRESS $ S$jOO 

ALF9 VOICE BOARD $149.00 
$199.00 



Sinus 
SARQON M 
ABM 
GORGON 
MICROPAINTER 
APPLE PANIC 
MATTEL GAMES 



California PactlJc 
$29J)0 
$21.95 
$34 J5 
$29.00 
$27.95 
$27.00 



For fast delivery, send certified checks, money orders or call to arrange direct bank wire transfers. Personal or company checks require two 
to three weeks to clear. All prices are mail order only and are subject to change without notice. Call tor shipping charges. 



DEALER (NATIONAL/INTERNATIONAL) INQUIRIES INVITED Send for FREE Catalogue 



TO ORDER CALL TOLL FREE 1 800 343 6522 
TWX: 710-348-1796 Massachusetts Residents call 617/242-3361 



The CPU SHOP. 



5 Dexter Row, Dept. MCllM 
Charlestown. Massachusetts 02129 
Hours 10AM-6PM (EST) Mon.-Fri. (Sat. till 5) 



Technical Information call 617/242-3361 
Massachusetts Residents add 5% Sales Tax 
Tandy Corporation Trademark/®Digilal Research 



r iijister ..ri.irt,.- 


ViSA 


^WB 



^S»* Usi of AdvtrlisKS on ptg» 402 
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for the TlC^-80 from Micro- Mega 



The Original GREEN-SCREEN 




The eye-pleasing Green-Screen fits over the front of your 
TRS-80 Video Display and gives you improved contrast with 
reduced glare. You get bright luminous green characters and 
graphics like those featured by more expensive CRT units. 
Don't confuse the Original Green-Screen with a piece of thin 
film stuck to the face of your video tube, such as that adver- 
tised by others. The Original Green-Screen is mounted in a full 
frame perfectly matched to the color and texture of the 
TRS80 Video Display. It is attached with adhesive strips 
which do not mar your unit in any way. 

The full frame design of the Original Green-Screen "squares 
off" the face of your video display and greatly improves the 
overall appearance of your system. 

{Specify whether for Model I or Model III) 

THE GREEN-SCREEN $13.95 

Add $1.50 for postage and handling. 

THE ULTIMATE STAR TREK PACKAGE 

■ ■ I 

' ■ . ■ ■( 




Tired of trivial computer games? This complete Star Trek 
package will provide you with endless fascination and 
challenge. In addition to the program cassette, it includes 
comprehensive instructions, a pad of "Voyage Log" record 
sheets, and a free-standing "Torpedo and Maneuvering 
Chart." 

The package is built around the latest version of Lance 
Micklus' incomparable Star Trek III, a 13,000 byte program 
with a host of subtle and imaginative features, which in- 
clude numerous dynamic and spectacular graphic displays. 
Star Trek III puts you in command of the Enterprise cruising 
In a galaxy of 192 quadrants filled with uncharted hazards, 
Including hostile Klingons, pulsars, and black holes. You 
have at your disposal scanners, various weapons and 
defense systems, on-board computers, and a loyal crew. 
(You will need them all to survive the Klingons.) 
Your mission Is to rid the region of Klingons and to locate 
five inhabitable planets, all within 300 stardays, before re- 
turning to Star Fleet Headquarters where your overall effec- 
tiveness as a starship commander will be scored. High 
scores are possible only with careful planning and effective 
battle tactics. The "Voyage Log" sheets will guide your 
strategy, and the "Torpedo and Maneuvering Chart" will 
give you a vital edge in combat. (When you engage three 
Klingon ships you can't afford to miss.) 

STAR TREK PACKAGE dor Levelll. ISKonlyj. S22 95 

Add S2Q0 tor postage and handling. 



Terms: Check or money order, no CODs or credit cards, please Add amount 
shown for postage and handling to price ol the item All items Shipped wilhm 48 
hours bif (ifsf class Oi priority majJ Virginia residents, add 4*/, sales tax 



Pragiarn continued 



6B SET[X,Y,Z1 :l(-2:GOTOH 

IBB OS-IMKEYS:lfQS-"THE!IOS-HS 

lei 1FASC[0S) >7BTHEm5 

IBZ RS-OS 

12B IFDS-"*"'niEMU-U-liC0T01i2 

lia IF0S-'D'THE«U-l)»l!GOTO152 

14B IFQS-'E"THEMV-V-l:G0TO152 

158 IfQS-"C'THENV-V+l 

152 irPOINT(U,V)<>0THEK4aa 

16B SET(U,V,l) tN-liGOTOia 

3Ba SO<JHD2aa,3B;FORE-lT03ee:SET|X,y,Z) :RESET(X,y) iNEXTE 

31B A-A*JiCLS:PRIHTCSi" WINS" iGOTOSaB 

4BB S0UNDlBa,3B!FORE-lTO3aB:SeT(U,V,31 :RESET(U,V) :NEXTE 

41B B-B+l:CLS:PRINTHSi' WINS* 

Saa PRIKT"TOTAL':PRINTGS!" WON" ; AiPRlNTHSj * WON" [BjFORO-lTOSBB: (J 

EXTOlGOTOl 

IBBB CLS:PRINT'KOH TO TURN YOUR LINE" 

leie PBIfJT'PRESS THESE LETTERS FOR THE DIRECTION TO GO" 

11B6 PRINT 

■jHS 
'. I* 

n J L" 

: N" 

UP" 
LEFT RIGHT- 
DOWN" 
115B PRIKT:PHI1JT'PRESS ANY KEY TO CONTINUE" 
llfiB YS-I«KE*S!lFYS-"THEK116B 
117a RETURN 



lllB PHIKTGS;" 
112B PRINT" 
1138 PHIHT" A 
1148 PRINT' 

1142 PRINT" 

1143 PRINT" 
11*4 PRIW 



8 U = 15:V = 24:X = 1 13;Y = 24:N ^ 1 

9CLS:FORQ = 0TO 

127:SET(Q,0):SETlO,47):NEXTQ:FORQ = 0T047:SET{0.Q):SET(127,O):NEXTQ 

60 SET(X,Y):N = 2:G0T01D 

160 SET(U,V)):N = 1;GOTO10 

300 FOR E = 1TO300;SET(X,y):BESET(X,Y):NEXTE 

400 FOfi E = 1TO300:SETlU,V):RESET(U,Vl:NEXTE 

Program Listing 2. Listing Change for Model I and III. 



Micro- Mega -P.O.Box SS65 - AHingcon.Va SSS06 



.,,i^^^ '■''''' RIBBON SALE 

"for radio shack* CENTRONICS-EPSON UNE PRINTERS 
(Longer UfB-Hsavier Inking) 



EXACT REPLACEMENT INSERTS 

(Canrittges NOT Included] 
LP I-II-IV-70&-730-737-T79 $11.00/3 $42.00/D0Z 

LPIII-V $21.00/3 $82.00/D0Z 

LPVI-VIII $21.00/3 $82.00/D0Z 

Daisy Wheel il [Carbon Film) $26.00/6 $S0.00/D0Z 

EPSON MX-70-aO-IOO $24.00/3 $95.00/D0Z 

[Our instructions make Inserts easy to put in your cartridge] 

RELOADS 

[You SEND old CARTRIDGESto US"WE RELOAD them for you) 
LPIII-V Each. ..$9.00 

LPVI-VIII Each.. .$9.00 

OW II [Carbon Film] 3 Pack.$15.00 

Centronics 7-MEG 702, 703, 704, 753 Cartridge Each.. .$10.00 

EPSON MX-70, 80, 100 Each.. .$10.00 

NEW CARTRIDGES FROM RADIO SHACK 

LPIII-V [26-1414] Two for $25.00 

LPVI-VHI [26-1418] Twofor $21.00 

LP VII (26-1424) Twofor $16.00 

DW II Carbon Film [26-1419) 3 Pack $22.00 

CENTRONICS 7-MEG 702, 703, 704, 753 Cartridge Two for.. .$26.00 

Volume 1 MODEL OS" GAME DISCS Volume 2 

Biorhythms, Trap $25.00 Each Ugly. Bingo 

Rip Cord, Yacht Saa Towers, Blackjack 

Coneontralion + 4 Mora Farkle. Peny + 3 Mere 

We Pay Shipping On Prepaid Orders! Net 30 Accounts AvailabJe 
SEND CHECK. MONEY ORDERor COD TO: 

BCCOMPCO ^37 mgm 

800 South 17* Box 246' 417 832-4196 | | 

Summersvilie, MO 65571 
'RADIO SHACK is a trademark ol Radio Shack, a Tandy Corp. 
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AUTO-DIAL/ 
AUTO-ANSWER 




$224.9Sr 



The MICROCONNECTION™ can dial 
and answer the telephone, run 
printers, decode busses, transcribe 
transmissions, answer/originate and 
direct-connect to the telephone 
system. Lots of terminal and host 
software too. For more information 
write or phone: 

the fnicroperipheraf corporation 

2643- 151st PI. N.E. 

Redmond, WA 98052 

(206)881-7544 

• RS232 AAtCROCONNECnONTM ^ XB 




RELIABLE, SIMPLE MEMORY 
EXPANSION YOU CAN AFFORD! 

f ^ii^ 



I 



Shown above Js the IM-2 4aK INTERNAL MEMORVand a phillips screw- 
driver — everything you need to ADD up to 32K RAM to your TRS-flO* Model I 
keyboard unit [for a lotdl of WK RAM). No solder jng Of trace cutting — just open 
the tdse, remove your RAM chips, plug the INTERNAL MEMORY(lM)imo the 

RAM sockets, plug your chips bxk in, connea 4 solderless clips (they work! land 
close the case (Detailed, illustrated step-by-step insiniaions show you how to do 
this). You now have a 48K keyboard unit — and ycHJ didn't hjve to buy an 
exp.insion inierfKc! If you don't need +8K, a 32K version is available. 

Time and experience have shown that the TRS-80* expansion buss cannot 
reliably drive memory systems. Because the IM does not use the buss, it may be 
used with ANY expansion device for reliable memory operation. Some of our 
customers use an IH INSTEAD OF the RAM in their expansion interface to 
eliminate El memory problems! 

Because the IM draws most of its power from the 12 volt supply, power supply 
kaading is noc a problem. Some additional heai is generated, but the TRS-flO* runs 
so hot anyway you probably wcxi't notice the increase! 

The INTERNAL MEMORY is completely tested and assembled using only 
the finest materials. You have IS days to return it foi a refund if you don't like it, 
jnd It is guaranteed for I full year Installation is available for a small fee. 

Send a SA.S.E. for more information. 



PRICES — 



IM-IB (3ZK) )e5.50 (w/t6K RAM) 

IM'Z (48K) 1140.00 (w/3ZK RAM} 

Prices include UPS shipping in U.S. 
Utjh residents add 5% tax; FOREIGN ORDERS add 1S%. 



.'/((i/rp 



S,. 



6244 West 3705 South Salt Ldke City. UT M120 (801) 967-2324 




SCRIPLUS 



Scriplus is a modification to Scripsit '^ which enables 
you to take advantage of the special functions, 
features, and print formats of your printer while your 
document is being printed. Allows you to: 



change ^ x |3 si rt cj ^ cJ print 
change no- of charactsrs per inch 
or underline in mid-line! 



All in accordance with the capabilities of your printer. 
You can change your print size at will! Features: 

1) The user can send commands to the printer to 
activate special formats 

2) Scriplus will not crash programs protected in high 
memory. 

3) "END" returns to DOS READY instead of re- 
booting. 

4) The initial line-feed is changed to a carriage return 
to empty the text buffer. 

5) The user can get an ALPHABETIZED directory 
from within scriplus. 

6) Optionally select automatic line feed after carriage 
return. 

7) Supports custom printer drivers {not included) 

8) Modifies Scripsit/LC or /UC. (MOD I) 

9) Works with MOD I and MOD III! (Including MOD III 
3.1 Scripsit!) 

10) Specifically written for the MX-80, but will work 
on ANY Printer that accepts CHR$ codes for 
control. 



Tape or disk — *24.95 

(specify) 



— DEALER INQUIRIES INVITED — 

QUALITY SOFTWARE DISTRIBUTORS 

11500 STEMMONS EXPRESSWAY. SUITE 104 ^^^ 



[RSUtScr^lrt 
Iiidtmirkt it I*n4( Cap. 



DALLAS, TEXAS 75229 
PHONE (214) 484-2976 
MICRONET 70130.203 



^21 



PiKtDonHolkicWt 



F'Se« List ol Advertisers on page 402 
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More powerful programming tools 
for theTRS-80: Nowon disk. 



Better results. Microsoft's Level III BASIC and Editor/ 
Assembler-Plus are programming tools that help you write 
complex programs in less time, with less effort and util- 
izing less memory. Better programs. No matter what your 
programming skill. And for the first time these tools are 
available on disk. 

Editor/ Assembler-Plus. A powerful editing, assembly and 
debugging tool with many sophisticated features that make 
writing TRS-80 assembly language programs easier, faster 
and more efficient. 

• Full disk capabilities. 

• Assembly directly into memory. No need to save object 
code then reload for execution. 

• Macro capability that allows you to define macros for 
commonly used sequences of instructions. 

• Conditional assembly that allows you to generate more 
than one version of a program. 

• Eight breakpoints at a time for program debugging. 

• The INCLUDE statement that allows you to call additional 
disk files for assembly 

• Other features include extensive operators, automatic 
origin, symbol table pnntout, quash command, hex, deci- 
mal and octal constants, single step through instructions 
in memory, five type-out modes, four type-in radices, plus 
extensive edit commands. 

A more powerful BASIC. With Level 111 BASIC, you get 
power to perform tasks in BASIC that used to require 
assembly language. Plus, new ease-of-use features for 
your TRS-80. 

• Advanced graphics. Develop charts, graphs, even anima- 
tion in Level III BASIC. Draw a line, an outline box or 



a solid box by specifying just two points. Then save and 
recall it with BASIC commands. 

• MENU. One command that allows you to construct an 
entire menu. 

• CHAIN and COMMON commands allow you to call 
another program and pass variables to it. 

• Powerful editing commands such as COPY/TRANSFER, 
FIND and CHANGE. 

• DUMP command that makes debugging easter. 

• Time-hmit response. New INPUT # LEN and LINE INPUT 
# LEN commands allow you to set a time limit on response. 

• RS-232 output from BASIC. With a single command. 

• More. Level 111 gives you automatic line numbering, 26 
user-definable single stroke instructions, and more. 

Disk or cassette. Disk versions of Level 111 and Editor/ 
Assembler-Plus are brand new. Cassette versions are also 
available with many of the same capabilities. 
Talk to your Mrerosoft™ dealer. Ask for a demonstration 
of two of the most powerful tools you can get for your 
TRS-80: Level III BASIC and Editor/Assembler- Plus, On 
disk or cassette. From Microsoft. 

TRSaO (S a trademark o1 Radio Shack, a division of Tandy Corporation. 

Microsoft IS a trademark of Microsoft, Inc. 

Microsoft Consumer Products is a division of Microsoft. Inc 
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CONSUMERS PRODUCTS 

■100 108th Ave. N.E . Believue. WA 98004 (206) 454 1315 



UTILITY 



For readable Basic programs. 



Superlist 



Morris Jones 

3395 Balboa St., Apt. 8 

San Francisco, CA 94121 



Basic, the world's most pop- 
ular computer language, is 
designed to be easy to read 



and learn. But have you tried 
reading a fairly complex Level II 
program lately? To a real begin- 
ner, it might as well be machine 
language. At least with as- 
sembly code there Is only one 
instruction per line. 

Much can be learned atwut 
programming by reading suc- 
cessful programs. Unfortunate- 
ly, the advantages provided by 
modern Basic interpreters for 
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microprocessors are disadvan- 
tages to the reader of Basic 
programs. An efficient program 
that takes advantage of Lev- 
el H'S best features is nearly 
impossible to read. Micros are 
limited in memory available, so 
a compact Level II program is 
written without spaces be- 
tween words, using as many 
statements on a line as pos- 
sible. Each space character 
uses one byte; line numbers 
use five bytes each (that goes 
for line 65000 as well as for line 
one). 

I wrote my first Basic pro- 
grams without the aid of a 
printer. I soon found myself 
wanting some kind of perma- 
nent record of my programs 
that wasn't susceptible to stray 
magnetism. A friend kindly of- 
fered to provide printouts in ex- 
change for copies of my twst 
programs. He had a disk sys- 
tem that would take a Basic 
program stored in an ASCII file 
and print it with each statement 
on a separate line. From that 
came the inspiration for a 
listing program that did not re- 
quire Disk Basic. 

Without a disk, the problem 
Is more complex. Basic does 
not store its programs in ASCII, 
but In a very compact coded 
version using one byte "to- 
kens" for Basic keywords. After 
obtaining my own printer, I 
quickly set about writing a pro- 
gram to give me readable 
listings using what was avail- 
able in Level II. 



Enter Superlist 

These are the features I 
specified for Superlist when I 
first began to research Level II: 

• Each line of Basic should be 
split at the colons, with each 
statement starting a new 
printed line. 

•The printout should have 
margins on the left and right 
sides of the paper, so a listing 
will fit neatly in a binder. 
•Jammed-together lines of 
Basic code should be spread 
out by putting a space on either 
side of any Basic keyword. 
"At the end of the listings, the 
program should report its size in 
number of lines, statements and 
bytes of memory occupied by 
the program text. 

Each of these features was 
realized in Superlist, along with 
two I hadn't expected: 
"Lines containing "If. . .Then 
. . . Else" statements are split at 
the "Else" by inserting a colon 
before it. 

• Lines with apostrophe-type 
remarks are split before the 
apostrophe with a colon. 

These were a result of the 
way Basic stores Else state- 
ments and remarks made with 
an apostrophe. 

How to Use Superlist 

To use Superlist, you need a 
Level II with at least 16K of 
memory, a printer that uses a 
Radio Shack parallel interface 
or any serial interface, and a 
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10 CLS 

28 CLERR290 

30 OIM Nl*<32>-B>;<:3.3'> .N2*<16^..G*-.'';3.5-..tJ3*:i6 

40 DEFSTRH.VtDeFIHTR-M.O-X..Z 

50 UI=1536Ot5C=0: IM=l!g=Q 

55 FOR1 = 1T03:FORJ=1T08:BC1,-IJ=0:G<I ■ .f >-=S: HEXTJ. I 

60 F0RI = lT032tHl<:l)=RIGHT*<STR*','I J .2;:NE::T 

70 F0Rl = lT07iH2<I>=STRIt-(G*';2,CHR*':644-I) ^:ME;;T:FC'Pl-3T0i6:K2.;l i^ STRIHGJ' 2-i 

+I>>:NEXT 

80 F0Rr = lT03:H3<I>=STR«<I):HE;:T!F0RI=-?T01c.:]I3';:..=CHF-:-i>-ro*I)i-" '■■■iiE/.T 

85 IFCTHEH1I0 

90 CLS!PRIHTiPRIHT"eLFCK BOX ',-€RSI01i 2. Q" :PFIHT"e'L' IIOPF.ir. JZniEy :F:<i:iT.rP 

VOU MEED INSTRUCTIOt^S? ": 

95 V=IHKEV*:IFV=""THEN95 

100 PRIHTV:!F0KI = IT02O0tl-IEXT: IFV="V"THEi;C— 1 iGOTOSC-iCiQi tiLSEIr'.'-, . "rr'F^^I.iTCH 

: 607093 

110 C=0:C:LS 

500 F0R'J'J=lTOS;FC*HU=lTOS:D=UI+65*64*U',i+3*HU:PCiK-E['.. 1-13; Pot'-ECj^i - 113;rJE; :TH' i 

510 F0R:^1T08:F^INT'I&5+3*I.H1<I);:NEKT 

520 F0RI=9T016:PRIH7«156+64f:i-95.. N1''I»;:UE;^T 

530 F0RI = 17T024:PRINT'*665-3*a-17.>.Hl':l>J:IIEXT 

540 F0RI=25T032:PRINT«377-64f';i-25> .Hl*^ n;:NE:T 

550 PRIHT«99, "CHOOSE: ";:PRIHT*lto3. "DEGREE OF DIFEMULr', , " ; ; FKICT illT ■ ' rJG.-; 

BALLS (3-5>?"; 

560 H=UflL< IMKEVJ,' : IFH-'3nF:H >5THEI-t560EL3EPPlMT'325C: . h'J 

570 F0RI=IT0H 

580 HU=RHrf;3>:Uy=RMD';s:i 

590 IFBCHU. iW>THEt^530ELSEE';HU. W^--i: tJEXT 

600 FORI=lT07tW:NEKT 

610 G0SUB8410 

620 FRrHT«99."CH00SEi":!FRIHT^163. "1> STOfftt^D SCORE'' ;: F F,inT'i!2ir.. ' 1,- LriLiil 

*!PRINT«291,"35 PLACE BALL GUESS"; 

630 PRINT«355, "4> PEIiOUE BflLL GUESS" ;:PRItJT«4l3- "5") REil-'RRi.: M::" ; : PRINT^ir," 

TS USED:";SC; 

640 PRINT«S03.STPII-lGiC3'l, ■■ "J:PKINT'SS03. "CHOICE' ' ; 

650 Xa-UOLCIMKEV*?: IF;-B< iOKX0>5THEH65OELSEPRINT;<O; :,- JRI iTOZOC; l£, :: 

66© OHX0GOTO 1 000 . 2OO0 , 3090 . 4060 - 5000 

1000 FORI = 1T03:FC1RJ=^1T03: IFG'. 1 ■ -J-THEi^.l^(.H-l : HEXT.T, lELSENEliTJ. I 

1810 IFW>HPRIHT'!S03."TOO MflNS' GUESSES" ;: Ul=e: FORI^lTOrOO: liE:-:T: GOTCilO 

1020 IFU<HPRINT'3S03.. "HCiT ENOLIGH GLASSES" ;: iJ^O: F0RI-lTQ7Cu: NEXT: GOTOoliJ 

1925 GO3U634I0:GI=-1 



Program Listing 1 



copy of Editor/Assembler to 
assemble the source code into 
mactiine language. If you are 
using a 16K machine, assemble 
the code with an origin of 
7B00H (31488 decimal), for 32K 
try BBOOH {-17664 decimal), 
and for 48K try FBOOH ( - 1 280 
decimal). 

If you use a Radio Shack In- 
terface to drive your printer 
then your task is almost over. 
Delete lines 250 through 270 
and lines 2980 through 3600; 
Superlist will automatically use 
t|ie printer routine in Level II. 
You may still wish to use a 
routine that will format your 
copy in pages. The Level II 
driver counts printed lines, but 
does not send a form feed or a 
set of line feeds when a page is 
full. 

I used the Heathkit H-14 
printer with Smalt System Soft- 
ware's popular RS-232 inter- 
face. If you have one of these 
insert their machine language af- 
ter line 2980. At the beginning of 
Superlist, the program will 




NEW ARCADE 
• GAMES * 



Sand lor our citalog tor 1 compl«te ktting of producli, and 
you will be addad to our mailing Hal tor new products aiwe 
gat tnem. We will send out a rewslatlar describing new 
products in detail lo every one on our maillist 

Dungeon Etcap* S14.95/ 19.95 

Our Desl selling combination Adventure and Arcade 
same. A tavorite wJtti & D people. 

Allen Dafandar Disk only S24.9S 

Ouictiest graphics ever seen on a model I or III. You 
conlrol a spaceship stiooting other small ships Very, 
Very quiclt The control you have over the directions 
ana lire control is unsurpassed in any other TRS-80 
game. Uses the disk timer so you must have a disc to 
enjoythisgreat game. Thisgame will set nawslandards 
m TRS-80 games 

Robot Attack $14.95 / 1 9.95 

New game from Big Five You go through a room and 
shoot all Ihe robots 

Scartman $14,95/19.95 

Excellent game from IheCornsoft group. Little critter 
runs around the screen eating the dots. 

Super Meter helps you load in programs. $29.00 

PlMM mckjOa (1 .SO ahlpploamandlne. Sand your aOdraaa, 
spaciticatton*, and chack or motiav order to: 

33iJarlorlt ^areliiiuBe -•433 

1691 Eason • Pontiac, Ml 4eOS4 

(313)673-2224 • (313)673-8700 

NEW GAMES AND PROQHAMS WANTED 



UNCOMMON 



SCREEN ARTIST — turn your screen into a drawing 
board. Create complex screens with simple com- 
mands. Store screens as BASIC statements on tape 
or disk in any of 4 (ormats, inclodinQ ultra fast 
packed strings or lines. Edit the screens you create 
easily. Makes ultra fast graphics a snap Merge 
complelBO screens with your program. A powerful 
tool, great for scfioote. Specify Tape, Dislt, Model 1 
I". t17.00 

DISCOMETER - disk drive tachometer for the 
Model I. Real time, anakig display of rotatkxi speed 
of your drives. Save $ m iSiagnosing disk problems, 
and making simple motor adjustments. S14.00 

DUPLICATOR — copy virtually any tape with ease. 
BASIC, system, or data. Includes verfy feature. 
Uodellonly. (S.OO 

SUBPACKER — pack machine code in BASIC lines 
or strings. Execute them easily from BASIC. Simple 
to use: stunning results Specify Model I, III. 
Tape/ Disk tS.OO 

LANGUAGE ARTS - reading fkiency, cloze 
reading, comprehension drills, tachistoscope. In- 
cludes 4 programs. A complete program tor the 
educator or cotx;erned parent Specify Model fill: 
Tape 'Disk. SBO.OO 

MIGHTY WORD CANNON - educatk^nal driti with a 
fixich o( fun. Create quizzes on any subject. Word 
cannon does the rest. Specify Tape/Disk. $9.00 

Tape vers)ons require 1 6K, Level II 
Disk versions require 32K. 1 drive 

MONEY BACK GUARANTEE 
SEND CHECK/M.O. TO: 

smallsystem 



design 



1,^397 
Box 268, New Hartford, CT 06057 



LET'S MAKE A 
DEAL 

Free Shipping Wiltiin Continental USA 



LDOS 



Complete w/manual & latest updates 
Modiorlll $144.95 



LAZYWRITER 

Mod. I $118.95— Mod III $164.95 



EPSON MX100 

CALL FOR OUR LOW PRICE 



LYNX -Mod 



Includes — Autodial/answer 
cables & software 



$259.95 



MAXI MANAGER 

by Adventure international 
Model l/lll48KDisk $79.95 



Proofreader Mod 1 49.95 Mod III 59.95 

Proofedit Mod I or II I 28.50 

Grammatik Mod I 45.95 Mod III 55.95 

by Soft tools 



SEND FOH YOUR FHEE CATALOG 
No C'edilcardsatlhfiso low prices Add$1 50 onnllCod or- 
ders Cerlified ckiMO/COD shipped immt'dialely Ple,iS[" 
allow 2 weeks (or personal checks Fnr eitr.i List st'ri'ice. 
phrine in your COD nriter Prices siiliiect luClMnqe without 
notice NVS resirlenls [ile.i.se add appropri.ile s.iles lai 
We Otler Greal V.ilues & Prompt Delivery Why Nol T'v Us'> 



MICRO-IMAGES 

146-03 25th Rd, Flushing, NY 11354 

MonFri 10 AM-9 PM (212)445-7124 Sat 10 AM-5PM 
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PROGRAMMING TOOLS FOR YOUR 
TRS-80® MODEL I AND MODEL III 



INSIDE LEVEL II 

The Programmers Guide to the TRS-80 ROMS 

INSIDE LEVEL II is a comprefiefiave reference guide to the Level M ROMs wtMCh allows 
Ihe machir)e language or Basic programmer lo easily utilize the sophisticated routines 
they contain. Conasely explains sel-ups, calling sequences, and variable passage for 
number conversion, arilfimelic operations, and matfiemalical functions, as well as 
keylMjard, tape, arid video routines Part tl presents an entirely new composite program 
structure which loads under the SYSTEM command and executes in bolti Basic and 
machine code with the speed and etttciency ol a compiler. In addition, the t8 chaplers 
include a large body ot olher intormalioo useful to the programmer including tape 
formats, RAM useage, relocation of Basic programs. USR call expansion, creating 
SYSTEM tapes of your own programs, inteftacmg of Basic vanaOles diiectly wilh ma- 
chine code, a method of gieatly increasing Ifie speed at which data elements are stored 
on tape, and special ptecautions for dsk syslems INSIDE LEVEL it is adearty otganized 
refetence manual II is fully typeset and packed with nothing Ixjt useful informalion It 
does not contain questions and answers, ROM dumps, or cartoons. 
Includes updates lor Model III. INSIDE LEVEL II $15.95 

SINGLE STEP THROUGH RAM OR ROM 

STEP80 allows you lo step through any Basic Of machine language program one 
instruction at a lime, and see Ihe address, hexadeamal value, Zilog mnemonic, register 
contents, andslepcount for each instruction. The top 14 linesof Ihe video screen are left 
unaltered so that the target program may perform its display functions unobstructed 
STEPBO will follow program flow right into the ROMs, and is an invaluable aid in learning 
how the ROM routines functton Commands include step (trace), disassemble, run in 
step mode al variable step rate display or alter memory or CPU legislers, (ump lo 
memory location, eicecute a CALL, sel breakpoinis in RAM or ROM, wnte SYSTEM 
lapes, and retocale lo any page in RAM The display may also be routed lo your line 
pnnler through the device conlrol btock so custom pnnt dnvers are automatically sup- 
ported. 
Specify Model I or Model lU. STEPBO S16.9S 

TELECOMMUNICATIONS PROGRAM 

This machine language program may be used as a smart terminal with tima share 
syslemsor (or high speed (iletransfersbelweentwo disk-based micros over modems or 
direct wire. It is menu driven and exlremoly simple to use. Functions include real-lime 
terminal mode, save RAM buffer on disk, transmit disk file, receive t>inary files, examine 
and modify DART paramelers. program B custom log-on messages, automatic 16-bit 
checksum venfication ot accuiale transmission and reception, and many more user 
conveniences. Supports line pnnlers and lowercase characters With this program you 
will no longer need to convert machine language programs to ASCII tor ttansmtssion, and 
you will know immediately i) the transmission was accurate This program comes on a 
formatted disk 
Specify Model I or Model III. TELCOH.....$3g.95 

PROGRAM INDEX VERSION 2.0 

Assemble an alphatielized index ol your enlire program library from disk directones 
Program names and free space are read aulomaticaliy (need not be typed in) and may be 
alphabetized by disk or program The list may also be searched lor any disk, program, or 
extension, disks or programs added or deleted; and the whole list or any pan sent lo the 
pnnter Printer outpul may Be requested in three different formats including labels. The 
lisl itself may also be slored on disk (or future access and update. II also includes a 
PURGE mode lor quickly killing unwanted dies Directory reads and alphabetizing is 
done in machine code loi speed. 1.000 programs may be sorted in less than 10 seconds 
Works wilh TRSDOS, NE WDOS, and h4EWDOS;80 single or double density. One drive 
and 32K required 
Specify Model I or Model III. INDEX S24.9S 

4 SPEED OPTIONS FOR YOUR TRS-80 

The SK-2 dock modificalion allows CPU speeds to be switched between normal, an 
increase o( 50°'o. or a 50"o reduction, selectable at any time without inlefrupling execu- 
tion or crashing the program, instructions are also given for a tOO% increase to 3. 54 MHz. 
The SK-2 may be configured by the user to change speed wilh a toggle switch or on 
software command. II will aulomaticalty return to normal speed any time a disk is active, 
requires no change to Ihe operating system, and has provisions (or adding an LED to 
indicate when the computer is not al normal speed It mounts inside the keyboard unil 
wilh only 4 necessary connections (or the swtlch option (swilcb not included), and is 
easily removed if the computer ever needs sen/ice The SK-2 comes fulty assembled 
with socketed ICs and illuslrated inslruclions 
Model I only, SK-2 U4,95 



INSTANT ASSEMBLER 

The INSTANT ASSEMBLER is a r>ew, powerful tape- tiased assembler anddetxigger tor 
the TRS-80. Now you can assemble directly to memory and immediately debug your 
program with Ihe built m single stepping debugger Quickly switch from assembler to 
debugger and back again without losing the source code. This lealure makes (INSTANT 
ASSEMBLER an excellent learning tool for assembly language programming 
INSTANT ASSEMBLER is absolutely unique among tape based assemblers in that il 
produces relocaiable code modules that can be linked with ihe separate LINKING 
LOADER, which is supphed in two versions (or loading programs into either high or low 
RAM. This lets you buiW long programs wtlh small modules INSTANT ASSEMBLfcR also 
fealures immediale detection ol errors as the source code is entered, a compactly coded 
source lormal that uses l.'3 as much memory asstandardsource.andmany opeialional 
features inciudir>g single siroke entry ol DEFB and DEFW, pinpoint control ol listings, 
alphabetic listing of symtxil lable. separate commands lor ksting eiroi lines or the symbol 
table, block nwve function, and venfication of source tapes. 

INSTANT ASSEMBLER'S detxigger provides single stepping with lull register displays, 
decimal or hen entry of addresses, forward or backward memory <hspl3ys. disassembly 
of object code m memory, memory display in ASCII fcumal, and hex-lo-decimal or 
decimal-io-hex conversion. The si r>gle- stepper will slep one instruction at a lime or at a 
last rate to any defined address 

INSTANT ASSEMBLER occupies less than 8400 byles ol memory. In a I6K machine this 
will leave you enough memory lo write assembly language programs of around 2000 
bytes This and its module -linking feature make INSTANT ASSEMBLER ideal for users 
with only 16K machines The inslnjction manual may f>e purchased separately for $3, 
which will apply towards Ihe purchase of the INSTANT ASSEMBLER 
Specify Model 1 or Model 111, INTASM 129.95 



RAM SPOOLER AND PRINT FORMATTER 

This program is a lull feature pnnt formatting piackage fea!unf>g user defineatJe line and 
page length (with line feeds inserted between words or atlerpuncluation), screen dump, 
pnnter pause conlrol, and baud rale seleclion In addition, printing is done (rom a 4K 
expandable buffer area so that the LPRINT or LLIST command returns control to the user 
while pnnling is being done. Ideal lor Seloctnc or other slow pnnlers. Allows pnniing and 
processing to run concurrently Outpul may be directed to either the parallel port, senal 
port, or the video screen. 
Specify Model I or Model IN. SPOOLER $16.95 

MACHINE CODE FAST FOURIER TRANSFORM 

This complete package includes 3 versions of the machine language FFTASM routine 
assembled forl6, 32, arid 48K rnachines,ast>ort sample Basic program lo access them, 
a lOK Basic program which includes sophisticaled interactive graphing and data manipu- 
lation, and a manual ot instructions and examples. The machine language subroutines 
use vanables defined try a supporting Basic program lo make data entry and retrieval 
extremely fast and easy (or custom implementation They perform 20 lo 40 times (aster 
than their Basic equivalenl (256 points ir 12.5 seconds), and require less than 1550 byles 
of memory. The FFT is useful in analyzing slock market and comodity trends as well as lor 
scientific information. 
Specify Model t or Model III. FFTASM S49-S5 

DUPLICATE SYSTEM TAPES WITH CLONE 

Make duplicate copies o< any tape wntten lor Level II. They may be SYSTEM lapes or 
data lists The file name, kiad address, entry point, and every byte (in ASCII format) are 
displayed on the video screen. Model Mi version allows changing tape speed. 
Specify Model I or Model III- CLONE..... SI S.95 



RAMTEST FOR LEVEL II 

This machine language program is a very thorough test for several types ol RAM errors 
A complete test o( each individual tsit in a 48K machine lakes just '4 seconds. Includes a 
separate test (or power line glitches. 
Model I only. RAMTEST. ...S9.95 

EDIT BASIC PROGRAMS WITH ELECTRIC PENCIL 

Load Basic programs or any other ASCII data file into Ihe disk version ol Eleclnc Pencil 
lor edilting. One command Irom DOS quickly modifies exist»>g files lo Penal tomiat. One 
dsk and 32K required 
Model I only. PENPATCH S9.95 



MUMFORD 

MICRO 

SYSTEMS 



OK[)tiKING: (. ninplyti.' ^dt'i'ilcKlKin is yufltdiili.-'i.-'ti or s full n'tuiul unil W' nudf .Aii proyrami 
lt'>,cepl IfiLCOM) .irt' shippt'd on u^issellf unk'^b ib is inclLulfii ior a torm.itlfd (no sysWm) 
disk Incliidi.' il r>n for po^tiUjt.-' dwd handliiuj Cdlifornid r^'sidftits iidtl (>°o sales tax Visa. 
M.isterchary^ and COD ordel^ .laepttd SPKCIFY MODia. I OR MODtL III. [),Mler 
nKiLimt^i invilt'd 

Box 400-E Summerland. California 93067 (805) 969-4557 



■See LisI ol AOverlisers on page 402 
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change Basic's line printer 
Device Control Block to reflect 
this routine location. In fact, 
once you have run Superiist 
you can continue to use Its 
printer driver routine to LLIST 
and LPRINT. I borrowed the 
RS-232 driver routine used by 
Electric Pencil to drive my H-14 
and modified it to count lines 
and form feed after a full page. 
Pencil's driver is a bit shorter 
than the relocatable code pro- 
vided by Small Systems. 

if you use Radio Shade's 
RS-232 interface to drive your 
serial printer, use the source 
code provided by Radio Shack 
In the t>OQK included with the in- 
terface. 

in each of these cases the 
printer driver can be assembled 
separately if there Is not room 
In the Editor/Assembler buffer 
for the additional text. Use an 



oriflin of 7DB4H. BUFF should 
be after the printer routine, so 
set It In the main source listing 
to the last address of the driver 
plus one byte. Try not to get car- 
ried away writing a long printer 
driver. BUFF should not end up 
above 7EC0H. 

About Baalc RAM 

Before you can understand 
what Superiist is doing, you 
should know the format Basic 
uses to store its programs. This 
task would have been close to 
impossible were it not for Fuller 
Software's "Supermap" Level ii 
ROM documentation. Although 
there seemed to be a few 
crucial things missing from the 
map, Fuller provided most of 
the information I needed. 

The first line of any Basic 
program begins at 42E9H. The 
first two bytes of a line contain 



the starting address of the next 
line (stored by Superiist in 
NXTLIN). This is followed by the 
line number (stored in binary as 
a two-byte unsigned integer) 
then the line of text ending with 
a zero byte. 

The big problem becomes 
decoding the Basic keyword 
tokens. The ASCII for each 
keyword is stored in ROM; aii of 
the keywords are stored back 
to back in a list tieginning at 
1650H. The ASCII keywords are 
stored in the numerical order of 
their tokens, starting with 
token 128. The beginning of 
each keyword is marked by set- 
ting the highest bit (bit seven) in 
the first byte, which is the same 
as adding 126 to the ASCII code 
for the letter, in order to locate 
the ASCII keyword correspond- 
ing to a particular token, the 
program subtracts 128 from the 



token (by zeroing bit seven) and 
uses the remainder to count 
through the table. The count is 
decremented each time a new 
keyword is encountered (a byte 
with bit seven set) until the cor- 
rect keyword is found. 

Fuller referred to this sub- 
routine in Level 11 ROM by say- 
ing "Call Mr. Spock for his 
opinion of this message," so I 
called my decoding routine 
"Spock." I had fun trying to find 
out how to decode the tokens, 
since the format of this table 
was one of the few things Fuller 
left out of "Supermap." 

The surprises came after I 
had a working program to test. 
Basic stores an Else with a 
colon immediately before it. 
This had the desirable effect of 
breaking the line of text at each 
Else. But if the Basic program- 
mer had already put a colon 



le 

28 

3a 
4e 

se 



CL5 
CLfflR 200 

DIM Ni»';32>,B:.':3,3:j.iG»';i6>.G;.<s.3>-fG*-:i6> 

DEFSTR H,Vl 

DCFIHT fl - M.O - X.Z 



Ul - 13360* 
SC - 01 
Irt - l: 

u » a 

35 FOR I " 1 TO 8: 
FOR J - 1 TO 31 
B<I, J> = 0: 
G<I.J> - 0: 
HEXT J, I 



8e 



85 
90 



93 



1 TO ZZ 
RIGHT* 



1 TO 7: 

STKIHGl 



8 TO 16: 
STRINGS 



1 TO 3! 
STRJ (I>! 



9 TO 

CHR» 



le: 

i5b 



lie 



"BLACK BOX klERSIOh' 
"B",' MORRIS JOHES": 



60 FOR I - 

HKI) = 

hOJT 

70 FOR I = 

H2<I> = 

^tXT I 

FOR I - 

MZ<I> - 

ho:T 

FOR I - 
H5<I> =• 
>CXT I 
FOR I " 
HZ'.l) ^ 
ft XT 

IF C THEN 

CLS I 

PRINT I 

PRINT 

PRINT 

PRINT I 

PRIHT "DO VOU NEED 

V =■ IhTEV* : 

IF V = ■■" THEN 9Z 

lea PRINT vit 

FOR I = 1 TO 200: 
ftxT ; 

IF V - "V T^tt4 c 
GOTO 3000: 
ELSE IF V < > -U 
GOTO 95 
110 C ' 0: 
CLS 

see FOR uu 

FOR h«J 

D - UI 

POKE 0. 143: 

POCE * 1.145: 

ItXT HJ,UU 
310 FOR I = 1 TO 8! 

PRIHT •tS ♦ 3 ♦ 

tCXT 
S2e FOR I - 9 TO 161 

PRIHT CtSe * 64 



TRt .;r,.2. 



2. CHF:* CiSl » !>; 



CHRj :6? * :>i: 



n 



:.0"i 



INSTRUCTICirJS- 



- l: 



PKUn CHR» vMij; 



1 TO 3! 
1 TO 8 = 
65 ♦ 64 



I^NKDii 



(I - 9>.HUI)Ji 



- 17J',N1<IJ J! 



NEJ<T 
33e FOR I = 17 TO 24! 

PRINT «b&3 - 3 * CI 

HEXT 
548 FOR I - 23 TO 32: 

PRIHT tST? - t>4 » '.1 - 23J-NHa>;l 

NEXT 
SSe PRINT «99- "CHOOSE: ■■;! 

PRINT «i63."[€GfteE OF DIFFICULTY, " ;: 

PRINT *22r. "NUI-eER OF BOLLS ';5-3>^"; 
360 H ^ Uft ., INKEY* ■: 

IF H ^ 3 UK H 3 WEN Z6C.- 

ELSE PRIHT -iir-e-n: 

570 FOR I ^ 1 TO H 
530 HU = RND 'ISi: 

UU - RNC ^Si 
390 IF B<m.l.W, THEM r.gp: 

ELSE B<.H>.'.yK'-' ' - l: 

NEXT 
600 FC« I = 1 TO rPO: 

NEXT 



610 


GCrsue e-iio 


620 


PRINT *39. "CHCOSE:-;: 




PRINT «lt.3."l> STOP «» 3C0!^";: 




PRINT «227,"I1 LftUICH RflV";: 




PRINT 'tZ3l."Z- PLRCE EflLL GUESS"; 


630 


PRINT •*;^3."-4) PEIluME BRLL GUESS**;: 




PRINT ■tM.Z'.-^<> REC'FAW BO;;";! 




PRINT 'STr:-.. "POINTS use:>:":5C; 


640 


PRINT »SOT. 3TR1I-IG» >:Z-: ■ " ">: 




PRINT *30T. "CHOICE""; 


6se 


X0 ^ kiRL ■. ii*:ev» :■: 




IF X0 < 1 OP ;:0 > 5 ThEU 6-0: 




ELSE PRINT ^B;l 




FOR I :^ 1 TO 280 : 




MFXT 


660 


OH X0 GOTO 1 000. 20C10, :::etX5. -1000.^.000 


1000 


FOR I = I TO S: 




FOR J - I TO S: 




IF G<I-J) THEN 1,1 -^ ij -r J: 




tCXT J. n 




ELSE l-CXT J, I 


1010 


IF U ; H PRINT «e03.'T00 MFtfJY liJESS£5";: 




y = 0: 




FOR I ^ I TO 730! 




NEXT ; 




GOTO 610 


1020 


IF U < H PRINT ■»803. "HOT eWXX»1 GUESSES":: 




u - e: 




FOR I = 1 TO 700: 




NEXT : 




GOTO 610 


1025 


GOSue 8410: 




GI = - 1 



35 BASIC LINES IH PROGRnM 
112 BRSIC STflTEMEMTS IN PROGRRM 
1348 BSTES USED BV PROGRRM TEXT 
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SAVE 
$$$ 



TRS-80 

MICROCOMPUTERS 

CALLUS... 
SAVE MONEY 



SAVE 
$$$ 




Model II 

64K 

$3325.00 

Full 3 

Month 

Warranty 



CALL COLLECT: 
512-689-5536 
Master Electronics, Inc. -^ 

154 N. 5th, Raymondville, Tx. 78580 




Form F48 Provided 
Standard Warranty On Merchandise 




Authorized TRS-80 Dealer, Store #F-723 



By Charles Butler 

Take on the formidable "Liberty Links" golf course by 
yourself or with a friend. The course changes each time 
you play, offering 18 holes in a mixture of straight and 
dogleg configurations. They range from three to five par 
and are replete with trees, water hazards, sand traps, 
and out of bounds areas. 

You judge the distance, choose your club from the full set 
provided, and indicate the direction you wish the ball to 
go. But watch out for the breeze or a poor hit - it can 
play havoc with your shot! Just like in real golf, it takes 
practice to hit a sub par round. Available on tape for 
TRS-BO* models I C III with a minimum of 16K RAM. Order 
now for only $13.95. 

MAIL ORDERS: Include K 00 sh^jping S handlif>g (D C residenls aOd e-Vo sales las). 
CHARGE CARD CUSTOMERS: Call (202) S44-GG74 lor lastesl service 



THE LIBERTY SOFTWARE C9 

635 Independence Avenue, S.E. 
Washington, D.C. 20003 

(202) 544-6674 '^ «' 



'S»* List of Aav»rlis9ri on pag« 402 



r 




BASIC Is ^ not nearly a» slow 
as most programmers think. 

BASIC Faster and Better shows you how to 
supercharge your BASIC with 300 pages of 
fast, functions and 
subroutines. 

You won't find any trivial poorly designed 
'check-book balancing' programs in this 
book - it's packed with useful programs. 

Tutorial for the beginner, instructive for 
the advanced, and invaluable for the pro- 
fessional, this book doesn't just talk. . . it 
shows how! All routines are also available on 
disk, so that you can save hours of 
keyboarding and debugging. 

The # I disk BFBDEM contains all the 
demonstration programs, and # 2 BFBLIB has 
all the library functions. 

BASIC Faster & Better is $29.95. and the two 
program disks are $19.95 each. 
Get the book and/or disks from your local 
IJG dealer and B. Dalton bookstores. 




1260 W. Foothill Blvd. 
Upland. California 91786 

(714) 946-5805 
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before the Else I ended up with 
double colons, and a blank line 
of text. When Basic does a list 
to video, It suppresses the 
colon preceding an Else. I de- 
cided that was desirable, so 
Superlist looks only for the 
case of double colons and 
skips over one of them, so you 
won't produce a blank line. Let 
It be known you need never put 



a colon before an Else. Basic 
will do It for you, and you will 
never see it unless you use 
Superlist. 

The other surprise was the 
way Basic stores remark lines. 
An apostrophe is interchange- 
able with a REM statement, but 
Basic does not store them the 
same way. If you put the key- 
word REM in a line, Basic will 



store REM as a one byte token. 
But if you put an apostrophe in 
a line Basic first stores a colon, 
then a REM token, then the 
apostrophe token. What looks 
like a one byte apostrophe 
actually takes three bytes of 
memory to store. 

Superlist will look for an 
apostrophe token each time it 
encounters a REM token and 









Program Listing 3 








eeiae 


ISOJRCE FILE FOR SUPERLIST. 


nEnSIZE-31487 '31488 






00110 


ICOPVRIOfT nORRIS JONES MFtV 


14, 1980 


TBee 




00120 


ORC 


TBOOH 




7B00 


ED73FE7F 


00130 


LD 


<7FFEH).SP 


isnuE SP 


7B»< 


SIFETT 


00140 


LD 


SP.7FFEH 


;heu strck 


TBe? 


0O21PO7D 


00130 


LD 


IX, LINES 


JIMDEX TO IXERR UPftS 


Tsee 


fF 


00160 


XO(t 


R 




TBBC 


DOTTOe 


eeiTs 


LD 


(IK>,R 


iCL-EPK LINES 


TBOF 


»77«1 


eeiee 


LD 


cix+u,n 




7B12 


D077e2 


00190 


LD 


<IX*2>,H 


J CLEW STrWTS 


7B15 


007793 


00200 


LO 


<IX+3>,H 




7B18 


D077W 


e021B 


LD 


<]X'*4>.n 


JCLEflR QUOTES 


TBie 


007783 


00220 


LD 


C IX+3> , fl 


ICLEPn OUITFL 


TBIE 


007706 


ee230 


LO 


< ix+«) , n 


JCLEflR CHHRS 


7B2i 


D0212S4e 


00240 


LD 


IX.4023H 


IPRINTER DCB 


7B2S 


21B47D 


00230 


LD 


rt.. PRINTS 


lusE eseoH for 


7«2e 


DCTSet 


00260 


LD 


<IX*1).L 


J SflSlC'S PRINTER 


7B2B 


007402 


00270 


LO 


<IX4'2>,H 


t DRIIJER. 


7B2E 


00360336 


00260 


LO 


<IX+3).34 


>« OF LINES 


7B32 


00360400 


00290 


LO 


<IX*4).e 


JLIHE COUNTER 


7B36 


FD21E942 


00308 


LD 


IV,42e9H 


UNIT BR5IC POINTER 


TBSn 


FD22f«70 


00510 


LD 


CI«TLIH),IV 


JSTBRTIMG POINT 


7B3E 


FI>2fl(*7C 


00320 


5TFWT2 LD 


IV,<»fTLIN> 


>NEW LINE STRRT 


7642 


D021197E 


00330 


LD 


IX, BUFF 


(IHIT OUTPUT BUFFER 


7B46 


Fc>4cee 


00340 


LO 


C, <!V> 


IMEXT LIIC LSB 


7B49 


FD23 


00330 


IHC 


IV 




7B4e 


FD4«0e 


00360 


LD 


B.<IV> 


jMEXT Lire NS8 


7B4e 


FD23 


00370 


INC 


IV 





skip past the REM If there is an 
apostrophe. 

If you wish for Superlist to 
suppress these Basic extras In 
the same fashion an ordinary 
list does, see the modifications 
below. 
Superlist Routines 

The only way to tackle any 
large programming problem Is 
to break it down into a group of 
smaller problems. Superlist 
was written in this "block" 
fashion. Here are descriptions 
of the routines used by Super- 
list (keep the source listing 
handy as you read these): 

• From the beginning to 
Start2 the program initializes 
the memory and variable space 
it will be using. Superlist can be 
left in high memory and used 
over and over. Each time it is 
restarted it must clear the 
various flags and counters, 
which is done by lines 150 
through 230. Lines 240 through 
290 initialize Basic's line 
printer Device Control Block at 
4025 H. 

Start2 is the starting point 



SAY MERRY CHRISTMAS 



with 




microcomputing 



Give all your friends who 6Wh a TRS-80* the best possible Christmas present— 
80 Microcomputing. 80 Microcomputing is the oniy journai devoted to the TRS-80* 
and its users. . .the only journal paci<ed with reviews, programs, applications and hun- 
dreds of dollars worth of software. 80 Microcomputing — the best idea for Christmas 
yet, for only $25.00 a year. 

Bill: LJMe ::mc iivisa ::ae 

Card n_ ^ , Expire Date 

Signature Interbank # 

" , ' My Name _____^ 

; .' ^.J ^ ■ Address ^ 

"■" *7*-', /~ ~ City ^ ^ State Zip 



Please enter a one year gift subscription to: 

Name_ ^ 

Address .^ 

City _^^ 



State 



_Zip_ 



■ Tradamirii Tandy Corp. 



Canadian $27/1 year only, US funds. Foreign $35/1 year only, US funds. 
All Christmas Gift Subscriptions will begin with the January 1981 Issue. 

80 Microcomputing • PC Box 981 • Farmingdaie NY 11737 6iab8 
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Ptogram conhnued 












TBSe 73 


90368 




LXi 


n,B 


;T0 TEST 


TBSl Bl 


88398 




OR 


c 


:FOR ZERO. €ftl OF FILE 


7B52 cneeTD 


08488 




JP 


Z.OUIT 


iOUIT IF SO 


7835 EI>43re7t> 


80410 




LD 


ClC<rLIN>,BC 


js«je if hot 


7899 FXi6Eee 


aO420 




LO 


L.CIV) 


:L0W BVTE LIhE ■ 


7W3C FD23 


88430 




INC 


IV 




/BSE FD66ee 


80440 




LD 


M. < W/ 


JMI04 BVTE Lift • 


TBfcl r023 


80450 




IHC 


IV 




7B63 flF 


88468 




ItOR 


H 


iCLEflR OCCmJLRTOt 


7BS4 111027 


0»470 




LO 


Ce. 18888 


:FI|:sr DIUISOR 


7B67 CDCXTTB 


80488 




cn.L 


SUBJK 


iLERUES DIGIT IH R 


TBen iiE8e3 


80498 




LD 


DC. 1888 


;TMOUSfi«»S DIGIT 


7S60 CO0C7B 


80300 




C«_L 


SueTR 




TBTS 1 16400 


80310 




LD 


DE. 188 


iHUrOREDS DIGIT 


7873 CCDC7S 


08320 




C«-L 


SLCTR 




7876 1 lanee 


88538 




LO 


DC. IB 


;TEMS DIGIT 


7879 C00C7B 


88540 




Cft-L 


aJBTR 




7B7C 70 


80330 




LD 


R.L 


JOHES OIGIT IS LEFT 


7B7D C65a 


08360 




ROO 


H.30H 




7B7F 007780 


80970 




LO 


iix>.n 




7662 D02S 


80980 




INC 


IX 




7e&4 3E20 


00990 




LD 


B.2SH 


iSPftCC RFTER LIKE ■ 


7BBS DD7700 


80680 




LD 


(ix>.n 


(SflUe IT 


7889 D02Z 


88618 




INC 


IX 




7B8B FDTEee 


88628 


H2 


LO 


R, <IVj 


;G£T NEXT CMRR 


7B8E FD23 


88638 




INC 


IV 


tlUC BRSIC PHTR 


7898 CB7F 


88648 




BIT 


7.n 


JCHECK HIGH BIT 


7892 283S 


08698 




JB 


Z.R3 


JGO IF NOT 


7B9« FE93 


0O66O 




CP 


93H 


JCHECK FOR REM 


7896 2aiC 


80678 




JR 


I^.R13 


JHO.GO TO ELSE OECK . 


7898 FDTEee 


88688 




LD 


R,CIV> 


JLOCK AT htXT FOR ' 


7B9B FEFB 


08698 




CP 


SFBH 


JHHUSTROPtE TOKEM 


7890 2ees 


08780 




JR 


Z-R14 


iVES. GO TO 1 OECK 


7B9F F07EFF 


00710 




LO 


B.C1V-1> 


INO. GET BACK REM 


mtU 1820 


08720 




JR 


ni3 


IGO TO SPOCX 


7BB4 FD23 


88738 


H14 


INC 


IV 


ISXIP PnST REM IF 


TBHft FD7EFC 


00740 




LO 


B.CIV-4> 


iLOO*: SnCK FOR 1 


7Bft9 FE3H 


oorso 




CP 


3f« 


JIN CnSE OF 2 CCLONS 


•Wtt 2802 


00768 




JB 


K;.ni6 




78H> C02B 


88778 




OCC 


IM 


lURITE OUER IT 


78WF FD7EFF 


88788 


ni6 


LD 


fl.<IV-l) 


;aET oncK rpostrofvc 


7882 1810 


0O790 




JR 


nis 


iGO TO ^iXX 


7BB4 FE9S 


08880 


OlS 


CP 


93H 


ICJCCK fCft ELSE' 


7SB6 28eC 


eeeie 




JR 


HZ.H13 




7888 FD7EFD 


88820 




LO 


B, <IV-3> 


JCOOK FOR ' ! ! - 


/UUb FE3n 


00830 




CP 


3RH 




7880 2«02 


88848 




JR 


te,H17 




7BBF 0028 


88830 




occ 


IX 


iVES, WRITE OUCR SCCXVC I 


78C1 FD7EFF 


eeooo 


ni7 


LD 


fl.(IV-li 


iOET BflCX 'ELSE' TO»<EN 


78C4 COFBTB 


08878 


R13 


Crt-L 


SPOCK 


;IHTERPfiET IF BIT7 3T 


78C7 18C2 


00888 




JR 


H2 




7BC9 87 


88898 


H3 


OR 


n 


JTEST FOR ZERO 


7BCn 2989 


08900 




JR 


NZ.PM 


JGO FORURRD 


7BCC D07700 


00910 




LD 


i;ix).n 


JS«Je THE ZERO 


7BCF C0367C 


08928 




CflLL 


PRIMTl 


iPRlrTT TVE LINE 


7BD2 C33E7B 


08930 




JP 


STnRT2 


jtrucx oh 


7B03 DOVTOa 


08948 


H4 


LD 


CIXl.H 


SJUrf tERE IF 


7808 D023 


88958 




INC 


IX 


; OROINRRV R5CII 


780f) lanF 


88960 

88970 


I 


JR 


R2 


;GEr rnotmer un 


7BOC PF 


00980 


SUBTR 


XOR 


R 


iCLERfi B 


7800 EB52 


08990 


01 


SBC 


H..tX 


iSijOTRfCT DE 


TBDf^ FPE37B 


01008 




JP 


M.CI 


JJLrF IF lEGHTIUC 


7HE2 3C 


01818 




INC 


R 


JCOJNT if POSIT I LC 


78E3 iaF8 


81820 




JR 


BI 




TBCS B7 


81838 


CI 


OR 


R 


JTO RESET CPfWV FLRO 


78E6 ED3R 


01048 




fOC 


n-.De. 


IfCiO T>E 0IUI5CR BRCK 


TBES C630 


01030 




flOO 


R.zen 


ICOt«JGRT TO RSCII 


/BEft 007788 


81068 




LO 


cix>.n 




7BED D023 


01070 




IHC 


IX 


JSf«« CHRR 


7BCF C9 


01888 
81898 




H£T 




;CCM-n Tt«OUGH 



7BFO 
7HF1 
7BF4 
7BF6 
7BF0 
7BF« 
7BFC 
7BFE 
7C81 
7C83 
7C84 
7Ca6 
7C07 
7C88 
7Cfle 
7C8C 
TCaE 
TCOF 
TCll 
7C13 
7C14 
7C16 
7C19 
7C1B 
7C1C 
7C10 
7C1F 
7C21 
7C24 
7t:26 
7C28 
7caB 
7C2D 
7C2E 
7C36 
7C33 
7C33 

7C36 
7C3B 
7C3E 
7C3F 
7C43 
7C47 
7C48 
7C4C 
7C4F 
7C32 



F5 

DD7EFF 

FE20 

2008 

FE3fi 

2887 

3E20 

D0770e 

D023 

Fl 

E67F 

47 

04 

215816 

7E 

C87F 

23 

2eFR 

lOFS 

28 

E67F 

DO7708 

D023 

23 

7E 

CS7F 

2807 

D077ee 

0023 

18F3 

FO7E80 

FE20 

C8 

3C20 

007700 

D023 

C9 



0021 197E 

EDSBfOTD 

13 

E0S3fV>7D 

ED5BRF7D 

13 

ED93flF7D 

C0OF7C 

[XMIEOO 

0023 



01108 
81118 

euro 

81138 
81140 
01130 
01168 
01178 
OllOO 
01190 
01288 
81218 
01228 
01238 
01 248 
01230 
01260 
81278 
81288 
91298 
01300 
81318 
81320 
01330 
01348 
01390 
0136A 
81378 
81580 
01390 
81488 
01418 
81428 
81438 
01440 
81458 
014«O 
81478 
01400 
01490 
01908 
81918 
81928 
01530 
01540 
81558 
81560 
01970 



CP 
JR 
CP 
JR 
LD 
LO 

im: 

POP 

f*o 

LD 

INC 

LO 

LD 

BIT 

INC 

JR 

DJNZ 

DEC 

1*0 

LD 

INC 

INC 

LD 

BIT 

JR 



INC 
JR 



INC 
RET 

LO 

LD 

INC 

LD 

LD 

INC 

LO 

CflLL 

LD 

INC 



PF 

n. <ix-i> 

20H 

Z.3P1 

3fV 

Z.SPl 

R.2eM 

<IX> ,H 

IX 

RF 

7FH 

e.R 

B 

H^, 1690H 

fl. CHL) 

7.R 

►*. 

Z.SP2 

5P2 

H. 

?fH 

CIXJ.R 

IX 

>4. 

n, (n.) 

7.R 
NZ.SP4 

(ix>,n 

IX 
SP3 

n. civ> 

20H 

z 

R.28M 

<IX>,B 

IX 



IX. CUFF 
DE. (LINES> 
DC 

<Litcs>.oe 

Oe. CSThWTS> 

DE 

CSTMKTS>.Dt 

IhCEKT 

C.<IX) 



JS«L« COOED CMRR 
ILOO: e«CK BM> SEE 
IIF ITS B SPRCE 
HF IT IS FORGET IT 
»0R IF IT 5 n COLON 

jforget it, too 
jbut if it ISNT 
i put one ther 

IGEI OnCK TOKEN 
JURSTE TtE HIGH BIT 
ir*»:ES IT fl COUNTER 

ITBGLE START 
)GET R SflMPLE 
ICHECK THE HIGH BIT 
inOkJC F»EnO RNVURV 
INO GOOD, GET n«TkE:R 
lOEC COUNTER IF IT IS 
lUE FOLMD IT ' 
JRHD IT'S IN B 
iSTCBE THE SUCKER 

JLOOC flT T>C 
J NEXT OfrE 
JhEW WORD-' 
»VES. QUIT 
jMO, SRUC IT 

;G0 LOCK RGRIN 

J LOOK RT tEXT CHRR 

i FOR R SPnCE 

jouit if it is 

jELSE 

iPUT OC IN 

JSPLIT 

J RESET BUFFER PNTR 

;aET LI»E COXTER 

JROO OtE 

;SnUE IT 

;GET STRTEMENTS COUHT 

tnoo o»E 
JSfiL€ IT 

ISET LEFT MRRGIH 
JGET FIRST CHflftfiCTER 
JPOINT TO NEXT 



Program conlmues 



for each new line of Basic text 
read by Superlist. It begins by 
reading the address of the next 
line of program and storing it. 
Then it reads the two-byte line 
number. Converting this 
number into decimal digits is a 
matter of dividing the line 
number by 10000 to get the first 
digit, dividing the remainder by 
1000 tor the next digit and so 
on. The tine number is stored in 
HL, the divisor in DE. Upon 
returning from SUBTR (de- 
scribed below) the ASCII digit 
has been stored in the output 
buffer, and the remainder is left 
in HL. 

Each character of the Basic 
line is then put through a series 
of tests in lines 620 through 
960. If bit seven of the character 
is set, then it is a Basic token. If 
not. It Is merely placed in the 
output buffer as an ASCII char- 
acter. A zero byte indicates the 
end of a line, and the program 
calls Printl to print the buffer 
and goes back to Start2 to set 
the next line. If the character is 
a Basic token, it is tested to see 
if it is an Else or a REM. In the 
case of an Else, it checks to see 
if It was preceded by two 
colons and deletes one from 
the listing. If the token is a REM 
followed by an apostrophe, It 
deletes the REM. The program 
also looks for two colons pre- 
ceding the REM and deletes 
one of those. After testing, the 
token is sent to Spock for 
decoding. 

• SUBTR is the division 
routine for the line numtwr. DE 
contains the divisor and HL the 
dividend. Each time DE can be 
subtracted from HL with a 
positive result, register A is in- 
cremented. When the subtrac- 
tion produces a negative result, 
DE Is added back to HL. 
Register A then contains the 
quotient and HL the remainder. 
Adding 30H to A converts it into 
an ASCII digit which is then 
stored in the output buffer. 

Upon encountering a Basic 
token, the program calls Spock. 
One of the aims of Superlist is 
to spread out the compacted 
lines. Spock does this by check- 
ing for a space before and after 
the keyword and putting In 
spaces if they don't exist. To 
decode the token, the high bit is 
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set to zero by ANDing the A 
register with 7FH. The number 
remaining Is how tar down the 
table you must look to find the 
keyword. (For instance, after 
zeroing bit seven, if 34 is left, the 
word is 34th in the list.) 

• F^lntt Is called after a com- 
plete line of Basic has been in- 
terpreted, spread out and 
stored In the output buffer. 
First the counters for lines and 
statements are incremented, 
then the program looks at the 
first characters of the line 
numt>er. In order to prevent 
leading zeros from being 
printed, the routine substitutes 
a space for a zero until a non- 
zero character is encountered. 

Printi also looks for colons 
and If It encounters one, in- 
crements the statement 
counter, prints a carriage 
return and indents six spaces. 
However, if the colon Is en- 
closed in quotation marks as 
part of a string constant, we do 
not wish to split the line. 
Quotes Is a flag set when the 
routine encounters a quotation 
mark. If Quotes is set, the colon 
check is skipped and reset if 
Printi encounters a zero byte 
signifying the end of the line. 

Subroutines 

The program drops Into four 
levels of subroutines before 
printing a character. 

■The main routine calls 
Printi when the output buffer Is 
ready to be printed. Printi calls 
Prlnt2 each time a character Is 
ready to be printed. 

•Print2 counts the char- 
acters to provide a right margin 
twfore finally calling Print, if a 
line Is full, Print2 sends a car- 
riage return and Indents 11 
spaces before continuing. If 
the character sent to Prlnt2 is a 
carriage return, Print2 resets 
the character counter. 

•Indent is optional. It merely 
prints eight spaces to provide a 
left margin. 

•Print begins by checking to 
see if you are pressing Break 
and jumps to Quit If you are. 
Print Is written as if the location 
of the printer routine Is un- 
known. Index register IX Is 
loaded with the start address of 
Basic's line printer Device Con- 
trol Block which contains the 



program continual 
7C34 
7C3g 

7C3» 
7C3B 

rex 

7CU 

rou 

TCftS 
?C«6 
7CM 

7c«n 

7UO 

TOE 
7C71 
7X74 
7CT3 
7C76 

Tcn 

7C7C 
7C7D 
TCTF 

rem 
rcta 
Teas 
rem 
rc&9 

7C«C 
7C« 
7t92 
TCW 
7C«7 

rem 

7C9C 

7C5F 
7Cft2 
TOM 

7Cfn 

TOW 



79 



CMD7C 

ISEF 

DCMEBS 

CD23 
79 

FtZ2 
3M7 

3HBI7D 

3F 

33B17D 

3nai7D 



FEW 

2il2 
B7 



33Bt7D 

eEH> 

CXM>7C 

C» 

CW07C 

iao2 

OSBfiFTD 
13 

EDOSflFTO 
COflOTC 

Kao 

CDfDTC 
CICF7C 

ee2e 

CDfOTC 

leFB 
ise3 



eisaa 

ais9a 
ai«ae 

B161B 
B162fl 

ai64e R6 
aifrsa 

ai67a ni2 

aifiae 

aiAW 

aiTBB 
81718 
BI728 ns 

aim 

81748 
81738 
81 7M 
81778 
B17ea R7 

aiTw 
aisee 
ai8i0 

81828 
81838 
81940 

aiBse RIB 
BiB&a 
aiBTa ne 
aieoe 

81898 

aiMa 
81 91 a 

81938 

81930 

ai94a 

81908 
819Ca R9 
81978 



rem 79 

reWE FCBD 

rem 2*23 
7Ca2 imsTD 
raa X 

7Ca» 3aB37D 
Teas FE41 

7caB aaiE 
Tcao cs 



81* 



aaata 

82028 
82030 
8 20 48 

•2090 



82870 



Tcca 

7CC3 
TCCt 

7CC8 
7CC8 
7CCO 
7IXF 
70)2 
7C04 
7CW 
7C07 
TOW 

Tvoe 
7rae 



C0EB7C 
C0OF7C 



K2e 

CXCBTC 
IVB 
CI 
IBM 

BF 

32B37I> 
COCBTC 
C9 



TtDF C3 
7Cg0 MB 
7CS3 K20 
7CE4 CCCB7C 
7tX7 laFB 
7CC9 CI 
7CW C9 



82090 

82180 

B2110 

B2120 

B2130 

82140 

82130 

82160 P3 

B217B 

B21B0 

aii98 

82200 PI 
•2210 
82228 P2 
82230 
02240 I 
82290 lt€/€m 
022U 
82278 
82200 IM>1 



7t:xb 

7CEC 
7C£E 

7cyi 

7CT3 
7CFS 
7CF9 

ygc 

7CTD 



7C«4 
71907 



E5 
DDES 

214038 

cao* 

2023 

»212»40 

210470 

ES 

DCMESl 

DO«««2 

K9 

Doei 

El 

C9 



7D08 3nB27D 
TDM* 87 



8231B 

B3320 J 

82S30 PftlhlT 

•2340 

82330 

82360 

02370 

02300 

82390 

82400 

•3410 

02420 

•2430 

02440 PltTRrT 

82490 

824«0 

•247a J 

•2400 QUIT 

•2490 



LD 

CP 

JR 

LD 

Cftl_ 

JR 

LD 

INC 

Lt> 

CP 

JR 

LD 

CPL 



m 

JR 



}ffiR 

LD 

LD 

cn.L 

RET 

0«.L 

JR 

LD 

IMC 

LD 

CflLL 



CM_L 

C«-L 

LD 

LD 

CALL 

DJM2 

JR 



PRINTS LD 



71>1S 

7D13 
7DI5 
71>1* 
7D1C 
701F 
7D23 
TOZT 
7D2B 
TOaF 
7D31 
7DS2 
7D35 
7D36 
7tl38 
7D3B 
71>3i 
7D42 
7D44 
7D47 



CC gB7C 
ED7BFC7F 



'7D 
ED43S17D 
ED4UI /l> 
E[>43«C7D 
FOES 
El 

11E942 
87 
EDS2 
2»C7I> 
8I4«7D 
ED43nB7D 
3EFF 
32B27P 
C33E7B 



•2310 

•2330 

02330 

•2S4a 

02350 02 

823«0 

02S7O Ol 



TtHfl 4F7D 

7MC oeae 

7t>4c ae 

7D4F M7t> 

rtai aaao 

7T>93 42 



02600 
82618 
O2620 
82630 

82640 
•2630 

•2660 
0267O 
•2600 
02690 
•270a 
82710 
0272O ) 
•2730 Ml 
•2740 MIR 
82730 
02760 K2 
8277a r12H 
82700 



CP 
JR 

LD 
IHC 

LO 
CP 
JK 

PUSH 

LD 

CflLL 

CHLL 

LD 

LD 

LO 

LD 

CHL 

OJNZ 

POP 

JR 

MX 

LD 

caj_ 

RET 

PUSH 

LO 

l_D 

CRLL 

DJN2 

POP 

RET 

PUSH 

PUSH 

LD 

BIT 

JR 

LD 

LD 

PUSH 

LD 

LD 

JP 

POP 

POP 

RET 



LO 

OR 

JR 

LD 

H> 

LD 

CALL 

LD 

JP 

LD 

ID 

LD 

LD 

PUSH 

POP 

LD 

OR 

sac 



LD 
LO 
U> 
LD 
JP 

DCFU 
DEFW 
DEFS 

DEFy 
DEFW 
OEF« 



B,C 

SiH 

NZ.ni2 

C.2BH 

PRINTS 

nil 

C,<IK) 
IX 
H,C 
23H 

fl. (QUOTES) 

caLJDTES>.R 
n.COUOTES) 

n 

R.C 
3RH 

z.ne 



(«joTEs>.n 

CBDH 
PRIMT2 

PRINT2 

R6 

DC. CSTT9VTS) 

DC 

<STI9fTS>,0e 

PRIMT2 

CBDH 

PR1MT3 

IK>EHT 

B,6 

C.PBH 

PRINT2 

R9 

R6 

H,C 
BDM 
Z.Pl 

R. CCHflRSJ 
R 

<CHRRS),R 
65 

te.p2 

BC 

C.0OH 

PBIMT 

irOEHT 

R,12 

B. 11 

C.2flH 

PRIMT 

P3 

BC 

PI 

n 

(CHPRS>.R 
PRINT 



BC 
B,8 

C.yen 

PRIMT 

IfOl 

BC 



IX 
V<.:384»4 

2, t»4_] 

»ca2 

IX.4023H 

H_,PRTRET 

«. 

L,<IX*I> 

H,<IK*2) 

IX 



R.COUITFLl 

H 

Z.Ol 

n.e 
(ouiTTL>,n 

C.12 

PRINT 

g* . ( 7FFEH> 

72^ 

BC.<LI»C5> 
(rt2R5.BC 
BC. tSTI»fTS> 
CH3Ri.BC 

IV 

De,42E9H 

n 

^.DE 

(H4n>,M„ 

BC.Hl 

(^«THN).BC 

H.OFFM 

<auiTFi_),n 

5TnRT2 
R2 

a 
e 

a 



jtest for rscm zero 
joutput Lihc IF o; 

ISEM> R SPnCE IF HOT 

IGO GET rCXT OC 
IGET FIRST CURB 
IPOIMT TO ►CXT (»t 
»T0 TEST IT 
: FOR QUOTES 
INO. GO fVCW 
IVES. 

;CHRNCX nc flfc 

tUELL IT LRSN T TXRE 
J IF UE JlrVED hERE 
lOEJ BRCK CHRR 
J IF FLRG SKIP CO(_OH TEST 
1C»CCK FOR CQLCM 
IVCS. GO FORURRD 
IMO. TEST FCR ZERO 
JNO. JUrP TO PRIMT 

iCLERR QUOTES FLHG 
JVES. SEND 
) H CRLF 

*PRJHT THE CMflR IFOe 

iGET nORE OWWCTERS 
J«RE IF COLON 

}nOD nc TO 

1 STRTEfCMT COLWIER 
IPRIMT TVt COLON 

if*« soc 

jR CRLF 

;SET LEFT rVKGIH 

jcoikt six 

I SPfiCES 

if»C> SE^O 
I ERCH OC 

iGET PURE CHRRS 

iROUTItt TO COUJI CHPR5 

J TEST FOR CS 

jGO CLERR flM5 SE«> 

iGET CHRR COJKTER 

JRDO a»c 

ISFUE it 

165 IS FULL LIME 

iPftlHT IT IF MOT 65 '.IT 

lS(*JE T>C CHRR 

ILOFD n CR 

JRND SEM) IT 

JLEFT HRRGIH 

I RESET OVWS 

J TO IW>EMTED U«_UE 

>FC« ELELtN SPOCES 

JSPnCE RSCIl 

JPRIh^T n SPWCE 

JELEiJCN TI^CS 

IGET BRCX CHRR 

JOO print IT 

ICLEPR CHRRS 



JBflCK TO PRINTI 



JlKJtKT FOR LEFT MRRGIN 
ISPRCE 



ILOCK RT BRERK "CEY 

JQUIT IF PRESSED 
IPRIHTFR DCe GOES IN IX 

JPUSH RETURN RCORESS 
>UE DO THIS SINCE 

I iJE CflN'T CRLLC«.> 

iRETLRH ^mE f*€3 GET 
i BRCK REGS 



iGET FLAG 

I TEST IT 

ilF IT'S MOT aT GO UP 

ICLERR IT IF IT 15 

IFOnrt FEED 

; RESTORE STROC 

inO GO BRCK TO BR5IC 

(PUT LIfCS 

UN rCSSRGE 

(PUT STRTEttNTS 
UN rCSSRCZ 

tEMD OF BRSIC 
JIMTO «. 
jSTPRT of BRSIC 
JCI.ERR CRRRV 
IGET T>« difference 
IPUT IH rCSSRGE 
IGET LII« ADDRESS 
IRHD PUT IH hWTLIN 
JTO set QUIT FLHG 

JGO PRIMT IT' 



'BASIC LIPfS IN PKOCRfrt' 



Prufj'am con/ifues 
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Now my accounting systems 
run on CP/M as well asTRSDOS. 

So they'll work with your micro, 
no matter which it uses. 



I'm Irwin Taranto, and I originally designed my 
Model II systems to work with TRSDOS, the operating 
software Radio Shack suppUes with the TRS-80. 

I designed them extremely carefully, with features 
other microcomputer accounting systems don't have . 
Mine all integrate with the general ledger, and, 
where it helps, they integrate with each other. 

My general ledger system gives year-to-year 
comparisons, in dollars and percentages. It figures 
budgets and it even has a report generator. 

My accounts receivable systems can do sales 
analysis by product code and figure in salesmen's 
conunissions. They generate mailing lists by customer 
code or zip code for up to 2000 customers. 
You can choose either an open item system or a 
balance forward system vvhich works on a cash or 
an accrual basis. 

My payroll system can handle up to 600 
employees in multiple departments, with any state 
tax routine (we provide them all). It can make any 
miscellaneous deductions you ask it to — it even 
does tips and meals. 




THSDUS and THS-80 are trademacke of the Tandy Corporation. 
CP/M is a tiademaikof Di0ital Research Coipoiation. 



My inventory control system stores up to 5000 
items. It can report by vendor, tell you when you're 
out of stock or when you need to reorder. It can 
update price or cost automatically, and integrates 
fully with my invoicing system. 

There's a lot more, too. Over the years, I've 
had thousands of phone conversations with 
my customers, working out the bugs and kinks and 
adding desirable features. Everybody talks about 
"user-oriented" systems, but because of all these 
phone calls, it really means something when I say it. 
These may well be the most thoroughly researched 
small business accounting programs in the world. 

They're also the best supported, at least as 
far as microcomputer systems go. If you have a 
problem, just call. If your problem is tough enough, 
I'll get on the phone myself. There's no charge for 
phone assistance, ever. 

All these calls keep me upgrading my systems 
constantly. If you own one, you're eligible for a 
standing offer I've made all along: send me your 
diskette, and I'll send you the latest upgrade for 
only $25. 

Now I've taken another step. More and more 
owners are switching over to CP/M software these 
days. It seems to be where the whole microcomputer 
industry is heading. 

That's fine with me, because I've just converted 
all these accoimting systems, and can sell them for 
the prices I've listed: 

General Ledger/Cash Journal $ 299 

Accounts Payable/Purchase Order 349 
Open Items Accounts Receivable /Invoicing 349 

Balance Forward Accounts ReceivEible 399 

Payroll 299 

with Job Costing Option 399 

Inventory Control 399 

For mail-order programs, these prices may seem 
high. But for serious accounting programs, nothing 
can touch them. 

Michael Tannenbaum, the "80 Accountant" 
in 80 Microcomputing, just called them "a very 
impressive product at a very reasonable price." 

Our TRS-80 Model I and Model III systems 
aren't quite as sophisticated. But they're tremendous 
buys at $99 each ($149 for general ledger). 

So call me Eind take your choice —CP/M or 
TRSDOS. Same price, same support. My systems 
are ready and waiting. 



Taranto 

*5 & ASSOCIATES, INC. 



»-Sm List of AOvartiitfs on pagm 402 



121 Paul Drive. San Rafael CA 94903 

Outside California, toll free (800) 227-2868 In California, (415) 472-2670. 
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Program continued 


51W4 
TDOS 
7DS6 
7D07 

Tooe 

7099 
TDOn 
TDOB 
7D0C 
7tW) 
TDOE 
TOOF 
TDM 
7K1 
7M2 
7D«3 
TDM 
TDta 
TOtA 
TDftT 
TTXa 


41 
53 
49 
43 

2a 

4C 
49 
4E 
45 
53 
20 
49 
4E 
28 
30 
32 
4F 
4T 
S2 
41 
40 












7K9 


00 


02790 


DEFB 









TD6A 


SRTO 


02800 m 


C€Fy 


N4 






7MC 


0000 


02810 KSn 


OEFU 


B 






7ME 


42 


02820 


CCFH 


"BRSIC STflTEMEHTS 


IM PROGRflM- 




7WF 


41 












7079 
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Program continues 



address of the printer driver, 
and this address can be ioaded 
into HL. The driver routine ends 
with a RET, but there is no Z80 
instruction to Cali (HL). When 
the RET is executed it will pop a 
return address from the stacl^; 
the program must put the re- 
turn address in the staclt by 
PUSHing it before loading the 
routine address in HL and jump- 
ing to it. 

When the main routine en- 
counters 0000 as the NXTLIN 
address, Superlist has reached 
the end of the Basic program 
and jumps to the Quit routine. 

The messages that tell how 
big the program Is must stiil be 
taken care of. To print these 
messages I decided to set up a 
biock of memory with the same 
format as Basic RAM. The lines 
and statements have been 
counted and saved in LINES and 
STMNTS. These are two-byte 
unsigned integers, just like the 
line numbers of Basic. Quit 
stores these numbers where 
the line numbers would appear 
in Basic. When the program 



■■Cosmopolitan Electronics^ 
Corporation 

INTRODUCES 

MULTIDOS- 

with Exclusive SUPERBASIC"' 

Written By Vernon B. Hestef 

The Ultimate in DOS's 
at the Ultimate Price . . . 

" »79.95 ** 

MULTIDOS" OUTPERFORMS any current DOS, 
Total DOS system consumes only 16 grans of 
disk space. Can be reduced to 9 grans. (Who 
needs data diskettes?) 

• The only FULLY AUTOMATIC MULTIPLE DEN- 

SITY OPERATING SYSTEM including Formal 
and Backup 

• The only ALPHABETIZED DIRECTORY with 

DATED FILES 

• Absolutely the only NO HANG DOS 

• The only DOS with NESTED ■'DO 's that will DO 

ANYTHING 

■ Absolutely the fastest copy. 

■ Retains date and time after non- power up reOoot 

SUPERBASIC Hu Done II Again . . . 
Fr»« Memory over 40K with everything 1 

Here is a tjriet lisl ot tunctions thai Ihe auihoi iniroouced 
hrsi and has enhanced, where others are slumblmg lo 
duplicate 

• Cham Basic programs keeping current variable 

values. 

• High-speed dual dimension sort 

• Allocate addilior file buffers after program is loaded 

• Master global editor and Find Command 

■ Dynamically deletes and zeros arrays 

• Assigned variables listed mtelllgently 

If you wail anolhet year. arx3 pay the exort:jilant update 
fee. the other DOS's may have some ot these features 
(Possibly, then, the update lee will cost more than this 
DOS.] 

COSMOPOLITAN ELECTRONICS 
CORPORATION ^415 
P.O. Box 234 - Plymouth, Ml 48170 
(313) 397-3126 

- DEALER INQUIRES WELCOMED - 
Please include %2 50 ship/hand SerW your address 4 
Check or MO Mich residents, please add 4% sales tax 









-80 SPACE RAIDERS 
Starship Simulator 
and Combat Game 

This is the most realistic combat space simulation 
available for any computer system anywherel 
Operator is placed in a rapidly moving ship looking 
out through a window into the depths of space. 
Thousands of stars appear in the distance and part 
toward the screen edges as the ship flashes past. 
Forward and alt views available at any time. Ac- 
curate celestial navigation jsir^g both XYZ and 
spherical Coordinates! Comment from Aug '81 80 
Microcomputing: "May be the ultimate Star Trek 
type game and, possibly, the most complex micro- 
computer game ever attempted"! Fast action 
graphics never stop! 

IlllUltimately Realistic!!!! 

$24.95 (MasterCard, VISA, check, etc ) 
includes shipping. COD OK 

Model 1 Level 2 16K 



Bosen Electronics ^4i6 

445 E. 800 N. 

Spanish Fork, UT 84660 



m SICK 3C 

OF PROGRAMS THAT TREAT YOU LIKE 
AN IDIOT, WASTING TIME & MONEY?? 

RANDOM ACCESS PAYROLL VER. 1.1 

• No complicated initialization 

• EDITi LIST 

• NO SPECIAL CHECKS 

• USES NEB 9020 checks 

• PAY any employee anytime 

• SALARIED or hourly 

• SPECIAL PAV-special hours 

• TWO SAVINGS— including HIA 

• CLASSED by occupation or dept. 

• PAYSTUB shows Year lo-Date 

• STATE-FICA-FED. TAXES-SAVINGS 

SEND YOUR STATE TAX SCHEDULE- 
FREE— customized to your state tax 

Documentation $10,00 
Disk & Documentation $95,00 

RANDOM ACCESS DEPRECIATION 

• LISTS any one year's depreciation 

• OR complete lisl of all property 

• PRINTOUT shows— ID. Number— description— 

• Yr. purchased— life— met hod— 
1st yr. additional depreciation- 

• Reg, deprec,— deprec. prior yrs.— balance 

• SUMMARY— total value prop —additional 1st yr. 

• REGULAR deprec —deprec prior yrs 

• PERMANENT records for your taxes 

Documentation $15.00 

Disk S Documentation $195.00 

MIN:32K-1 DISK— PRINTER/132 CPI 

TERMS: Personal checks require 3 weeks to clear. 

USE— VISA — MASTER CHARGE-MONEY ORDERS 

TEL 7 PM-9:30PM EASTERN-(617) 359-2364/6370 

SEND. SASE 'or additional information 

MEDFIELD *""' 
COMPUTER SOFTWARE 

39 GREEN ST,, MEDFIELD, MA 02052 
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%V What 
t^ makes your 

CENTRONICS^ 

737 or 739 

the better buy... 

the new ETI 

ETI's own microprocessor Intelligance 

can put all the power of your 737 or 739 Printer 

at your fingertips... 

ETI's pioneering design (patents pending] allows youto ctitral ill 

Ika ■ftltis of this poweriul printer wNh slMfli coMiiairfs right 

from Basic or the body of your woid processing text. 

Provides Mulaaii priitlii sfiad with mainframe- 1 ilte dedicated 

peripheral control and programmability 

CBBpatlbIa with most popular word processing packages and 

micrcKomputer hardware. 

Features; 

• access to all six fonts of the 737 printer & graphics on 739 

• true proportional spacing with justification 

• superscript, subscript, underlining 

• user definat)1e spacing, line centering, form feed 

• UPPER/lowercase support also for UPPER-only systems 

• optional use of BASIC as a simple but flexltjle wordprocessor 

• no additional cables— Centronics-like edge-card connector 

ETI-A: $147 ETI-T: $147 ETI-U: $157 

(Apple" tl +) (TRS-80* Mod. I.II.III) (all others) 
order now directly fronn us (check, MO, Visa, MC) 
or your local printer dealer 

(N.J. re&Ktents pkease ackl 5% lax) 




micrOdome 

CORPaRATIOlM 

Denville, New Jersey 07834 
RO. Box 392 (201)627-8554 



^2i8 



■^ 



TURN YOUR TYPEWRITER 
INTO A PRINTER 




Now KGS-80 .^^^ ""■"'" 

„ . . m . . i' lnQiiiiif-5 Invited 

Keyboard Actuator. 

n Because of jls hardwate interface, the KGS-80 is the only actu- 
ator thai is deliveretJ ready to set up and run witfi no allefalion 
of your existing software. 

n Rests on keyboard of IBM Selectric, SCM or other typewriters 

May be installed or removed in seconds. 
n New third generation unit engineered and manufactured tor 

reliability and long lite by Kogyosha Co.. Ltd . Japans largest 

manulacturer of DC solenoids 

□ Price $599 FOB New York, NY 

n ■Y" cable switch option allows alternative operation with high 
speed matrix printer. 

For further information, call 1201) 569-8769 ^ 149 

Author I led ImpoiJe' 

NIK International Trading Inc, 

114 Liberty St, Suite 204. New York, NY 10006 



THE PROGRAMMER'S GUILD 

MEANS 

ADVENTURE! ! 

GAUNTLET OF DEATH 

This new style of Adventure features an 
exclusive TRAPMAZF' format in which 
escape is the primary concern. You are 
THORAN THE BARBARIAN, under the 
power of the Tyrant of Graylockland, 
accepting the challenge of the most deadly 
dungeon known to man. In the GAUNTLET 
OF DEATH you are pitted against 
mechanical devices that sling darts with 
urKanny accuracy, deadfall traps u^ere a ton 
of pure marble can crush you in an instant. 
You can fifKl [rations which may or nay not 
help you in your struggle. You may find 
treasures worth SURVIVAL POINTS against 
the ultimate confrontation of the LAST 
ROOM. Can you survive? Can you make 
your way through the maze of invisible traps 
that keep you from your mission? THE 
GAUNTLET OF DEATH Tough, unyielding, 
the absolute deadliest of challenges. Will you 
make it? or will you die trying 
TAPE ONLY $19.95 

THE DOMES OF KILGARI 

In the far reaches of the Outrim.thc 
Adventure continues. For those who've been 
waiting so long, the sequel to the classic 
DEATH DREADNAUGHT ADVENTURE is 
here at last. You barely make it to Kiigari 
before your fuel is exausted. The Interspacial 
Digitron Corporation has boobytrapped the 
Ion fuel center. Your job thou^ traditional 
adventure format is to overcome all traps and 
retrieve the Ion rods necessary for your 
survival ar^ continued journey. THE DOMES 
OF KILGARI. Classic! Adventure at its best. 
$19.95 TAPE $29.95 DISK 



COMPUTER MAIL ORDER IS HERE! ! ! 



Programmer's Guild 



•'S99 List ol Advarlisera on paga 402 
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Program continued 
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Program conlinuas 



reaches Quit the last address 
of the Basic program is in lY. 
The start of Basic Is subtracted 
from this address to set the 
length of the program in bytes, 
ar>d this numt>er Is stored with 
the last message. Quit then 
sets a flag (Quitfl), stores the 
start of the message block in 
NXTLIN and jumps back to 
Start2. The program decodes 
the text and prints it just as if it 
were Basic. The next time con- 
trol goes to Quit and the flag 
has t>een set, Quit prints a form 
feed, restores the stack pointer 
and jumps back to Basic. 

Modifications 

Superlist can be customized 
to suit whatever needs or 
desires you may have for Basic 
listings. 

The left margin of the listing 
Is set by the Indent routine. To 
change the left margin, change 
the value in line 2260. If you 
want no left margin, leave out 
the Indent routine and delete 
the calls to Indent In lines 1550, 
1930 and 2110. 
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EDITOR, ASSEMBLER AND MORE! 



SOFTWAnE DEVELOPMENT BYBTEM 

Tfte Micro Works Software Development System (S0S80C] is a complete 6809 
editor. assemt)ler and monitor package contained in one Color Computer program 
pack' Vastly superior lo RAM-based assemblers/editors, the SDS80C is non- 
volatile, meaning that il your application program bombs, it can't destroy your 
editor /assembler. Rus il leaves almost all o1 16K or 32K RAM tree (or your 
program. Since all Ihree programs, editor, assembler and monitor are co-resident, 
we eliminate tedious program loading when going back and tortd from editing to 
assembly and debugging' 

The powerful screen -oriented Editor features finds, changes, moves, copys and 
much more. All keys have convenient auto repeat (typamatic), and since no line 
numbers are required, the full width of the screen may be used to generate well 
commenled code 

The Assembler features all of the following; complete 6809 instruclion set; 
complete 6800 set supponed lor cross -assemb^: conditional assembly: local 
labels, assembly to cassette tape or to memory; listing to screen or printer, and 
mnemonic efrof codes instead of numbers 

The versatile ABUG monitor is a compact version of C8UG. tailored tot debugging 
programs generated by ihe Assembler and Editor, il features examine/change o1 
memory or registers, cassette load and save, breakpoints and more. SDS80C 
Pricfl: ie9.9S 
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CRACK THOSE nOMB! 



SOURCE GENERATOR: This package is a disassembler which runs on (he color 
computer and generates your own source listing of the BASIC interpreter ROM. 
Also included is a documentation package which gives useful ROM entry points, 
complete memory map, 1/0 hardware details and more. A 16K system is required 
lor the use of this cassette 80C Disassembler Price: S49,9S 



CBUQ IB HEREI 

MONITOR TAPE: A cassette tape wfiicfi allows you to directly access memory, 1/0 
and registers with a lormatted hex display Great for machine language 
programming, debugging and learning II can also send/receive RS232 at up to 
9600 baud, including host system download/upload. 19 commands m all 
Relocatable and reentrant CBUG Tape Price: $29.95 

MONITOR ROM: The same program as above, supplied ir 2716 EPROM. This 
allows you to use the entire RAM space AndyouQon t need lo re load the monitor 
each lime you use it The EPROM plugs into the Extended Basic ROM Sxket or a 
modified ROMPACK CBUG ROM Price: S39.95 



LEARN B80S! 

6809 ASSEMBLY LANGUAGE PROGRAMMING. 

by Lance Leventrtal. contains Ihe most comprehen- 
sive reference material available for programming 
your Color Ccmiputer. Price: $16.95 



PARALLEL O! 

USE A PARALLEL PRINTER with your Color 
Computer! Adaptor box plugs into the serial port and 
allows use of Centronics ''Radio Shack compatible 
printers with parallel interface Assembled and 
lesled. PI80C Price: $69.96 



THt 
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GOOD STUFF! 



3SK RAM! 

MEMORY UPGRADE KITS: Consisting of 4116 
200ns mtegrated circuits, with mstruclions tor 
installation 4K-16K Kit Price: $39.95. 16K-37K 
Kit (requires soklenng experience) Price: $39.95 

WE SHIP FROM STOCK! 
Master Charge/Visa and COO Accepted 



P.O. BOX 1110 DEL MAR. CA 92014 714-942-2400 
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The total line length Is set In 
line 2060 to 65 characters. You 
can change this value to what- 
ever right margin you prefer. 

Line 280 intializes the printer 
Device Control Block for 54 
lines per page. If you want more 
or less, change that value. You 
must have a printer routine that 
Keeps track of the line count to 
get paged output. 

If you do not wish the auto- 
matic colon before Else state- 
ments, delete lines 820-840 and 
860. To suppress the automatic 
colon before an apostrophe re- 
mark statement, delete lines 
740-760 and 780. 

Superllst was written before 
the recent changes in Level 11 
Basic. The only changes af- 
fecting Superllst are the start 
of Basic program storage and 
the possible relocation of the 
token look-up table. I under- 
stand a new edition of "Super- 
map" includes all the changes 
to Level 11. "Supermap" is 
available from Fuller Software, 
Grand Prairie, TX, or your local 
computer store. ■ 



Program conrtniwd 


STl 


7n& 


re 


Tom 


m 


TTWn 


KS 


TDM 


Hin 


7MC 


KI 


7MF 


Ml 


71>M 


IMft 


TDeC 


KSH 


7IMC 


Man 


7mi 


01 


7D1F 


OUITFV 


7C«3 


pirniET 


71»4 


B2 


7018 


IM>1 


7ce4 


P3 


7CCF 


ntiHT 


7CEB 


P2 


Tcoa 


t>MtS 


7DS3 


PI 


Tcor 


m 


7cn» 


nia 


7t»» 


na 


Tcas 


H7 


7C7C 


aUCTTES 


TWl 


PB 


7C71 


•» 


Tcsa 


P«1KT3 


Tcno 


1113 


7C«« 


Mil 


7C4F 


IWEHT 


TCCF 


KT>»«TS 


7WF 


94 


7CM 


V^ 


7C1I 


srs 


Tca* 


sri 


Tcas 


Cl 


7SES 


ai 


TSCO 


ntiKTi 


7C3« 


IM 


7K)0 


wxx 


7VFS 


ni7 


7VC1 


ni« 


TtPP 


nt3 


7BC4 


N14 


TWM 


N13 


71B4 


n 


7BC9 


12 


THS 


SLvnt 


7BDC 


QUIT 


TDOS 


mrr 


7EI* 


«n«T2 


7KS 


MOl-IN 


Twa 


MIIKT3 


7I»« 


LItCS 


7DK> 



The 
Intersoft 



C 



Compiler 



for the TRS'80 Model I and Model III 

* Fully compatible wiih all known TRS-80 Disk Operating 
Systems 

* Compiles C programs into a form which may be assem- 
bled into a cmd file on disk 

* Noknowledgeof assembler required 

■ Compatible with disk EDTASM or Radio Shack Disk 
Editor-Assembler 

* Features U nix-style parsing of command lines, with full 
i/o redirection for alio programs 



* detailed Users Manual 

* sample programs 



Package iDeludea: 

• ready-to-Tun compiler 

* source code for all support 
libraries 

library contains over 30 functions, including: 

* memory allocator * siring manipulation functions 

• numeric functions • DOS interface routines 

* and a complete i/o package, including print(f) 

Aho available for CP/M and 6SM/F1ex systeini 
Available aoon for OS-9 

Price: S75.00 for complete package; manual available separately for 
SI 5.00 (applicable towards purchase of complete package.) 
Ontario residents please add 7% Provincial Sales Tax. 

Please specify your operating system and assembler when ordering. Personal 
cheques lake IS banking days to clear. Send cheque or money order to: 

Intersoft Unlimited 

Box 383 Station C. Kiichener- Waterloo Ontario, N2G 3 Y9. Canada 



(Jnii ii 1 (ndciMik of Bell Labi 
OS-9 Micto*anSy>tcauCorp. Flex Technical SyiMnu CoiuullinU 

CP/M Dipiai Rncarch Coip TRS-SO and EDTASM Tandy Corp. 
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"Simply the Best" 

Service 
Technologies 

Centronics Printer Sale 

Completely Refurbished, 30 Day Warranty 

Model N 

101 165 c.p.s., 132 print positions, 5x7 dot matrix, 

areal work horse only $449.00 

101 A Same as above with the added features of 9 x 7 
dot matrix and USA5CII 95 character 

only $549.00 

101AL Added Bells and Whistles. All the features of the 
101 line plus LSI only $749.00 

102A 330 c.p.s., 125 L.P.M. bi-directional print 9 x 7 dot 
matrix only $949.00 

*306 The best of Centronics line at the best price, 

compact. 120 characters per second. 5x7. VFU, 
top of form and more only $689.00 

Quietizer covers available for this model only 

only $ 89.00 

501 120 C.p.s., 30 L.P.M. at 132 character lines, 150 

L.P.M. at 30 character lines, 5x7 dot matrix, 
sprocket feed, motor control only $649.00 

503 120 c.p.s., Sister to the 501 with bi-directional 

print at twice the speed only $749.00 

• Print stands available for all models only $ 70.00 

• Paper catchers for all models only $18.00 



Options 



• Add lower case to most 
Centronics Printers only $89.00 

• Add MoliK Controt to your 
779 printer only $95.00 

Our Conversion Kit I giwes most 

Centronics printers the ability 

to print in upper and lower 

case $89-00 

Ouf Conversion Kit II turns 

yoof motor on and ott auto 

matically. Increases the lite of 

your printer $95 00 

Both kits require NO soldering, 

etch cuts, software mod of 

Interface. Easy Installation. 



Interfaces 

• Now use your Centronics 
Parallel Printer on any Computer 
with a serial Port. Available in 
four modals all wilh awltchable 
baud rates. 
Model 

csp too 

Nobutter only $175.00 

CSP ■ 200 

256 char buffer only $225 00 
CSP 200X 

X an(X off Protocol only $340.00 
CSP 2000 

2048 char, buffer only $395.00 

Many Mora Interfaces Available 




To order Call 603-883-5369 

Service Technologies 
32 Nightingale Rd. 
Nashua, N.H. 03062 



^^Mi^S^ 



Visa and Master Charge accepted 
Inquiries Always Welcome 

Shipping and Handling Exlra 



^297 
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Special values on complete 
TRS-80'" Model III systems and disk drives! 



AM Electronics. Inc has created the most powerful and reliable 
TRS-80 hardware and software systems available to get your 
microcomputing system up and running Take advantage of 
special values like these: 

New TRS-80 Model Ml with disk drives 

Model III with dual 80-track disk dnves -704K of reliable disk 
storage on only two drives. System features two double-density 
80-track disk drives. 48K RAM and A M. Electronics controller 
board It's yours complete and ready to run' J?,295 

Model III with dual 40-track double-density disk drives. 48K RAM 
and A M Electronics controller board, complete and ready to 

rum 57 895 



Model III ROM Commented 

The definitive guide to Model III ROM 



$?2X)0 



NEW! Multiplier from A.M. Electronics 

Tired of unreliable double density operation? Try our new 
Multiplier and upgrade from single-density without doubling 
your problems , , . , $99,95 

Special Offer Multiplier and NEWDOS 80 Version 2.0. together 
in our low package price , . . . sigg 95 



NEW! Teac or Tandon disk drives, 

complete with power supply, case and 

extender cables 

40-track disk drive 5285 

80-track disk drive 5395 

Dual-headed 80-trar:k disk drive $499 

Disk drive cases and power supplies 

5y4-inch single drive unit w/case & power supply . $85 
5V4-inch dual drive unit w/'case & power supply . $120 

8-inch single drive unit w/case & power supply $;50 

Save on valuable accessories, too! 

I6K 200 nanosecond RAM memory chip $2 00 ea 

Disk drive extender cable $8.95 ea. 

Now available: Teac technical manuals $75.00 ea. 

NEW! MAKE 80® 
now available for Model III 

Converts Model I single-density 40-track or Model 111 double- 
density 40-track standard diskettes into Model III double- 
density 80-tfack-readable diskettes $29 95 
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Also, we specialize In complete, powerful software 
packages for business. Put your TRS-80'^'' to work for you! 



Manufacturing Inventory 
Control 

The system comprises six programs to 
give you complete control of raw mate- 
rials from ordering to atter-produclion 
disbursement Finished goods files are 
maintained and updated 

The system features addition, deletion 
and editing of raw materials, cost averag- 
ing rav/ material checking, finished goods 
costing, full bill of materials listings, 
complete where-used reports, and raw- 
material disbursement Re-order point 
calculation is built-in. 

Reports may be generated on complete 
inventory, belov^'-reorder point, out of 
stock, by vendor, inactive items, bill of 
matenals, finished goods lists, cost lists 
(w/ith and without inventory count), costs 
lists by finished good or complete 
finished goods list. 

The system runs on either the Model I or 
Model III computer and file capacity 
vanes with your hardware configura- 
tion . $299.95 

Dealer/Service Center 
Record Package 

This package is built in several modulaf 
packages and can be used separately or 
together as a complete system. Modular 
units are self-contained. When combined, 
you get the most comprehensive service 
center bookkeeping and record keeping 
package on the market. 

A complete history of customer repair 
files is maintained on-line. They can be 
accessed by account number or customer 
name. Information includes customer 
name, address, phone number, make of 
unit, sen/ice dates, technician, services 
performed and total amount billed. Infor- 
mation can be called to the screen or 
printer as a total list, or by previous serv- 
ice date. 

The customer records module can post 
to the accounts receivable module, 
payroll module and our Inventory Control 
System. 

Approximately 1,800 customers and 
records can be held with a Model I com- 
puter with four 80-track drives, or a Model 
III With two 80-track drives 

By adding additional drives to the 
Model III, more than twice this amount of 
information can be maintained. By sv^itch- 
ing diskettes in drives, the capacity be- 
comes unlimited 



See your 


nearest 


A.M. Electronics, Inc. dealer 


Here is a partial list 


ng of our dealers 


in North America and Europe: 


4AIZON4 


Malrlii Son**!* 




3'S Manor- A»l 


Slmutvk Coni(>vl*i Pioducia 


I3i9 f.tpa^ 1^1119307 


POBoiSee' 




lucion « as7io 


RamarhaMa SMMar* 




'WeAOa'srsB 


COHNCCTICUT 


Mjikagon M:4a441 


Compulat Swvlc** of Danbunr 


Sen Sact« Marhanng, Inc. 


U Sjmmil SI'«T 


eJiOMidditoaiino 


DjntijrT. CM oeeio 


Gjcd*nCly MneiSS 


MownUkt Vtovr VrftwAr* 


NEW HAMPSHIRE 


M.irtHoo* Rojd 




DirburyCN 06810 


TSE,>faidaMa 


COLORMM 


b Sou'.n Sireei 
Miltord NH 03065 


Data ll*MNiica* 


NEWJERSer 


aOOOEattOumi:, 




D«nv.' CO 80237 


Floppy I)*M Sanrtcu 


2358 E BoulOf 


CN5212 

Princalon HJ 08540 


ColofaOo Sp-u^s CO 80909 


NEW MEXICO 


DIST. OF COLUMBIA 


Rocky MountaM Englnaanng 


Program Stora 

4200 MKonsin Airanu* MM 


474SSoulhain.5E 

AtauquaiQua NM 17106 


W»»h.nfllt>r DC ?0016 


NEW YORK 


FLORIDA 


B.I EntarprMaa 


Aduanhira Inlarnatlonal 


171 Hawliini 


507 Easi Eir«i 


C«niaraach.KY11720 


Long", cod. FL32T50 


NORTH CAROLINA 


All Syalami Oo 

105W PlinlSlrctt 


Alpfia Tachnoton 


Winlar GarOan. FL 32787 


1201 Wicim Dfrva 




Raltign. NC27S04 


lumois 


OREGON 


W Compular 


13W Canlra Eladfonlca 


1850 eiltar Road 


1300ethS1reel 


Aurora. ILeOSCU 


Umaiilia, OR 97es? 


MWwaM Computar Parlpharila 
1467 S Michigan Ave 


PENNSYLVANIA 


Chicago. ILSOeO! 


Slavan* Radki Shack 


Thaytf RadM 


582 Null Road 


151 AlkiraSl 


Pho<nii>illa.PAi946a 


Graaoviaw IL62«42 




Mf^&ACHUSBTTS 


BELQIUM 


Small Bualnaaa Snatanu Oroup 


Daiavlaton 
Av duOiam«nt4S 


6 Carlisla Road 


1040 Bruuali - Belgium 


Wastlofd.UA 01886 


TELEX 84229 FITE CO 


Caniputat Wu» 
MM G'val Road 


¥riST GERMANY 


LiltMon. MA014M 


Fuaanar 


MfCNfGAN 


CompuiM SrMama. OMBH 




4410 SlaiAiun 


Jaaiai BuMar 


Marll 17 


USE LaKtStraai 




P»io»k«y. Ml «770 


REP. OF SOUTH AFRICA 


EtgMBMCvmat 


Braum Buataaai MacMnaa 


722 Evanslon Air* 


480Sydn«y Rd 


Muikaeon MI4M42 


Do'Oai iOOl 



This package may be specified for auto 
dealers, mechanics, TV repair centers, 
electronic technicians, and appliance re- 
pair centers $199 95 

Order Entry 
With Invoicing and Inventory 

Orders are composed of name and ad- 
dress information (with optional company 
name), method of shipment, payment 
method, items on order, quantities, prices. 



description, and stock number. This sys- 
tem also prints invoices 

Al point of shipment, inventory is au- 
tomatically updated. Dollar sates are re- 
corded. Shipping charges and dates are 
logged. Entries may be edited Partial 
shipping is permitted. 

The inventory module allows checking 
and updating stock, inventory reports, 
sales reports, shippmg charges, and 
more. 

This complete system is for almost any 
wholesale or retail business Capacity is 
upward-expandable from a dual 40-track 
Model I system. 1,750 inventory items, 
385 orders per diskette 5/99 95 

Inventory Control System 

This system gives you complete control 

over an unlimited amount of inventory 
items. (Note: Systems containing more 
than 13,000 items are difficult to handle 
from a maintenance time standpoint, e.g. 
Block File reorganization can take over 
3 hours.) 

As presently configured, a Model I 
computer with one 40-track drive will hold 
1,925 items, or a four-drive system a total 
of 6,625 items. Four 80-track drives will 
hold over 13,000 items. A Model III com- 
puter, with two 40-tf-ack drives, will hold 
about 13,000 parts. 

If necessary, A.M. Electronics, Inc. can 
modify both the program and fiardware to 
allow on-line storage of an unlimited 
amount of items. As the file becomes 
larger, maintenance operations take 
longer Average search time is six sec- 
onds, with 12 seconds the longest time. 

Upon program initialization, the user 
specifies the item number and descrip- 
tion digit length. This allows for item num- 
bers up to 23 alpha-numbenc characters. 
(As item number digits increase, digits for 
description usage are decreased.) 

The program is completely menu- 
driven. Items can be added, edited, or 
deleted from the file Items can be placed 
on order, received to stock, or sold from 
inventory. Complete printout capabilities 
are available 

Item information includes, item number, 
description, supplier re-order point, cost. 
wholesale and retail selling price, quan- 
tity, on-order, and total sold The re-order 
point IS calculated by the program, based 
upon number of units sold over a 
specified period of time . . $799.95 



inapomaiev' 



A.M. ELECTRONICS, INC. 



^452 



Ann Arbor: 3366 Washtenaw Ave 48104(313)2312 Open M-F 10-6, Sat 10-5 

Fowlervllle:' 111 North Grand, Box 1071 48836. (517) 223-7281 

Attention Dealers, OEM's & Distributors: Call us for details on our attractive pricing. 



"TRS-eO IS a tiatfem.irk of Tdnrjy CO'p 



"Authorizea RaQiD Slirtck dealer 



Prices Subiecl lo chdnye wriliout notrco 



^ S«s List of AiJv»rUS»rs on fiaga 402 



80 Microcomputing, November 1981 • 347 



APPLICATION 



An op-amp screening program for those times 
v^hen you can't get the one you really want. 



Second Sourcing 



David Tinis 
National Controls Inc. 
4500 John Young Parkway 
Orlando, FL 32804 



Have you ever been enthusi- 
astic about an electronics 
project only to find one or two 
parts were hard or impossible to 
get? When It comes to op>-amps 
this seems especially true. 
While many bear standard part 
numbers, it's not uncommon for 
equivalent parts to have a dif- 
ferent identification. 

Since one facet of my job is to 
screen vendor-submitted com- 
ponents for compliance with 
specifications established for 
current parts in usage, it 
seemed desirable to let the com- 
puter do the preliminary screen- 
ing. Op-amp Is a program I wrote 
that allows me to compare 14 
selected parameters between a 
currently used part and one be- 
ing submitted as a possible sec- 
ond source. The program was 
originally written for use on an 
INTEL MDS230 and later adapt- 
ed to my TRS-aO. 

Th« Parti Fll* 

There are actually two parts 
to this program. The first is used 
to create a file named Parts con- 
taining the specifications of 
known and used parts. The sec- 
ond Is to compare the part under 
consideration with a Known part 
In the previously created Parts 
file. 

The Parts file Is created as a 
sequential access file under 
VTOS 4.0. One feature of VTOS 
4.0 is an enhancement to Disk 
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Basic which allows a sequential 
file to be opened and positioned 
to its end. New data can then be 
added without the necessity of 
reading the entire file into an ar- 
ray in memory, adding the new 
data to the array and then rewrit- 
ing the file. Non-VTOS users will 
have to modify the program for 
this type of operation. 

The Evatuatlon 

The evaluation function of the 
program Is straight forward. The 
program first queries for the 
Known op-amp In the Parts file 
to be used as the standard of 
comparison. It then asks for pa- 
rameter information atraut the 
part under consideration and, 
after all Information has been 
entered, lists any specifications 
that compare unfavorably. A 
printout or display on your video 
of all the parameters point by 
point can be obtained. 

One thing to remember when 
entering parameter Information 
is to avoid using typical data. In- 
stead, use a bad example for the 
parameter being evaluated. 

The fourteen parameters con- 
sidered by the program are list- 
ed below: 

• Power Supply Voltage: 
Most op-amps operate from 
equal voltages of opposite po- 
larity. The value to be used here 
is the maximum allowable pow- 
er supply voltage of either 
polarity referenced to zero volts. 

• Differential Input Voltage: 
The maximum allowable differ- 
ence in input voltage between 
the two op-amp input terminals. 

• Input Voltage: Maximum al- 
lowable input voltage of either 



an input with the other held to 
zero volts. 

• Input Offset Voltage: The 
voltage that must be applied to 
the Inputs to achieve a zero out- 
put voltage. This generally Indi- 
cates how closely matched the 
inputs are. The lower this value, 
the better. 

• input Offset Current: The 
difference in Input bias currents 
which causes a voltage differ- 
ence across the Input resis- 
tors. If this value is large, unac- 
ceptable Input voltages can t>e 
generated. 

• Input Bias Current: Average 
of the two Input bias currents 
which cause voltage drop across 
the input resistors that must be 
overcome to the input signal. 

• Input Noise Voltage: A 
measure of internally generated 
noise at the Inputs of the op-amp. 

• Differential Input Resis- 
tance: The impedance seen by a 
source looking into the inputs of 
the op-amp. This figure is used 
when matching the op-amp to 
driving device. A mismatch will 
cause excessive loss of Input 
signal. 

• Common Mode Rejection 
Ratio: This Indicates how well 
balanced the differential stages 
of the op-amp are. 

■ Large Signal Voltage Gain: 



The ratio of the change In output 
voltage to a change In input 
voltage measured without feed- 
back or compensation. This 
figure is frequency-dependent. 

• Output Voltage Swing: 
Peak voltage output that can be 
obtained without clipping. This 
is measured with reference to 
zero volts. 

• Slew Rate: The maximum 
rate of change of output voltage 
with respect to time that can be 
obtained while maintaining 
linearity. 

• Power Supply Rejection 
Ratio: A measure of sensitivity 
to changes In power supply volt- 
age and noise on power supply 
lines. 

• Power Dissipation: The 
maximum power the device can 
safely dissipate at a given tem- 
perature and under specified 
conditions of power supply 
voltage and load. 

Most op-amp data sheets list 
other parameters but these 14 
were chosen for their overall Im- 
portance to device operation. 
Once a preliminary screening of 
these parameters has been 
done, a closer look can be given 
the part if warranted. In any 
event this program can be a real 
aid In finding new sources of re- 
placement parts. ■ 
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Program Listing 



II CLS 

21 CLEARSIIiDIH J«(1E1 ,K ( 16) ,U ( It) , SSUS) .U!(1C) 

21 F0RX-lT016iREADU$(X) iNEXTX 

22 DAT^ "VOLTS", ■ *, "VOLTS", •volts', "HICROVOLTS'.'HAHOAIIPS'.'HAII 
OANPS* , -MICROVOLTS" , "HBCOBIU* , " ■ , "DB" , "V/IIV" , 'VOLTS' , "V/NICROSE 

COBD' , 'DB' , 'me 

21 F0RX-lT016iR£ADSS(Z)iHEXTt 



Fmfff»m continiMs 



How to Buy or Sell 

Computer Equipment 

and Software 



and come out a winner 



START HERE 
WITH... 




Begin your search in the in- 
dex ol Computer Shopper's 
bargain tilled pages. Locate 

the category and page 
numtier ot items that 
interest you. 




> 



As you outgrow your 
system or wan! to trade up 
(most dealers won't take 
trade-ins), use Computer 
Shopper ads to sell your 
items to 20,000 readers na- 
tionwide tor the bw cost of 
10 C3nts per word. 




II you need help with any 
computer telaied problem 

whether It's an interface 
problem or advice on tne 
righl peripheral tor a home- 
brew system, use the free 
HELP column especially 
designed tor that purpose 



%r//2 



{ 



Congratulations, you're a winner whether you buy, sell 
or trade in the computer marketplace by subscribing 
and using Computer Shopper's action yellow pages. 
And for your first bargain, take advantage of a FREE 
issue of Computer Shopper as a "Special Get 
Acquainted Offer." 

Act today and receive your first issue free in addition 
to the $10, one year/12 issue regular subscription 
Of course, if you are not 100% satisfied, you may 
cancel and still keep the free issue just for trying 
Computer Shopper. 

BONUS : New subscribers are entitled to a complimen- 
tary classified ad. Use it for pre-owned equipment or 
software or as a want-to-buy ad. Just print or type your 
ad on a plain piece of paper and send it along with 
your subscription. Your phone will probably start ringing 
before you receive your first issue. 

For MasterCard and VISA Subscriptions only, 
CALL TOLL FREE 1-MNV327-9920 

For MasterCard and VISA Classified Ad orders only, 
CALL TOLL FREE 1-80(^327-9926 



You have the convenience 
of shopping nationwide 
without ever leaving your 
home or office, And if you 
buy out of state you'll save 
on sales tax. 




► 



Computer Shopper's easy- 
toread format makes your 
search quick and simple 
with classifications at the 
top of each column in txild 
black headings. 




Start or add to your com- 
puter system by finding 
money saving tiargains in 
each month's issue from 
individuals who no longer 
need their personal equip- 
ment . 




You've got your computer 
hardware, but what about 
the software? Use a Com- 
putet Shopper ad to find 
what you need, Someone 
advertising in Computer 
Shopper probably has what 
you want. 




P.O. Box F138 • Titusville, FL 32780 
Telephone 305-269-3211 




Don't be misled by more expensive imitations! 

This is tlie original Photo point light pen pre- 
ferred and supported by some of the leading 
software sources like, "Quality Software"— "In- 
stant Software"— "Level IV "products and soon, 

Just imagine . . . 

In playing backgammon, (included) when you 
want to move a man, you just point at where you 
want to move from, then point at where you 
want to move to, and your man moves!!! No 
more fumbling with keyboards— YEA! 

Your Photo Point package comes cotnplete; 

• 1 Photo point light pen (of course) 

• Info sheets on how to connect the pen and 
how to write your own programs 

ALL IN BASIC 

• Two apertures 

• AND two sensitivity settings 

• A cassette tape with 4 informative programs 
and games 

• Ready to connect to your TRS-80 System. 
(DOS too!) 

• Does not void any Radio Shack warranties 

Requirements: 

• Level II basic 

• And a little /magmaf/on" 

For last real time programming it is your lowest 
cost peripheral at *19.^ 



Announcing 




NEW PEN BASIC by Steve Bjork 

Steve is one of the Best Assembly Lang, pro- 
grammers around, and he has come up with PEN 
BASIC. This low memory routine will add 10 more com- 
mands to Level II such as PENGET which searches the 
entire screen for the pen and returns a number between 
0-1024 in about 1 sec Plus 9 other commands. Perfect for 
you light ware authors and NEW light pen owners 
too! only S14.95 



(COUPON) 

Micro Matrix ^ea 

P.O. Box 938 • Pacifica. CA 94044 

Send for yours NOW: (415) 355-4635 

Name ___^__ 



Address 



City 



St._ 



Photopoint 
n $19.95 

Pen Basic 
r 1 $14.95 



Zip 



Card# 

Ex, 

Date_ 



Money 
CK. Order Visa MC 

[ 1 LI LI n 



Prnf/ftm conlinuad 



26 DATA "POWER SDPPL* VOLTAGE',' " ,"D1FPERENTIAI. IKPDT VOLTAGE", 
■INPUT VOLTAGE', "INPUT OFFSET VOLTAGE" ," INPUT OFFSET CURRENT", "I 
NPOT BIAS CURRENT", "IKPUT NOISE VOLTAGE" , "DIFFERENTIAL INPUT RES 
ISTANCB"," ■ 

27 DATA 'COHNON MODE REJECTION RATIO* , "LARGE SIGNAL VOLTAGE GAIN 
-, "OUTPUT VOLTAGE SWING", "BLEW RATE", 'POWER SUPPLY REJECTION RAT 
I0","PO«ER DISSIPATI08' 

3H PBINTTABdS) /"OPERATIONAL AMPLIFIER EVALUATION" i PRINT 

it PHINT'THIS PROGRAM CREATES AND UPDATES AN OP^AMP DATA FILE KA 

MED':PRINT"'PARTS', THIS PILE PROVIDES A DATA BASE FOR PARAKET 

ER-|PRINT'CDHPARISONS WHICH WILL DETERMINE COHPONEHT INTERCttAGEA 

BILITY.":PRI(n' 

7B IHPOT'OPTIOHS (1) PARTS FILE UPDATE (2) EVALUATE A PART (3) Q 

OIT'jA 

SI IFA<10RA>3rBEKPRINT!GOT07i 

9B ONAGOTO2e8B,4IBB,50e« 

2eat CLS!PRIHTiPfiINT"PARTS FILE UPDATE. ENTER SPECIFICATIONS AS 

REQUESTED. "lPRlNT"IF UNABLE TO DETERMINE A VALUE, ENTER 6.' 

2eBS PRINT 

2B1B INPUT'WHAT IS THE PART ID ";?$ 

2811 OHERROHGOT02B15!OPEH "I" , »1 ,'PARTS* 

2812 INPUTI1,AS,K(1),K[2) ,K (3) ,K ( 4) ,K ( 5) ,1! (6) ,K (7) ,K (8) ,!((9) ,l[ (1 
8) ,K(11) ,K(12) ,K(13) ,K(14) ,1115) ,K(16) i IFFS-ASTHENPRIffliPRINTFSf 
• IS ALREADY IN THE PARTS FILE. " iPRIMTiCLOSE 1:G0T07>: BL&SIFBOF( 
1 ) TBB8CL0SE1 I GOT02I15 t 8LSE2B12 

2B15 PRINT 

2B2B PORX-ITOIS 

283B IPX~20RX-lBGOT02BSB 

284B PRIHTS$(X) ;■ ("jUSfXI)') " ; : IKPUTAIX) 

2B5B HEXTX 

2188 P0RX-lTO16[K[X)-A(X) iHEXTX 

2198 OPEN "B", 11, "PARTS" 

22BB PRIMT(l,FSj",*fKll)fR[2)jK(3)jK(4),K[5)fK(6)iK17)lK(B))K{9) 

|KI18) iK(ll) iK(12) ;K(13) |K[14})K(151 iKU6) 

2218 CLOSE 1 

2228 PRINTiPRINT'PARTS PILE HAS BEEN UPDATED TO INCLUDE "|FS 

223B PRI»T:G0TO7B 

224B PBIHT'DISK ERROR - RESTART NECESSARY" !RESUME7fl 

4BaB CLS!PR1HT!PR1NT"0P-AMP COMPONENT EVALDATIOM." 

481B PRIHTilHPUT'WHICH OP-AMP DO YOO WISH TO EVALUATE AGAIHST'lA 

$ 

4B2B OPEN 'I', »1, 'PARTS' 

4838 IHPUT»1,PS,K(1) ,K( 2) ,m3) ,K ( 4) ,K{5) ,lt(6) ,K|7) ,K{ 8) ,K (9) ,F (1 

B) ,K(11) iK(12} ,K(13) ,K(14) ,i;[15) ,K(1S) 

4831 IFAS-FSTHEN4B3e 

4B32 IP EOF(1)TEEN4B34EI.SEGOT04B3B 

4834 CLOSE liPRIHTiPRINT'UNABLE TO FIND "lASj". TRY AGAIN. " i PRI 

NT , GOTO? B 

4838 CLOSE 1 

4H4B PRINTiPRlNT'ENTER TUB SPECS OF THE OP-AMP BEING EVALUATED A 

S REQUESTED." 

4845 PRINTiIHPUT"WHAT IS THE ID OF THE OP-AMP BEING EVALUATED ', 

XS 

4B5B F0RX=1T016 

4855 lF]("20RX-ieGOT04B6S 

486B PRIHTSS(Klj* (")US(X|;'l 'clHPUTUU) 

4865 HEXTX:PRltrr 

4875 IFKUl-BTHENPRINT'NO DATA FOR " jSSdl !GOT04B95 

4B8B lFUtl)<K(l}THENPRIHT"FAILS "iSSd) 

4895 IFK(31-BTHEHPRINT"N0 DATA FOR " jSSf 3) :GOT041BS 

41BB IFn[3)<K(3)THENPRINT"FAILS "iSS(3) 

4185 IFKC4)-BTHEHPBINT-»0 DATA FOR '|SS( 41 iGOT04115 

411B IFU(4)<K(4)THENPRINT-FAILS ■jSS(41 

4115 IPK(5)-BTHENPRIWT'HO DATA FOR ' | SS [ 5) !GOT04125 

4128 IFU(S) >K[5)THENPRINT"FAILS 'iSSfS) 

4125 IFK(6)-flTHENPRINT"N0 DATA FOR " I5S(6) !GOT04135 

413B IFU161 >K{6)THENPRINT"FAILS "iSSlS) 

4135 1PK(7)-BTHENPRI«T"H0 DATA FOR " iSS(7) :GOT04145 

414B IFUI71 >B(7)THENPRINT"FAILS "|SS[7) 

4145 1PKI8)-BTBEHPRINT-H0 DATA FOR 'jSSC 8) :GOT04155 

415B IFDI8)>me)THENPRINT"FAILS "tSS[8) 

4155 IPK(9)-8THEHPRINT"MO DATA FOB ' |SS( 9) -00104175 

416B IFU(9)<K(9)THENPRINT"FAILS "iSSO) 

4175 IFK(11)-BTHENPRINT"N0 DATA FOR " jSSCJl :G0T041 B5 

41BB lFU[ll)<:K(ll)TaENPRINT"FAILS 'iSSdD 

4165 IFKd2)-BTUENPRINT"H0 DATA FOB 'i SSd2) !GOT04195 

4198 lFUd2)<Kd2)THENPRINT"PAILS ■iSS[12) 

4195 IFKd3)-BTHENPRINT"N0 DATA FOR 'iSS{13) :GOT042B5 

42BB IFUd31 <lld3)THENPRINT"FAlLS "iSSdB) 

4285 IFK(14)-BTHENPRINT"IJ0 DATA FOR " jSS [H ) ;G0T04215 

421B IFUd4)<Kd4)THENPRI»T"FAILS '|SSd4) 

4215 IFK(15)-BTEENPRINT"N0 DATA FOB "jSSdS) iGOT04225 

4228 IFU{15)<i:(15)TBENPRINT'FAILS "|SSd5) 

4225 IFK(16)-»THENPRIHT*»0 DATA FOR "iSS (161 !GOT04235 

423B IFUd6)<Ii(I6)THENPRINT'FAILS "|S$d6) 

4235 PRIffTiPRlNT'EVALUATION COMPLETED. DISCREPANCIES AS NOTED." 

424B INPUT'DO YOU WANT A COMPARISON PRINTOUT (Y/N) "jAS 

4258 IFAS""N"GOT043ie 

42(8 IFA$<>"y'TBEH4248 

4261 PRIHTilNPUT-DO YOU WANT THE PRINTOUT ON (11 VIDEO (21 PRINT 

ER';A:IFA-lTI<BN42e5ELSE432B 

426 5 PRINT"PAaAMETER"i!PHINTTAB{381 (FS, i PRINTTAB(391 ;X5;iPBINTTA 

a{5Bl I "UNITS" 

427B P0RX=lTO16 

4288 IPX-20RX-18GOT043Ba 

4291 PRlNTSS[X),iPRI»TTAB[31)|K(X)jiPRlNTTAB(381|U(X))iPRINTTAB( 

«B)|US(X1 

43 BB HEXTX 

4318 GOT078 

432B A-PEEKd4312) iIFA>128THEN43e«eLSELPRIMT'PARAIIETER'] iLPRIHTT 

AB(38),FS|!LPRIHTTAB(391,XS(:LPRINTTAB(5B)|'nHIT6' 

4338 FORX-1TDI6 

4348 IFX-2DRX-1BGOT0436B 

4358 LPRIHTSS(X) jiLPRINTTAB{311 ii:(Xl fi LPRmTTAB{38) |U (X) i iLPRIHT 

TAB{481,U5(X) 

4368 NEXTX 

4378 G0T07B 

4388 INPUT'PEIHTEB NOT READY. ABORT? ( Y/H) ' jASi IFAS<>"N*THEN439B 

ELSE INPUT" READY PRINTER AND PRESS <ENTER>' i AS:GOT0432a 

439B IHPUT"PRIKT TO VIDEO INSTEAD [ Y/Hl " i ASl IFAS-*Y"TaEN4265ELSE 

78 

5BB8 CLSiEND 
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DR. SOFTWARE 



Presents 



GRID IRON 

SOME FEATURES 

ftMS PF PA OFF OEF TD TP FQ FD FR FL 

403 272 3649 52&4 31 24 19 336 23 9 
434 311 3492 3279 30 21 11 337 12 14 



ATLANTA 

VS 
DALLAS 



DIFFERENCE 
DIFF./GAME 16 

AVB.PTS./BAriE 16 



49 39 167 13 

3 2 10 O 



13 8 1 

O O O O 



11 3 
O O 



28. 373 DALLAS ATLANTA 

27.5623 NEW ENOLAND VS 

26.3 LOS ANOELES DALLAS 



AVG.PTS./BAHE 16 
23.3123 
2fl.373 



222 PHILADELPHIA 
231 HOUSTON 
260 BUFFALO 



■ POINTS FOR 
PA -POINTS AGAINST 
OFF' OFFENSIVE YARDS GAINED 
DEF- YARDS PERMITTED 
TO -TOUCHDOWN PASSES 
TP - TOUCHDOWN PASSES PERMITTED 
FG -FIELOGOALSMADE 
FD - FIRST DOWNS 
FR - FUMBLES RECOVERED 
FL -FUMBLES LOST 

COMPLETE DOCUMENTATION 
REOUIRES LEVEL II BASIC 32K 
TRS-SOUCDEL.I a3 

TAPE TO DISK $24.95 

CHECKS. MONEY ORDERS, C.O.D. 
CA RESIDENT ADO 6% TAX 



V i«ai JAWES ouNgnikCit a feter oaihielli 

OTHER MENU OPTIONS INCLUDE 

WEEKLY DATA UPDATE 

DISK LOAD 

DISK SAVE 

TEAM LISTING 

PRINTER SELECTION 

CASSETTE 
SPECIAL FEATURES 

NUMERICAL RANKING OF ANY CMTA 

FINAL 19S0 DATA AS ABOVE 

DR. SOFTWARE 

1199H EDGEMOUND DR 

SANTA BARBARA. CA 93105 ^^2^B 

TO ORDER CALL: 

(BOB) 687 9501 or 963 3029 

CONSULTATION SERVICE AVAILABLE 



y»»#**»*»#*»»»»#»»###»»^»##»#»»»»#####»##»»»######»#» 



NEWD0S2.1 - NEWDOS/80 users 

Add new dimension and class to your programming! 

INTERACTIVE CONTROL LANGUAGE 

Aren't you tired of waiting for and answering endless pro- 

- mpts like — "ENTER FILE NAME?" every time you've got to 

i work with your computer? And how many times were you 

dreaming about having additional features in DOS or! 




trol language system! 

Create and run your own multilevel procedures, dynamically ' 
I generate/store replies tor prompts, intercept and switch con- ■ 
! trol back and forth between running program and ICL, execute ■ 




I To you procedures look like additional and quite intelligent: 
; commands. i 

ICL is especially convenient for 1 drive systems where a lot ! 
I of diskette swapping is necessary. 

; Works fine with BASIC programs, EDTASM, DISASSEM, F80, 
; L80, SUPERZAP... almost any program using standard DOS \I0 
; drivers and conventions. Basic editor can be used to create! 
'. procedure text files. 

Superb documentation with detailed "how-to-use" and ! 
; tutorial information, most useful procedures, system informa-! 
; tion and patches are provided. 

All for unbelievable low price of $29.49 — 

— (on 5" diskette + documentation). 

To order send check or money order to 

XYZT COMPUTER DIMENSIONS INC. 

2 PENN PLAZA, suite 1500. New York, N. Y. 10121. 
' Requiras min 32K 1 Drive Modal 1. 

■ Spacily NEWD0S2.1 oi NEWDOS/BO diskette tormal (works with either DOS). 
* N.Y. slate residents add 5% sales lax. 



COMSOFT 




TSHAKE 2.0 
MULTI-USER SYSTEM 

for the 

TRS-dO® MODELS I III 

Powerful addition to NEWDOS80* expands the capacity of a 

single TRS-80 to service TWO active users with full access to 

NewdosdO. 

Users operate independently with joint access to disk and up to 

two printers. 

Execute BASIC or ASSEMBLY language (above 7740 Hex). 

2nd user communicates via a TERMINAL, modem, or second 

computer acting as a terminal. 

NEW BUILT-IN FUNCTIONS 

■ Communicate between users 

• Execute two programs concurrently 

• Joint execution of single source 
program with separate data areas 

• Open same file by two users 

• Multiuser MINI-DOS 

Requires 32K model I or III with one disk drive and a serial port 

Interface (software drivers built-in for RS-232* , HUH-8100*, 

TRS232«,andMPR-232» interfaces). 

SIMPLEX mode for non serial-port users. Requires only expansion 

interface or TRS232 with printer to act as second "screen". 

Jobs share TRS-60 keyboard under user control. 

CONFIGURE utility makes it easy to partition memory between 

users and select I/O modes. 

TSHARE 2.0 for NEWDOS80 $ 99 

Please specify model I or III (Model ill available S«p. 1,1981) 
TSHARE 1.3 forTRSDOS2.3/NEWDOS 2.1 $ 89 

TSHARE 2.0 + MPR-232 interface (for non RS-232 users) .. $199 
$10 Upgrade privilege for TSHARE 1,3 licensees 



DDM5 



$79 

MODELS I ft 



MULTI-FEATURE DATA MANAGER 



Up to 20 user defined fields. 

Files extend across niultiple 

diskettes. 

Supports up 1o four drives. 

Aulomalic single drive disii 

mount requests. 



Fourdata types and compu- 
lationai fields. 

Flexible REPORT GENERATOR, 
Fast assembly language sorts. 
MULTI-FIELD sorts 4 searches. 
Keyed access on any sorted field. 
Indexed relations between files. 



VIEW 



$1995 CSTOCK 



$49 



A SCREEN FORMATER 
FOR DBMS 

Full CURSOR control 

Protected fields 

User form DESIGN 

File data entry, Inquiry, 

Aedit 

Elegant A professional look 



DISK DATA BASE & 

ANALYSIS TOOL 

FOR STOCKS A OPTIONS 

' Regression analysis 
' Charts 

' Portfolio selection 
■ Risk management 



SERIAL I/O 
MPR.202 



A serial port interface designed to properly connect to TRS.-60 
with or witfiout an expansion interface. 

• Glitch freeoperation 

• Connects with card edge connector 

• Uses TRS-80 power supply 

• All parameters switcfi selectable 

• Baud rates 50 to 1 9200 
Manufactured by: 
Micro Projects Engineering Co. 
Culver City, CA 

$1 19 (ASSEMBLED & TESTED) 



TO ORDER 



CoiT^ScFt 



TRS-eOtm 

Radio Shack/Tandy Corp. 
NEWDOS tm Apparat, Inc. 
TRS232 tm Small System 

Software 
HUH tm California Computer Systems 



1569 Westwood Blvd. 

Suite B 

W.Los Angeles, CA 90024 

^ 213«4«)369 

1^204 



r'S«e List ol Advertisers on page 402 
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TUTORIAL 



... of things that go bump in your keyboard. 



Keyboard Incantations 



Allen V. Robnett 
Gallatin High School 
Green Wave Drive 

Gallatin. TN 37066 

Ghost stories are usually just for thrills, 
but here's one which offers insights, 
too. A good ghost story depends on setting 
the scene, and this scene requires a TRS-80 
keyboard. 

So sit ye down, and turn the lamp 
down iow. 

The incantation must be carried out ex- 
actly or the speii will not work. Certain keys 
must be heid down while others are struck. 
The heid keys are indicated by a numerai 
betow the key name. The number indicates 
which finger must be used tor everything to 
come out right. The little finger of the left 
hand is numbered 1 , and the iittle finger of 
the right hand, 10. An asterisk means the 
key is not to be held. 

As the warlock of the story, I will make in- 
termittent utterances. You must not release 
any heid key until instructed to do so. 

The spell involves keyboard-video I/O, 
so do this: 

I O Space 

(8) (9) CI 

Hmmm. Very strange. Maybe you ought 
to do that again. This time don't release the 
keys. 

Let's take a bit from machine language 



and make a CD call to the wizard of 
Halloween: 

C H space 

(3) (21 m (•) 

Don't let go! That's creepy— a syntax er- 
ror and you never came close to the Enter 
key. 
Don't turn back now. Strike: 

T Q 

(•) (•) 

Release your right hand (1,0, and H) and 
press onward: 

o L T 

{•) n n n 

How's that for spelling? 

Release and clear everything. We'll try a 
few more. 

When you and your keyboard play a duet, 
you should let it do more of the work. Press 
(in succession) and hold; D U T 

See what I mean? What's taehind this 
mystery? Clear again and release. We'll ask 
the keyboard. 

Press and hold the letters: C L U S 

OK, release and relax. 

Breaking the Spell 

Of course, the parlor tricks we've done 
here are just for fun. but they reveal some- 
thing about the way the keyboard works. 
Multiple key presses can be useful. Shifted 
characters are a good example, as are the 
123, DFG, or JKL commands used In some 
well-known utilities. 



Many sources refer to addresses 3800H 
through 3BFFH (14336 through 15359) as 
keyboard memory. Maybe it should be 
called pseudo memory. The first byte of the 
address (38, 39, 3A, or 3B) simply connects 
the keyboard output lines to the micropro- 
cessor. The second byte of the address, 
which ranges between 00 and FF, selects 
the key row to be read. For discussion or 
scanning purposes, the keys are arranged 
in an 8 X 8 matrix (or map) as shown in Fig, 
1. It is convenient to call one matrix index R 
(for row) and the other C (for column). This 
description reflects the electrical connec- 
tions but is not related to the physical rows 
of the keyboard. 

Each key is simply a switch which, when 
pressed, will connect its row conductor to 
its column conductor. Each row is ad- 
dressed by one bit of the low byte of the 
memory address. Hence, 3801 H has bit 
set (2° = 1), and thus addresses row 0. 

The row addresses, are as given In Fig. 2. 

In scanning the keyboard for input, ROM 
Simply addresses each row in turn, thereby 
sending a signal to the row, and looks to 
see which column (if any) is activated. The 
eight columns become the eight bits of the 
output data byte. When a single key Is 
pressed, the data byte will have only one bit 
set. The decimal value of the byte must be 
either 1,2,4,8,16,32,64, or 128 (decimal). It is 
a simple matter for ROM to figure out which 
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Fig. 1 Keyboard Matrix 
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Fig. 2. Keyboard Memory Addresses 
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MODEL III DISK KITS 

TWO 40/track drw* kir and hardware Copnaa 
complete with all the n«caaiary tiardware and 2 
drpvea of your choic*, (MPI or TANOON 40 
tree*) NO SOLDERING OR TRACE CUTTING 
ReOUIHEDi COMPLETE EASY TO FOLLOW 
INSTRUCTIONS INCLUDED ITS-M 

TWO 80/track drive kit and hardware. Same at above I.OM.OO 

ONE 40/track drive kit with all hardware ar>d your choice ol MPI or TANDON 40/ 
track drive (INSTRUCTIONS INCLUDED) SM.M 

ONE BO/track drive kll wNh all hardware and one MPI 80/lrack drive No loldMingl 

(INSTRUCTIONS INCLUDED) SN.n 

TRS-aO MODEL III, 46K. 2 40 Track TANDON or MPI drives a,OH.n 

TRS-SO MODEL III. 4aK. 2 80 Track MPI drive* 2.328.M 

1 YEAR WARItANTV 

16 K MEMORY 19.95 

MODEL I. Ill APPLE AND EXIDY. Instructions included 
(MOD 1 Keyboard requires jumpers. $2.00 extra) 

ARCHBOLD SPEED-UP MODIFICATION FOR MOD I 
TRS-80. RUN UP TO 300% FASTER CPU SPEED! SPEED UP 
SLOW PROGRAMS WITHOUT SOFTWARE! 45.00 

MONITORS 

Black and White Monitors 12"' (TECO) 129.95 

Green Phospher Monitors 12" (TECO) 159.95 

AMDEK Black and White 12" Monitor 159.95 

AMDEK Green Phopher 1 2" Monitor 100G 189.95 

MODEL I DISK DRIVES 

These drives come complete with power supply and chassis. 
90 day warranty on disk drives. ALL DRIVES COMPLETELY 
TESTED PRIOR TO SHIPPING! 40 track drives are fully 
compatible with TRSDOS, NEWDOS-80, LDOS etc. 
Fully compatible with the PERCOM DOUBLER and Double 
density! 80 track drives require MAKE-80 program to run 
regular software. {SPECIAL! GET A FREE 2 DRIVE CABLE 
WHEN BUYING 2 or more DRIVES!) 

40 TRACK MPI or TANDON DRIVES 319.95 

80 TRACK MPI 439.95 

DOUBLE SIDED 80 TRACK MPI 579.95 

2 DRIVE CABLES 25.95 

4 DRIVE CABLES 35.95 

SPECIAL DOUBLE SIDED CABLES (CALL $) 

MAKE-80 CONVERT 40 TRACK TO 80 TRACK. 
(SPECIFY MOD I. Ill) 29.96 

DISKETTES 

SPECIAL: Brown Bag Diskettes (Verbatim) Bag ot x . 49.95 

SPECIAL: Brown Bag Diskettes 100 Quantity 214.00 

VERBATIM DATALIFE DISKETTES Bo- omo 32.50 

VERBATIM DATALIFE DISKETTES lOOOuanirty 275.00 




SPECIAL DISK HOLDER 



Holds 50 Diskettes 
Reg. Price $35.95 
SPECIAL 



•21.95 



PERCOM DOUBLER II (Includes DBLDOS) Doubles storage 
on Model I disk drives. Installs in Exp. Int. in minutes! Will not 

eflect normal operation! 189.95 

NEWDOS-80 (New Version 2) 139.95 

LDOS 139.95 

DOSPLUS 3.3 B9.9S 

(Specify Mod I or III) 



LYNX TELEPHONE MODEM 

AUTO/DIAL AUTO/ANSWER- 
COMPLETE WITH SOFTWARE AND 
HARDWARE FOR MODELS I AND III 
The RS-232 is not neededl Completely 
assembled. LYNX MODEMS are compatible with 

ST-80 III also 299.96 

ST-eO Ml: Smart terminal program. Allows saving data to disk 
or sending data from disk and more! Mod I or III ... 149.95 




PRINTERS 

SPECIAL: FREE CABLES AND FREE SHIPPING 
WITH ALL PRINTERS! 

CABLES FOR MODEL I EXPANSION INTERFACE. MOD III 
or PMC-80 EXP 100 or PIF-40 only.) 
PLEASE SPECIFY WHICH COMPUTER! 



HIGH QUALITY DOT MATRIX 

EPSON MX-80 (Tractor feed only) 

EPSON MX-BO FT (Tractor and Friction feed) 

EPSON MX-70 (Tractor feed only) 

EPSON MX-1 00 (Tractor and Friction feed 14.5 wide) 

EPSON MX-80 Hi-Res Graphics Option 

Add-On Friction Feed Adaptor for MX-80 or MX-70 
OKIDATA MICROLINE 80 (Friction and Pin feed) . 
OKIDATA MICROLINE 82 (Friction and Pin feed) . 
OKIDATA MICROLINE 83 

(Friction, Pin and Tractor feed 14.5") 
OKIDATA MICROLINE B2A. 120 cps 

(9x9 matrix w/descenders) 
OKIDATA MICROLINE 83A. 120 cps 

(9x9 matrix w/descenders) 
TRACTOR FEED ADAPTOR for 80 and 82 



539.95 
639.95 

419.95 
696.96 

89.95 

59.95 

414.95 

597.95 

897.95 

629.00 

925.00 

75.00 



LETTER QUALITY PRINTERS 

The C-itoh Daisy wheel printer is one of the finest Letter 
Quality printers we've seen WHY PAY MORE FOR LESS??? 
Exchange Daisy wheels to get the kind of printing fonts you 
need. 12-10 pitch. Excellent with Scripsit or Electric pencil. 
Let's face it, sometimes dot matrix doesn't hack it! (You can 
use standard Diablo Carbon ribbons with the C-itoh to get 
crisp "COPY READY" printouts!) 

C-ITOH DAISY WHEEL 25 CPS 1,796.25 

C-ITOH DAISY WHEEL 45 CPS 1,995.25 

C-ITOH TRACTOR FEED 219.95 



PMC-80 COMPUTER 

16K LEVEL II Fully compatible with 
all TRS-80 Mod I Software 595.95 
pMc-n coMPunn iw levil h 

with uppor/lovrar caaa Uppor/towsr caw 
drivw in ROM Auto key rep«at Numaric kaypad 
4 programmabte kvyi Built in apeakar 100% Mod I tottwart compatibia iTff.M 
EXPANOen 100 PMO aipanaion intarlaca 32K. dttk controllar. prinlar in(*rlac« 

(EipandsPMC-80/B1 to4eK) Wt.M 

HF-WODULATOn tor PMC or TRS-60 to TV Hook-up Complataty asMmblad aiv] 
taatad (Plug* in Vidao pori) UHF CH 33 t».M 




TRS-aO Disk and Ot^ar MyHsries Book 132 pp 22.S0 

Microsoft Basic Decoded and Oth«f Mysteries, 312 pp . 2i.as 

CuMom TF)S-80 and Other Mysteries 300 pp 2S.I8 



CALL TOLL FREE: 800-528-1149 



NO SURCHARGE FOR VISA. MASTER CARD OR AMERICAN EXPRESS" 
(10% DEPOSIT REQUIRED ON CO D S OVER (200 001 Send Cerlit^d Chech 
Mor>ey Order or Check 

►^19 



4877 E. SPEEDWAY 
TUCSON. AZ 85712 
(602) 32^9391 



INC. 

CALL FOR 

FREE 100* PAGE 

CATALOG!!! 



TRS-«0 IS ATM Of TANDY CORP PMC-«0 IS TM OF PERSONAL MICROCOMPUTERS 
PRICES AND SPECIFICATIONS ARE SUBJECT TO CHANGE WITHOUT NOTICE 



r'St* UsI ol AOnrtisers on page 402 
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Wages 

Is 
Here 

FORTHETRS-80 

• Wages MEETS PAYROLLS 
► Wages IS GUARANTEED 

» Wages COST ONLY 

$35.00 FOR MODEL I 
($45.00 FOR MODEL II) 



FROM 
The Maine Software Library 

P.O. Box 194 ►'^M 

Standish, Maine 04084 

'A Trade name of the Tandy Corp. 



HOW LOW 

Canweco?! 

8 Premium 
16K Dynamic rams: 

$19.95! 

These top quality, high speed, low power 
RAMs expand memory In TRS-80' l/ll/lll 
and Color Computers. Heath H89, Apple, 
newer PETs, etc. Backed by one year limited 
warranty. Add $3 for two dip shunts and 
conversion Instructions for TRS-80* I. 

Why pay mora. . .wa stock tfw rfght partt 
at tha rtght prica. 

'm^AD la t Bvovnai if m lattfi llflipaahe 

TfffHtr Cal Its ah r«i Alio* r i*ui ^X ■^•Mllng. trc«M 
'■iuno*d VISA* /UiitvcHd ■ ofdf t oil 44i>| Uta-mM. >4 hour« 

*>i>%oui noiicv 

ConfipuPro" 

KK Z3S5^ OAKLAND AHPOnr. CA VMM 



^T6 



'This bit of magic 
served as an incentive." 

key it was. You try It. 

Suppose you PEEK(3804H) and get a re- 
ply of B (decimal). Which Key was being held 
down at the time? Address 3804H means 
ROM read row 2 {2' = 4). Data byte 8 ( = 2*) 
means the column of the key was three 
which makes the key "S". 

So much for single key presses. Now try 
an experiment. Type in PRINT PEEK(14337), 
but before hitting Enter, press and hold A 
and B simultaneously while you backspace 
twice and enter (still holding "AB"). Why 
does the computer respond 6? Did It add the 
2 for A to the 4 for B? Not exactly; it OR'd 
them. 



OR 

Yields 



00000010 
00000100 



00000110 6 

Isn't that the same as adding? No, 
look at: 



OR 

Yields 



00000010 
00000110 
00000110 



For our present purpose since each key in a 
row sets only one bit in the data byte, the ef- 
fect will be the same as adding. If the row 
data byte is 6 (tor AB), how does ROM know 
it is supposed to print either A or B? 

Glad you asked. ROM uses seven memo- 
ry locations {4036H through 403CH) to store 
the data byte for each of the rows except 
the last (which contains only Shift). With 
each scan of the keyboard, the new byte for 
each row is compared with the byte from 
the previous scan. No action is taken if they 
are the same. If they are different, the 
previous byte is masked out and the result 
is output. 

Note that Shift is treated differently since 
there is no reason to separate it from keys 
pressed simultaneously. Bui that's another 
story. 

If you really manage to press the two 
keys close enough in time for ROM to see 
the events as simultaneous, then ROM will 
not be able to strip the extra code properly. 
It will happily take the lower of the bits re- 
maining after the attempt. 

Latter Substitutions 

This still disesn't explain the weird letter 
substitutions or what happened to the ad- 
dresses in between 3801 H, 3802H, 3804H, 
3808H, and so forth. The missing addresses 
represent combinations of rows, which 
might conceivably be useful if you wanted 
to use some exotic password or command. 

The substitution sleight of hand stems 
from a sneak path in the electronic circuit. If 
you hold keys from a given column but In 
different rows, all of the columns activated 
in any row appear to be activated in all the 
Involved rows. 



For example, it you own a utility that is 
activated by holding 123, try holding ABC2 
instead. It works. Looking at Fig. 1 you can 
see that ABC1 or ABC3 would have worked 
just as well. Believe it or not, even "Clear/ 
Breakyti" do the job. 

A set of keys in one row defines the col- 
umns involved, and one more key links the 
rows together. Now you see why "10 Space" 
clears the screen. I and activate columns 
CI and C7. Space makes sure that when 
row 6 is scanned, it too appears to have 01 
and 07 activated. 

ROM knows the previous data byte for 
row 6 was 00, so it doesn't strip anything. It 
is quite content to take the lower of the two 
activated columns, which (for row 6) is 
C(e«r. 

More Mysteries 

This bit of magic served as an incentive 
to wend our way through the keyboard 
mechanism. It gives some insight into how 
wizards use multiple key codes, and it pri> 
vides a little Halloween fun. 

If you are interested in PEEKIng at the 
keyboard memory, you must arrange it so 
that Enter Is not the last key hit. Program 
Listing 1 will do this, formatting the display 
in lines 16-bytes wide and identifying the 
first address of each line. 

You must press a key and hold it while 
the display is printing, or press several keys 
together. 

If you are curious about the remainder ol 
the keyboard memory (3900H through 
3BFFH}, insert lines 

35 For K = 1 TO 4 PRINT 
105 NEXT K 

You wilt find that the next three pages are 
identical to the first page. They exist only 
t>ecause of a shortcut In the row-addressing 
scheme. 

If you are intrigued by the ROM 
mechanism in stripping off previously held 
keys, try disassembling 03E3H through 
03F9 in ROM, It's only 23 bytes. 

Ask your computer what turns it on. Hold 
down in this order: I F M N Space O.H 



to DEFINT A-2 

20 KJ = INKEYJ . IF KS = " " THEN 20 

30 M = 14336: I = M: N ^ 14351 

40 FOR J = 1T0 16. PRINT 

50 PRINT); 

60 FOR I = M TO N 

70 PRINT PEEK (I); 

80 NEXTl 

100 M= M + 16:N= N + 16 
110 NEXTJ 
120 GOTO 20 



Program Listing. Active Keyboard Display 
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WtEBFACTS: 

lEfcES55, TRS80 J3ft. 

AI^PLE IHT£PFACt i CABtE SOOi 



n 

» W9 



We Accept C.O.D.'s 
No Surcharge lor Credit Cards « 



■ Stock Shipments Same Day or Next 
All Equipment Factory Fresh with MFT Warranty 



OKIDATA 
APPLE 

TELEVIDE 

COMMODO 
RADIO SHA 
AMDEK 
QUME 



Ml 




iNTenrec sup6wbwwc4K ram 

QOSUPERBRAIN 

NtC 5610 SPlNWRtTER {/7IC1 

NEC 5520 SPtNWRiT£Pl7- 

NEC 55S0 SPirfARITER/.' - Jt 

NEC12- WONITOH ^? 

OKiOATAMlCROLlNe-ftn 

OKIDATA MICnOLINE-e. 

OKIDATA MtCROLlNS* 

01ABLO630 

APPLE II PLUS 46K 

APPLE DISK w;3.3 I 

APPLFDiSKw.oComr 

HAZElTINE 1420 

NORTHSTAR HORIZON It 32K OR 

ANADEX [)P.950af9fiOl 

;LCVtDEO01?C 

■LEVIDE0 9»)C 

ELEVI0EO950 

CBM 8032 COMPUTER 

I CBWnsO DISK DRIVE 

CMW2 COMPUTER 

I C « l» mM l] DISK DRIVE 

»M't022 
LVIC.20 
TO SHACK II &AK 

InM^i^HACKHIieK 
uEcDt/wAMOEK 100 
LEEDEXAMDEMOOG 
rLEEDEX'AVDEKCOLOai 13 -Coior MomiOf 
: MICROTEK ICK RAMSOAflD for Atai : 
MICROTEK 32K 
OUME SPRINT W45iFu''P»n«i) 
ATARI 400 16K 
ATARI 82S PRINTER 
^ATAW 850 INTERFACE 
ATAfliaiOniSK DRIVE 

ATARI sog 



i279t| 
$?999 
$2346 
$2995 
S234S 
3 229 
S 399 
$ S20 
S 789 
$1095 
(1139 
% 52S 

$ 449 

$2920 
$124'3 

$ dd9 

$ 7?3 
$ 929 

«134« 
I102Q 
$1029 
$ 649 
S 269 
S324S 



949 
139 

?9 
140 



S22?« 



3i9 
650 

449 

749 



mtCiSAHB SUBJ§CT 10 CM All^f W^MWT MOTICf 



C9t' tot pfice t'St of ATARI sod^sfo 
We carry trie coniCttte Uric ol Peteonii SoUwar* 



MUrilHilHMta^ 



WEST COAST 
1-800-235-S581 

OMEGA SALES CO. 

3533 Old Conejo Rd. <102 

Newbury Park, CA 91320 

1-805-4 99- 3€78 

CA. TOLL FREE 1-800-322-1873 



alMEGA 
8ALEB 

CO. /;i' 



\X'i^ 



EAST COAST 
1-800-556-7586 

OMEGA SALES CO. 

12 Meeting St ■ 

Cumberland. Rl 02864 ■ 
t-401-722-1027 



OMEGA SALES COMPANY 



UTILITY 



A machine-language 



I 



?r. 



Purezzap 



Purezzap 

Compulsr Coniultanta 

Downey, CA 

W.R. Stanley 
City Rte. 5 
204 Avery Lane 
La Grange, QA 30240 



Just as there are monitor programs 
available for cassette users, there are 
several monitors that allow the disk user 
to analyze and modify programs on disk. 

Two disk-based monitors that come to 
mind are Superzap by Apparat, and Purez- 
zap by Computer Consultants. 

Superzap Is loaded and run under Disk 
Basic, and some of Its functions are slowed 
by dependence upon the Basic Interpretive 
process. This In no way detracts from the 
technical accuracy and wide capabilities 
of Superzap. 

Purezzap is a machine language pro- 
gram that takes much less time to bring 
up, and its overall operation seems to be 
smoother because of the smaller time lags 
encountered. 

For the one-drive owner, the entire pro- 
gram should be initially loaded into RAM 
so that a program of interest on another 
disk can be manipulated by inserting that 
disk Into the same single drive. 

The monitor program should allow the 
user to specify any desired track and sec- 
tor location to be examined, instead of 
always starting at track 0, sector for al 
functions. This will. save a tot of wear am 
tear on both the disk drive mechanism anc 
the user's patience. 

The monitor should also permit e; 
amination of an entire sector at a timt 
with a pleasing and functional formt 
displayed on the video screen. Cursor cO' 
trol should be versatile so that a partlcul 
byte displayed can be specifically desi 
nated for modification as necessary. 
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The user should be able to step the drive 
(and display) in either direction from the 
current sector location to an adjacent sec- 
tor without returning to a menu and re- 
entering a whole string of commands and 
options. This saves considerable time in 
examining the many sectors storing a 
lengthy program. 

Since we might also be interested In 
making minor changes to Basic programs 
on disk, an ASCII-equivalent dump of the 
256 hexadecimal bytes In the sector 
display Is of great help In locating specific 
program elements. 

This ASCII display assists in analyzing 
and locating certain subroutines in a 
lengthy machine language program be- 
cause many complicated programs use 
ASCII phrases for menu and error mes- 
sage displays. 

We want to not only transfer disk data to 
the screen (and RAM), but also have the 
capability of modifying specific bytes and 
writing the modified sector back to exactly 
the same disk location from where the sec- 
tor data was read out. There would be no 
point otherwise In attempting to modify 
bytes In a sector. 

Pur tzzap 

I rezzap comes on a formatted disk 

wh 1 contains only the monitor program 

itsi , a directory track and a boot. No 

D*"*' s on the disk; you must transfer 

ip to a disk containing at least a 

i disk operating system. The 

■'■•.• program Is furnished In this 

1 - - > protect the copyrights of others 

.^. . DOS programs. 

I •<. >cumentatlon furnished with 

' j-i jonslsts of a single page that ex- 

, .-> < unctions of the commands and 

' ■ > uded in the menu displayed on 

screen. 

'i-. ezzap Is loaded from disk, It 

. r .: -. il of the computer. That disk 

removed to make room for the 

. . amined. This makes It nice for 

, vho have only one drive. The 

- ■■^.. . ully capable of functioning 



with two drives, however, with the active 
drive designated by the user. 

When the program Is brought up, a com- 
prehensive menu is displayed. You can 
then choose any of several options such 
as reading a sector from disk, comparing 
two designated sectors, purifying the 
directory, zeroing unallocated sectors, kill- 
ing all system files to derive a formatted 
disk, computing hash codes, or jumping 
from Purezzap back to DOS. 

RMd and Write 

Several choices from the master menu 
will bring up sut>-menus that get down to 
specifics in configuring program opera- 
tions to arrive at desired results. For In- 
stance, pressing the R key (Read Disk Sec- 
tor) will replace the master menu with a 
smaller menu asking you to specify the 
drive, track and sector to be dumped from 
disk into memory and be displayed on the 
video monitor screen. 

After the Read function has been com- 
pleted, the full 256 bytes of the specified 
sector will be displayed In 16 lines of 16 
bytes each. The ASCII equivalent of each 
hex byte In that line will be to the right of 
each line. 

Along the left side of the screen you will 
see the current drive, track and sector 
numtwrs. Also displayed Is the relative 
byte number corresponding to the current 
cursor location. 

In addition, you will see a non-destruc- 
tive cursor blinking at the zero relative byte 
in the current sector. You will also see a 
blinking cursor in the ASCII equivalent 
segment of the display. As the main cursor 
is moved around on ttre screen, the ASCII 
cursor Is also moved to the corresponding 
relative location. 

Let's say that you have examined the 
dump of this sector and see the byte that 
you wish to change. Simply use the arrow 
keys on the keyboard to position the cur- 
sor over that byte. Then press the M 
(Modify) key. The size of the cursor will 
change. Indicating that Purezzap Is now In 



Now NRI takes you inside the 

newTRS-80 Model III microcomputer 

to train you at home as the 

new breed nc omputer specialist! 



NRI teams up with Radio Shack 

advanced technology to teach 

you how to use, prc^ram and 

service state-of-me-art 

microcomputers . . . 
It's no longer enough to be just a 
programmer or a technician. With mi- 
crocomputers moving into the fabric of 
our lives (over 250,000 of the TRS-SO"" 
alone have been sold), interdiscipli- 
nary skills are demanded. And NRI can 
prepare you with the first course of its 
kind, covering the complete world of 
the microcomputer. 

Learn At Home 
in Your Spare Hme 

Ulth NRI training, the programmer 
gains practical knowledge of hardware, 
enabling him to design simpler, more effec- 
tive programs. And, with advanced pro- 
gramming skills, the technician can test 
and debug systems quickly and easily 

Only NRI gives you both kinds of 
training with the convenience of home 





TVninlng laclndes new TIlS-80 Model III mlcro- 
computtr, 6-&iacdoii L(D Beckman mnldmctcr, 
and the NRI Discovery Ub with hundreds of tests 
and erperlments. 

(TRS-80 Is 1 irademark ofihc Radio Shack division of T^rtdy Corp ) 



Study. No classroom pressures, no night 
school, no gasoline wasted. You learn at 
your convenience, at your own pace. Yet 
you're always backed by the NRI staff and 
your instructor, answering questions, giving 
you guidance, and available for ^cial help 
if you need it. 

You Get Your Own Computer 
to Learn On and Keep 

NRI training is hands-on training, 
with practical experiments and demonstra- 
tions as the very foundation of your knowl- 
edge. You don't just program your computer, 
you go inside it... watch how circuits in- 
teract . . . interfxe with other systems . . . 
gain a real insight into 
its nature. 

You also work 
with an advanced liquid 
crystal display hand- 
held multimeter and 
the NRI Discovery Lab, 
performing over 60 
separate experiments. 
You learn troubleshoot- 
ing procedures and gain 
greater understanding of 
die information. Bodi 
microcomputer and 
equipment come as part 
of your training for you 
to use and keep. 



Send for Free Catalog. . . 
No Salesman Will Call 

Get all the details on this exciting 
course in NRI's fi^, 100-page catalog. It 
shows all equipment, lesson outlines, and 
facts on other electronics courses such as 
Complete Communications with CB, 
TV/Audio and Video, Digital Electronics, 
and more. Send today, no salesman will ever 
bother you. Keep up with the latest technol- 
ogy as you leam on the latest model of the 
world's most popular computer If coupon 
has been used, write to NRI Schools, 3939 
Wisconsin Ave., Washington, D.C. 20016. 




NRI Schools 

McGraw-Hill Continuing 

Education Center 
5959 Wisconsin Avenue 
Washington, DC 20016 



NO SALESMAN WILL CAU. 

Please check for one free caialog only, 

n Computer Electronics including 
Microcomputers 

□ Color Tv; Audio, and Mdeo System 
Servicing 

□ Electronics Design Tfechnology 
D Digital Electronics 
n Communications Electronics • FCC 

LicerKes • .Mobile CB • Aircraft • Marine 




Wl career courts 
approved uniier Gl hill 
D Check for details 



n Basic Electronics 
n Small Engine Servicing 
G Appliance Servicing 
n Automoiirt Servicing 
D Auto Air Condilioding 
D Air ConditiMiing, Healin 
Refriaeratiwi, & Solar Tfec 
G Building Construction 



(Please Prim) 



Slreet 



■ Cii>/ Slate/ Zip 

I tordited k the Accrediting Commisiion of the S'Sional Home Stud\- Council 
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COMPILER 
WORKSTATION 

TRS-BO Model [ and III 

Your BASIC program development 
could go fastor... 

EDIT. Fufl-Screen BASIC ediloc wilh (toalir>fl cursoi and auto- 
repeal More Iftan 30 commanas arfl lunclions lei you var- 
wusly lind. change, irsen Qefele replace replicate, copy. 
iTKne Of posElion BASIC teil al The c^al*cler slimg. line or 
Diock level Ocveloped ifi Bnlam Dy Sojtnern Soflwtre MoCI. 
Ill i40 00+ 1 50sliippifig 

PItCKEH [Cottage Software) fcditing tool will unpack shorten. 
tepacK. renum&ei all 0' part o' yojr BASIC teil The UNPACK 

^menl is v»y uMt'j' wtien o'BQanng BASIC source pro- 
gra-ns 'or co-np'latwn By ACCtLJ Mod I N S?9 95 + 1 00 

Sfiipping 

Then your BASIC program 
could go faster. . , 

ACCEL?: COdipiledor TRS BOMoai.MWI'l Osk BASIC New 
tunctcna) inprovemenls in ptace lo give more easeol-us* 
quickef comprialionoHarge pfogfams. [)eller c^alnlF^golconl- 
pited and non-compiled programs Size reaO-ou! Mps you 
mortilorcodegroYKtri (luring compilation REM NOARRAY option 
lets you use variable Dound arrays Pro'essmnals note Com 
prehensive in sir jettons stiow how to organize yojr compriefl 
programs for resale on lape tS/F water or disk No royalties' 
De^-eiopeO in B'llainoy Soultiern So'Tware SpecrtyModlo'lH 
S88 95-ti2 00 snipping 

TSWt Writes compiler Qiilpgt to independent SYSTEM lape 
S9 3b*f} 00 shipping 

EJEC Command-List Piocessor to' THS-80 Mod 1 Prepare. 
e»ecule. pass as many as nine parameters lo lists ol TRSOOS 
or ^EWDOS tommands and/or BASiC staJer^ents Simcuifies 
reoelilive p'oceoures sued as powe'-up sequences We sel- 
lips etc Compatible wilti ACCE1.2 compiler disk output 
Developed m Britain Dy Soulfiem Sollware l!7 00 -f S1 00 
shipping \' ^^g 

w Allen Geldar Sottwsra 

M/C.ViSA K Box 11721 Main Post Bffica 
CAaad6% \\ San Francisco, CA MIDI 
^*J. 1*15) 387-3131 

THS-80. TRSOOS im Radiu Shack tS/F im Ijatron 



"You can get in trouble very fast 
by zapping bytes on a disk 
without i<nowing what you are doing. 



the Modify mode. 

Type In your desired byte value at the 
current cursor position. The byte display 
at the current cursor location wilt change 
as you enter the new value. If this is the 
only change to be made to data in this sec- 
tor, press W (Write). 

Another sub-menu will now appear, of- 
fering you, among other things, the option 
of writing the edited sector bacit to disk. 
This Intermediate step reduces errors in 
writing a modified sector to disk twcause 
you must request a Write operation on two 
separate occasions before that operation 
will actually occur. 

While still In the Read mode, you can 
use the Search command to locate the 
byte you want. Simply type S, followed by 
the byte value you are looking for. if that 
byte is displayed, the cursor will be 
automatically placed directly over It. 

To search the remainder of the sector 
for that same byte value, hit the S key 
again. The cursor will then indicate the 
next occurrence of the byte. When the 
search function turns up no further loca- 
tions for that byte, the cursor will auto- 
matically return to the zero-relative byte 
location. 

Directory Cleanup 

Purifying the directory consists of zero- 
ing out all killed directory entries. Thts 
makes it easier to find the entry data for 
the program of Interest. 

Zeroing unallocated sectors Is helpful 
for transferring programs back and forth 
t)etween locations on one or two disks In 
the modification process. You usually end 
up with the same sector data in two or 
more locations on the same disk, but the 
data tn only one sector is valid. The other 
sector data is still accessible by the moni- 
tor because only the directory entry Is 
modified when a kill is made; the sector 
data itself is unchanged. 

This can be misleading to the unwary 
because, If Purezzap is used to hunt all 
over the disk for sector data, you have a 
good chance of seizing upon a dead sec- 
tor. The data in that sector looks just as 
you expect it to, so you go to great lengths 
to modify it. 

After that sector Is written back to disk 
and the main program Is run again, it will 
appear that your modifications were un- 
successful. This minor tragedy can be 
alleviated If all unused sectors on that disk 
were zeroed. 

Hash code computation is a mystery to 
most disk zappers, but it Is necessary to 
derive or verify the proper hash code when 
reconstructing the directory for a clob- 
bered file. This code is based on the values 
of the hex numbers representing the file 



name in a given directory entry, and It is 
stored in a specific position in the Hit table 
In the directory. 

The hash code is a pointer to twth the 
location and validity of a specific entry in 
one of the following sectors in the direc- 
tory track, if the code is Improper or miss- 
ing, the computer will not be able to find 
the file you request It to load. Purezzap will 
generate and display the proper hash code 
for any fiiespec you type in. 

Other Functions 

Sector comparison using Purezzap Is 
also very useful, especially when you are 
using two drives to reconstruct damaged 
sectors. This function still works just fine 
using one drive, though, because you can 
specify the drive, track and sector num- 
t>ers for the comparison operation. 

This is Initiated by Reading the speci- 
fied sector as before. Then the C key is 
pressed, bringing up another sut>-menu. At 
this point you designate the exact location 
of the sector to be compared with the one 
just displayed. The data from the second 
sector is loaded into memory, and the 
comparison starts. 

The relative byte number of the first oc- 
currence of a byte value difference be- 
tween the two sectors being compared is 
displayed, along with the values of those 
two bytes in their respective sectors. Hit- 
ting the C key again will continue the com- 
parison until the next difference Is en- 
countered. 

The kill function in Purezzap will change 
a system diskette to a formatted data 
diskette by killing all system files such as 
the SYSx/SYS, Basic and Format programs 
that are usually on a full DOS disk. The 
directory track and the boot sector are still 
available for use. Unchanged are all user 
programs and files present at the time of kill. 

Pressing J will Jump from the Purezzap 
master menu to the DOS currently in the 
computer, returning you to the DOS Ready 
prompt. 

Return from any function of Purezzap 
back to the master menu is done simply by 
typing X. This is not only for recovery from 
an Incorrectly entered command or param- 
eter, but returns you to familiar ground in 
case you and the progam get into foreign 
territory. 



Further Thoughts 

If you don't already realize it, you can 
get in trouble very fast by zapping bytes on 
a disk without having at least a general 
idea of what you are doing. A publication 
of immense value to the neophyte is Harv 
Pennington's TRS-80 Disk and Other 
Mysteries. ■ 
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MODEL III OWNERS 

LAYMAN'S GUIDE TO NEWDOS S5.00 

An easy to understand plain-engltsh guide to the 
most commonly used (by the layman} features of 

NEWDOS 80. 



CONVERT MODEL I SCRIPSIT 

TO MODEL III 

'RMHjmbflT Program Lines 

*l4ove Prooram lines 

'Move Slocks of Program Lines 

'Duplicate Program Lines 

'Selective Variable CIsaring 

'Program Single Stepping 

'Memory sort muili-dimensiooed arrays 



AND/OR VISICALC 

PLUS 

'Swap Variables 

'Read & Write to Mod I disks 

•Reference Keywords 

"Spool Printing 

'Change Disk Speeds 

*Dtsat]le BREAK and /or CLEAR 

'Much Much More!! 



All Of tfie above shipped with Apparats Newdos 80 2 
Regular $149.95 — Now only $129.95 (Mod III only) 

COPY MODEL III SCRIPSIT AND VISICALC S15.00 

Allows UNLIMITED BACKUPS Of your Master Disk. 
Works If you have already backed up twice. 
Comes as a simple 17 line basic program. 

ST800 PATCH $15.00 

Makes your Model I ST80D work on Model III. 
Comes as a simple 30 line basic program. 



iS 



VISA - M<-istercard - Money Orders - COD 

Allow 2 weeks for persoru! checks 
Kansas residents add 3.5% sales tax. 

X. K M 526 East 4th, 316-665-3611 



'X'J&,Z]WC^ 



Hutchinson, Ks. 67501 



^ 1*3 



\m 



Don't pay High Prices 

for TRS^O® 
Computer Forms 



Gat top quality ft fast service 
at ttM lowast prices, from NOS .. . 
Your satlsfoctkHi guaronteed 

Sernj today for information on NEBS continuous 
INVOICES, STATEMENTS, PAYROLL CHECKS, 
ACCOUNTS PAYABLE CHECKS and more ... Designed to 
fit Radio Shack™, TRS-80* Software. 



LOW PRICES 
MST SERVICE 



AVAILABUm 
SMAUQUANTfTIB 



MOMEYIACK 
OUARANTS 



Pi9as9 ruth Intonnatlon to: 



NAME. 



COMF*NY . 

STHEET 



CITY, STATE •nd ZIP . 



C^^ 



l_ 



CODE 45460 



Forms "" 

78 Hoilis Street. Crolon. Mass. 01471 

AdtvMkiniX 

Nm EngkM BuwnMi SwMca. mc 



._J 



WE HAVE A PROBLEM 
DVITH OaR SOFTWARE 

The problem is that it is underpriced! Potential buyers don't believe the 
accounting software has nnuch capability at $450, so they buy software with less 
capability at $1000. 

What do the ones who buy it say? 

"I have become more and more convinced ... it 
is one of the best bargains available . . ." 

80 REVIEW. 80 MICROCOMPCJTIMG, June 81. 

"The single data diskette writh common files is 
really convenient . . 
Randy Bemis , Bemis Construction, San Diego. 

"I recommer>d MICROED software for my com- 

puter customers." ^^^^^ ^^^^ President. 

ZOBEX Computer Systems. 



THE BUSINESS SOFTWARE NOW AVAILABLE 

GENERAL ACCOUNTING PACKAGE $450.00 

G/L, A/R. A/P 

INVENTORY I $250.00 

PAYROLL $250.00 

Sy«em reqoiromBnls CP/M. 64K memofy. two dM drfws. 132 cokimi 

pnnter 

TRS-80, Model II SOFTWARE NOW AVAILABLE 
1.4 CP/M Special $90.00 

Single or double density auto-select 

SMARTERM $50.00 

Versatile terminal program, requires CP/M 

CP;M. T,M. o( Digdal RMearch TRS-80, T M o( Tandy Corp- 



We are dedicated to selling quality business software at reasor«ble prices. 



Dealers, we have a deal for you. 

Write or Call 



MICROED 



3910 BANDINI STREET, SAN DIEGO. CALIFORNIA 92103 - (714) 299-1125 




►'Sffe Lisl ol Atti/ailisers on page 402 
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UTILITY 



Say, disk users, here's a sexy sector inspector. 



Simplezap 



David Safford 

887 Linda Lee Circle 

Lemoore, CA 93245 



This simple Basic program 
aliows direct sector input, 
examination, modification and 
output. To understand how the 
program works, you need some 
elementary disk theory. 

A floppy disk Is organized 
into 35 concentric tracks, and 
each track is divided into 10 
sectors. Each sector contains a 
header which tells which track 
and sector It is, followed by 256 
bytes of data. Any DOS must 
have routines that read and 
write these 256 byte sectors 
directly. The higher level DOS 
functions take these physical 
records and translate them to 
logical records or files as 
necessary. 

Ail current Model 1 versions 
of TRSDOS locate these rou- 
tines on memory page 4600- 
46FF (hex). Memory page 
4600H is loaded from track 
sector 7 during bootstrap, 
which Is why any change must 
be made to this critical sector. 
Page 4600H contains all the 



subroutines to select a disk 
and start Its motor, seek the re- 
quired track, then read or write 
a specified sector, in assembly 
language, accessing these rou- 
tines Is extremely easy. The for- 
mat Is: 



C - Qrlva I (00-03 H) 
D = Track • (00-23 H) 
E = SKtor • (00-09 H) 

HL-2S6 byt« RAM buffer 

CALL 4600 for read sector to buffer 

CALL 4eE6 tor write sector from buffer 



My Basic program simply 
POKES the machine language 
routine Into memory, calls It 
with the USR function, and then 
calls Debug to examine and 
modify the sectors in memory. 
After returning to Basic from 
Debug, the program can use 
the machine language routine 
to write the sector back to disk. 

How to Um tt 

• It Is not necessary to re- 
serve memory tor the buf- 
fer—the program uses so little 
memory that judicious selec- 
tion of the buffer address (I.e., 
7500H-7A00H) will keep It clear 
of the Basic program and the 
processor stack even In a 16K 
machine. 

• The program first prompts 
for the 256-byte buffer address. 
The program will always locate 
the buffer at the start of a page 
address; If you Input 8160H, the 



buffer will actually be located 
at eiOOH. This allows Debug to 
display the entire sector as one 
full page of memory. 

• The "Drive, Track, Sector" 
prompt asks for decimal in- 
puts—drive (0-4), track (0-35), 
sector (0-9). Once entered, the 
computer loads the sector to 
the buffer location and calls 
Debug. 

• After examining and modi- 
fying the sector with standard 
Debug commands, type "G" 
(enter) to return to Basic. 

• The program will then ask if 
you want to write the buffer 
contents to disk. Entering "E" 
will stop the program and return 
to Command Level Basic. This is 
the only way to exit since the 
break key will only execute 
Debug. Entering "Y" will write 
the sector; any other track sec- 
tor prompt. Any entry other than 
"Y" will jump the program back 



to the drive, track, sector prompt 
without writing the sector. 



• Once the program and 
Debug have been called into 
memory, any disk can be 
substituted In drive for ex- 
amination or modification as 
long as they are formatted. 
Therefore, even single drive 
systems can use the program 
to restore bad directories or 
otherwise defective disks. The 
only irreparable defect is one in 
which the disk Interface chip 
cannot find or read the sector 
header, if the interface cannot 
positively identify the re- 
quested sector by its header, it 
will lock up. 

This program makes sector 
I/O on a TRSDOS system easy. 
Since the program is in Basic, 
modifications are relatively 
simple to make. ■ 



le DATAK, e, 22, >, 31, >,]!,•, 126, 195, 221, 7fl 

2» H;-*ei234S67a9ABCDEF- 

3fl CLSiPRim'SECTOR I/O PROGRAM* 

41 IKPUT'ENTEB BUFFER LOCATION [HEKl'iAS 

Sfl A-fl:FORI-lTOI6:FORJ-lT04 

61 iniIQS(AS,J,l) -HID$ (BS,I,1] TBBHA-A+II-DilfiKi-J) 

Tl NEXTJiNEXTIiA-I(rr(At,S| i C-INT( A/256*. S] t IFA>]27GTTBEtlA-A-6553 

6 

SB P0XI'flTOll:R£ADB:PDKE(A*2Se+I} ,B:NEXTI 

91 DEFU&Rl-A+2SGiPOXEA+ZG4,C 

lis CLSlINPUT'ENTER DRIVE(0-4) rTHACXt >-34| ,8ECTaR(e-9) ' (D,T,S 

111 POREA+257,D:POKEA+25 9,TiPOKEA+2«l,S 

121 PRINTUSRl(B) i CLE 

13B CBD'D" 

14B CLSi"IKPUT"OUTPUT UPDATED SECTORIY/S/E) - rAS-"E" THEN STOP 

ISe IPASO'Y'THEMlii EL£E IF T-IT THES 1-239 ELSE I-23B 

169 POKEA42ee,IiPRIHTUSRl(a] iCLSi POKEA+26S, 2 21iGOTOiaB 
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INTERFACE 



This mod rolls 16K of RAM over your ROM operating system. 



ROM Roll-Over 



Geary Ketch 

23 Mapledale Avenue 

Glen Burnle. MD 21061 



If you are concerned with ma- 
chine-language programnning 
or would like to add 16K or Ran- 
dom Access Memory to your 
TRS-80 without buying an ex- 
pansion interface, you should 
be interested in this hardware 
modification. It Is straight- 
forward, inexpensive, and 
takes less than eight hours to 
build and debug. And it may 
give you a new perspective on 
your TRS-80's basic operating 
system, whether you have a 
Level I or a Level II machine. 

By adding four chips and a 
16K bank of 4116 chips whose 
address can be externally 
relocated anywhere in memory, 
you can replace your TRS-80's 
ROM with more versatile RAM 
memory. With this modification 
you can overlay the TRS-80's 
ROM operating system with 
your modified version, or with a 
totally rewritten one contained 
in the Random Access Memory. 



The existing ROM Is taken out 
of the circuit when this overlay 
is performed, and system con- 
trol passes to the program 
contained in the added 16K 
memory block. Then you are 
able to dynamically change or 
replace part or all of the 
TRS-80's ROM-driven operating 
system. 

Let me explain how this op- 
eration works. First, the TRS-80 
has its operating system and 
Basic interpreter In Read Only 
Memory occupying the lowest 
memory addresses. The Level i 
takes up the first 4K of memory 
space from address 0000 to 
OFFF (hex). Since this is ROM- 
type memory, its contents are 
unchangeable. The same is 
true for the Level II system, ex- 
cept it occupies the first 12K or 
memory address range 0000 to 
2FFF{hex). This modification 
can replace the inflexible Read 
Only Memory with the prefer- 
able Random Access Memory. 
The simplified logic diagram in 
Fig. 1 shows how the chip 
select circuit can make this 
change. The circuit involves 



two 7400 chips, one 7406, one 
7442, a single-pole-sjngle-throw 
switch, and a bank of eight 
4116 RAM chips, at a cost of 
less than $40. 

The rest of the circuit is used 
to generate two chip select 
signals— one for low memory 
(0000-3FFF), the other for high 
memory. The high memory ad- 
dress can be any of three re- 
maining 16K blocks, but the 
circuit shown In Fig. 3 is ad- 
dressing locations 8000-BFFF 
(hex) as high memory. Also, 
since the entire layout can be 
wired in the keyboard, it is not 
necessary to have an expan- 
sion box. That Is what makes it 
a great way to add an extra 16K 
to your machine at about the 
cost of the memory chips 
alone. You will, however, void 
any warranty on the system. 

The trick to making this 
change easily is in adding the 
eight memory chips to the cir- 
cuit with as few lines as pos- 
sible, it can be done by solder- 
ing the new 41 16 chips pin-for- 
pin directly to the existing 
memory, piggyback style as in 



Fig. 2. This should be done us- 
ing a low-power Iron and solder- 
ing only a few pins at a time. 
The memory chips must be re- 
moved from the sockets before 
any soldering is started. Pin 15 
of the upper chip in the pair 
should not be soldered to the 
corresponding pin of the lower 
chip, since this Input will be 
used as the chip select for the 
16K bank. These pins will be 
connected to the chip select 
logic generated by the four 
gates comprising the rest of 
the circuit. Once all the memory 
pairs have been soldered, with 
the exception of each pin 15, 
they can be replaced In the 
sockets. Make sure they are in 
the proper orientation. 

The chip select circuitry that 
will feed pin 15 of the added 
chips is shown in Fig. 3. The 
pins used are noted, but if you 
have a Transistor-transistor 
Logic handbook, you may want 
to change the wiring slightly to 
make it easier for yourself. The 
logic, however. Is in its simplest 
form and the gate count cannot 
be reduced. Location of the 



, CHIP SELECT HI 
132-48K)^ ^^ » SWI 

, , CHIP SELECT LO 
(0-I6K) ^ 




DATA IN 



JTL 



PIN 15 



/ 



DATA OUT 



SOLDER 

FILET 



Fig. 1. Chip select circuitry for relocatable 16K bank of memory. 

Switch SW1 selects one of two chip select signals determining the Fig. 2. Pin 15 used for chip select of upper bank, bent away from 

address of the RAM memory block. others to avoid shorting to pin 15 of lower chip. 
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THE NEW LAREDO LS525. 

WHEN YOU'RE READY 

TO GET DOWN TO BUSINESS. 



Laredo Systems, Inc. introduces the 
LS525 five megabyte rigid disk memory 
system For TRS80 Models I and III. 
Laredo's LS525 rounds up a Seagate 
ST506 Drive. LDOS Operating System by 
Logical Systems, and Laredo's own LSI 




500 Series Controller into a single-board 
controller that emulates the famed IBM 
3370 disk system, complete with: 
• Improved read/write/seek access time 
through full block buffering and variably 
tuned interleave. 



• Onboard data separator, micro-code 
diagnostics and write-precompensation. 

• Increased disk media reliability and 
data integrity with automatic defect block 
allocation and extended ID fields. 

• Versatile CPU compatibility provided by 
separate host adaptor. 

Introductory Offer To TRSSO Users. 

Now through October 1 , 1981 buy the 
LS525 for the OEM/dealer price of 
$2990. a savings of $760 off the usual 
suggested retail price of $3750. 

LDOS Operating System 
with manual and diskette 
available for $149. 



For more information about the LS52 5 
Memory System and the LSI 500 Series 
Controller, contact: Laredo Systems, Inc. 
2264 Calle de Luna. ^^6 

Santa Clara. CA 95050 
(408)980-1888 




kircEClo ^9>tam^ Inc. 



^See List of Advertisers on page 402 
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Fig. 3. By mounting the 74s on the back of Integrated circuits 
Z36<->Z39. wiring complexity and lead length will be kept to a 
minimum. 



Chips and the method of wiring 
them Is up to you. In my system 
everything was done as simply 
as possible to keep cost and 
lead length down. By Inverting 
the chips and mounting them 
upside down on the backs of 
236-Z39 as shown in Fig. 4, your 
leads may be soldered directly 
to the integrated circuit pins. 
Mounting the chips in the posi- 
tion minimizes lead length and 
eliminates crossing wires which 
helps to keep down noise. If de- 
sired, a small circuit board may 
be mounted to hold the four inte- 
grated circuits. 

Trouble Shooting 

To make trouble-shooting 



easier, there are a few func- 
tions of the circuit that should 
be discussed in detail. The first 
deals with the memory address 
selection. As mentioned 
before, the add-on memory may 
be switched from a low to a 
high address via an external 
switch. SW1. The 7442 gate 
does the address decoding 
enabling chip selection. It is a 
4-inlO-out binary decoder. By 
running A14 and A15 of the 
TRS-80 address bus to its two 
LSB Inputs, you get 16K bank 
select signals at the output 
pins. The output's least signifi- 
cant bit, which is pin 1 of the 
chip, must be used as shown 
because it is used to select the 



RAM when il is in the low posi- 
tion. However, any of the other 
three chip select signals (pins 
2, 3 or 4) may be used to select 
RAM when SW1 is In the high 
RAM position. Pin 2 of the 7442 
would cause position 4000- 
7FFF to be used. Pin 3 selects 
addresses 8000-BFFF and pin 
4 places the memory block at 
the top of storage or addresses 
COOO-FFFF in hex. In the exam- 
ple, pin 3 was used, since it 
does not interfere with the ex- 
isting memory in a 16K ma- 
chine, and is contiguous with 
theoriginal 16K. Ifyour memory 
size Is not the same you may 
want to move the add on mem- 
ory address up or down. A 
4-posltion rotary switch in the 
place of SW1 would enable you 
to move the address anywhere 
on a 16K boundary by running 
all four select lines out to the 
externally mounted switch. 

There is another function of 
the chip select logic not Im- 
mediately apparent In the 
diagram. This involves the 
deselection of a 4K block at the 
top of the added memory. This 



deselection takes place when 
the memory is located at ad- 
dress 0000-3FFF (when the 

switch is in the low position). 
The deselection is accom- 
plished by ANDIng A1 2, A t3 and 
CS Lo. When A12 and A13 are 
both high and CS Lo is active, a 
blocking of the chip select 
signal occurs. This is to prevent 
the processor from accessing 
the address range 3000-3FFF 
of the add-on memory when it is 
occupying low memory. Hence, 
the effective range Is the first 
12K (the range of Level II 
ROMs), rather than the full 16K 
block. It is necessary to block 
the upper 4K selection from 
3000-3FFF since this is the 
area used by the video display 
and the keyboard input. This 
chip select blocking is not im- 
plemented when SW1 is In the 
high position; therefore the full 
16K range Is accessible in the 
upper addresses. Finally, be 
sure the jumper from pin 5 of 
Z74 to five volts is in place. This 
activates the memory Data In 
buffers for addresses above 
7FFF. Without this jumper, you 




Z72 CAS 

PIN 4 



> TO 4ll6's 
PIN 15 



LOW SELECT 




DEPENDING ON ADDRESS CHOSEN AS THE HI ADDRESS. PIN 2, 3. OR 4 OF THE 
VCC 7442 MAY BE USED AS THE HIGH SELECT THE NUMBER INSIDE THE CHIP 

AI4 {PIN 11,135) REFERS TO THE CHIP NUMBER IN FIGURE 3. 

AI5 (Pm4, 230) 



Fig. 4. Depending on what address Is chosen as the HI address pin, two, three or four of the 7442 may be chosen as the high select. The 
number Inside the chip refers to the chip number In Fig. 3. 
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Reliable Business 
Bookkeeping Software 



IN ITS 6th SUCCESSFUL YEAR 



NOW FOR TRS-80 MOD III 



ORDER ENTRY S350 

GENERAL LEDGER 140 

ACCOUNTS PAYABLE .140 
ACCOUNTS RECEIVABLE 140 
INVENTORY CONTROL . HO 
PAYROLL'PERSONNEL 140 

Inquire lai prices On olfief versions 

Also Available for: 
IBM, NEC, OSBORNE, XEROX 
TRS-80 MOD I. TRS-80 MOD 
II, ATARI, APPLE, VECTOR, 
EXIDY, DYNABYTE, MICRO- 
SOFT CP/M'"', CBM DOS 2 0, 
MICROPOLIS. SUPERBRAIN 

CP/M IS a tFaoeiT>arK ol D>gitar Hesearcri 




Simple effeclive programs 
designed for your machine 
Step by step mslructions. 
benelicial lo the novice as 
well as to the more expe- 
rienced user, accompany 
every program 
The Source Code is provided 
with each program 
You wtll have a product 
you II be able to use from 
the day you receive il and 
as your company grows 
in size 

One phone ca|l will get 
you same week delivery 
SesI of all our programs 
are interactive 
THEY ALL WORK 
TOGETHER!' 




/^ TflS - 80' MODEL III \ 

MODEL III DRIVE KITS 

THS-BO' MODEL III. Two Disk Drives. 48K. DOS S11M 

TflS-aO* MODEL III. 16K S tM 

INTERNAL DRIVE KITS 

DISK DRIVE I S B79 

DISK DRIVE 2 $ 379 

EXTERNAL DRIVES 

DISK DRIVE 3 (Includes Cable) S 359 

DISK DRIVE 4 1329 

Fully Warranted for 90 days. 

EPSON PRINTERS 

MX - TO S 399 

MX -BO $ 4»S 

MX - 80 / FT $ 599 

QHAFTHAX -80 | 85 

AccMSorlea and Iritartacaa CALL 

VISTA TRS-90* DISK DIIIVES 

V-80 40 Track Modal 1 Drives $329.00 

Modal I two Drive Cable t 27.95 

Model I tour Drive Cable % 37.95 

Model 2 Disk Drtvas CALL 

TRS-BO Is B TrademarV of Radio Shack. 

Circle number for complete price list. 



PROCESS CONTROL TECHNOLOGY .^408 

P. O. BOX 8S2S 

STOCKTON, CA 95208 

(209) 952-6576 



\ 



/ 





THE 

UNINTERRUPTIBLE 
POWER SUPPLY 



. . . that keeps your computer on 
when the power tails . . . 

Mayday protects the computer and disk system from power surges, sudden drops in 

voltage, or a complete disruption o( power 
Most problems operators or programmers have are caused by voltage or current mterrupljons of the computer 
There are 12 different Mayday UPS power supplies, one of which is specifically designed to handle your compuler 
system from 50 watts up to over 600 watts 

Protect your time and investment One power failure could well cost you the price of the Mayday Prices start at 
$240 for the 150 watt system. (Line surge voltage regulator protection is available at additional cost). 
For more informalion, please call or write. 



from 



— ^ 




--151 



%A^ 



Box 210 New Durham. NH 03855 
(603)859-7110 TWX 510-297-4444 



t'See L/ar ot Advtrltsers on pag» 402 
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cannot read memory above the 
first 16K of useable RAM. 

There is a short procedure to 
bring the system up for testing. 
With SW1 in the high RAM posi- 
tion, switch on the keyboard. 
The normal power on system 
response should be apparent. If 
there is no response, hit the 
Reset key. If there still Is no cor- 
rect response, toggle SW1 and 
try again. If this fails in reset- 
ting the system, there is an er- 
ror In the chip-select circuit. 



Address 


Dat 


7000 


21 


7001 


00 


7002 


80 


7003 


Ot 


700< 


00 


7D0S 


00 


7000 


M 


7007 


77 


700B 


23 


7000 


08 


700A 


3E 


700B 


10 


700C 


88 




CA 


700E 


91 


7D0P 


40 


7010 


C3 


7011 


06 


7012 


70 



Table 1 



Once the circuit is functioning, 
the T-Bug program or some other 
monitor routine allowing the 
writing of a machine-language 
loop must be loaded. When the 
prompt appears, manually load 
the program listed in Table 1, 
using the M verb of T-Bug. This 
short machine loop does a 
block memory move. It copies 
the contents of ROM into the 
added 16K RAM. If you are not 
using memory address 8IXX]- 
BFFF as your high RAM posi- 
tion, addresses 7001 and 7002 
of the program must be 
changed to reflect the starling 
address of the relocatable RAM 
(the least significant byte In ad- 
dress 7001 and the most signifi- 
cant byte in 7002). When the 
transfer is completed, control 
will pass back to T-Bug. Using 
the M verb again, examine loca- 
tions 8000 to BFFF randomly to 
determine if the transfer has 
been made. What should ap- 
pear is a copy of the ROM data 
starting at address 8000. Check 
this by comparing data at Oxyz 
to data at 6xyz. The data should 



be the same. In general, data at 
address Axyz should be the 
same as data at address Axyz -t- 
8000 for the range of 0-2. Once 
this has been verified, switch 
SW1 to the low RAM position. 
Your operating system is now 
in place. Again, with the M verb, 
try altering location 0000 in 
memory to 00{hex). If this 
works, you have verified that 
the RAM resident operating 
system has replaced the ROM. 
You now have the ability to 
alter the entire operating 
system. 

Here is a short example of 
what can be done with this new 
capability. With a Level 1 
machine, after running a pro- 
gram from T-Bug, once the 
machine loop hangs there is no 
way to return to the T-Bug. The 
only way to regain control of 
the system is to reset and 
reload the T-Bug tape. This can 
be changed by altering two 
locations of the operating 
system. Place the entry point of 
T-Bug at address 0010,0011. 
Press the Reset key and the 



TRS-80 reset jump address con- 
trol will return to T-Bug. Now If 
your machine program gets 
lost, you can Reset and return 
to T-Bug immediately. Any ad- 
dress may be placed at this 
restart location so control may 
be passed to a desired program 
with the Reset key. 

With a little imagination, and 
some machine- language or as- 
sembly program software abili- 
ty, you should find many uses 
for this modified operating 
system. ■ 



JUMPER 









1. 




i>4 


+ 5V 




274 










9, 





















Fig. 5. This jumper must be in- 
stailed to enable the data in 
buffers for memory addresses 
above 7FFF (Hex.). 



Combine accurate fll^ght characteristics witit tfte besf in animation grapiHca 
andyou'iiltave SuliLOQIC's 

T80-FS1 Hight Simulator 

fortheTRS-80 



SubLOGIC'sT80-FS1 is the smooth, realistic 
simulator that gives you a real-time, 3-D, 
out-of-the-cockpit view ot flight. 

Thanks to fast animation ar>d accurate repre- 
sentation of flight, the non-pilot can now learn 
basic flight controi, including take-offs and 
tarxJir>gs! And experienced pilots will recog- 
nize how ttwroughly they can explore the 
aircraft's characteristics. 

Once you've acquired llighl proticierx:y, 
you can engage in the exciting British Ace 
3-D Aerial Battle Gan>e included in the 
package. Destroy the er>emy's fuel depot 
wtiile evadir>g erwmy fighters. 

Computer arxl aviation experts call the 
TB0-FS1 a marvel of modern techrxMogy. 
VouVJ simply call it fantastic! 



Special Features: 

• 3 frame-per-second flicker free 
animation 

• Maximum transfer keyboard input 
■ Constant feedback cassette loader 

Hardware Requirements: 

• Radio Shack TRS-SO, Level 1 or 2 

• 16K memory 

• Nothing else! 



•nly ^m^0 




Only 



See your dealer or order dlrecl For 
direct order, include 51.25 and specify 
UPS or first class mail. Illinois rasidenls 
add 5% sales tax. Visa and Mastercard 
accepted. 








LOGIC 



Communications Corp. 
BoxV, Savoy, IL 61874 
(217)359-8482 

Telex: 206995 ^^bo 
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EDAS is a sophisticated Editor 
and Assembler lor TRS-SO I & III 

• All text may be input In upper or 
lower case. 

• Assemble directly from one or 
more disk files via *QET. 

■ Assemble to disk or memory 

• Binary, octal, decimal, hex, and 
string constants; Multiple con- 
stants may be input on a single 
line. 

■ CMDFILE utility included 

■ Conditional assembly support 

■ Cross- Reference utility. 

. DOSfunctionsDIR,FflEE.KILL, 
and LIST are supported 

■ 14-chBracter labels Including 
special chars. "®", "$",".","?". 

■ Editor includes block move, 
global change, renumber, find 

< EDTASM & M-80 source files 
can be read or written. 

• Expression evaluator supports 
+. -, '. /, MOD plus logical AND. 
OR. and XOR 

• Paged&titledlistingswitfipage 
numbers and date/time. 

. PAGE, TITLE. SUBTTL. SPACE, 
& COM pseudo-ops supported. 

• Set memory size, page prompt, 
JCL execution. Abort option. 

■ EDAS is supported with TRSDOS 
compatible DOSs(LDOS, VTOS). 

. Price is $79.00 + $4.00. S&H. 




LDOS, Version 5.1 is the Ultimate in Operatir^ 
Systems for the TRS-80 Models I and III. 
MISOSYS is your East Coast Headquarters 
for LDOS, the documented system! Version 
5.1 is priced at $169.00 + $5.00 S&H per 
system. Deduct $50 If ordering both. 



MISOSYS MISOSYS MISOSYS MISOSYS MISOSYS 
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SASOSIW SASOSIW SASOSiW SASOSIW SASOSIM 

DSdBLH 

Complement your assembly language tools with this 
Z-SOdisassemblerwhich produces screen, printer, 
cassette, or disk file output A two pass process 
providesSYMBOLS for 1 6-bit address and 8- bit rel- 
ative references. EQUates& ORG are generated 
Read SYSTEM programs & display load address 
range. $20 (DSMBLR I for non-disk use is $15). 

EOAa CMDFILE, DSMBLR Specify Mod I or III. Add 
$1 S4H-H$.50 per program. VA residents add 4%. 




MISOSYS- DepL MU 3 

5904 Edgehill Drive, 

Alexandria, Virginia 22303 

703-960-2998 MicroNET 70140,310 

Dealers Inquiry Invited .221 




Turn your Editor Assembler into 
a disk package. This 32K patch 
modifies EDTASM for DOS op- 
eration. Features? Add full disk 
I/O, block move, global change, 
printer pagination, sorted sym- 
bol table, print memory utiliza- 
tion, enhance DEFM expansion, 
protect memory, and recover 
after BOOT. From within the 
EDTASM you will have D)R. 
KILL. & FREE. Upgrade your 
EDTASM! $20. 

THE B00KB 

THE BOOKS must be a part of 
your tools. Volume i gives you 
access to all math operations in 
your Level il ROM. A symbol 
table of the entire machine not- 
ing overSOO addresses is irx^'ud- 
ed. Volume II tells you every- 
thing you wanted to know about 
the level II I/O— printer, key- 
board, video, and cassette rou- 
tines are fully explained. Each 
volume has a fully commented 
listing of all the routines dis- 
cussed THE BOOKS will save 
you hours of assembler pro- 
gramming. Each volume is priced 
at$1 4.95 or buy both for$24.95. 
Add $1.50 S&H per book 
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Brand New, Top Quality, Exact Replacement Ribbons & Cartridges. These Ribbons Produce 

Super J«t Black Impressions and Ultra Reliable Print Life. They Are Delivered to Your Door 

Promptly for Much Less Than Most Retail Stores 

•SPECIAL! BUY 10 and GET ONE FREEI 
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WANGMS bMIW WC »B' 


ID. pt 


2 40 1) 


I3M 10 pt 


n 39 eai 


1 2 1 36' 


NftcHi Jtl Sk 


R-4S0 


I K* 


6gS ti 


S9S » 


15 95 eai 


S 16 .193 


Mi^kitnU IM 


CSbO 


WD. K81W 72BtW 


















TERMS: 

MINIMUM PURCHASE - $20 
PAYMENT BY: C.O.D.(UPS),CHECK, 

MASTER CARD, OR VISA CHARGE 

CARD. 
VOLUME DISCOUNTS: 

20-50 PACKS 10% 

51 - 100 PACKS 15% 

•UNDER $20, ADO t5 HANOUNQ. 
"APPROX. HETAJL. PRICE VARIES. 

ANCIE LABORATORIES -lei 

at^ fmk. yo ni*o mm joaa |Ua wo iic^) 

8CX)-638-09e7 (National) 



NAME. 



ADORE SS- 

C(rv____ 



.STATE. 



ANCiE LatxxaloftM 

9204 Baliimofe Blvd. 
Ccriiogs Park, MD 20740 



301 -345-6000 (Wath D.C. Local) 
301 -792-2060 (Bailo. MO Local) 
800-638-0987 (National) 



QTY 



CAT.* 



AMI 



TOTAL 



n Check Enclosed 
n C.O.D. 
n VISA 

a MASTER CHARGE 

ACCT. # 

EXP. DATE 

MIN. ORDER $20 

PRICES SUBJECT TO CHANGE 
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UTILITY 



Fifteen ne\\> commands for serious T-Bug aficionados. 



Newbug 



Ken Marks Jr. 
913 W. 62nd Street 
Downers Qrove, IL 60516 



Soon after I had Radio 
Shack's T-Bug, I realized 
that Its nine commands did not 
provide enough programming 
power for the serious machine- 
code programmer. Mr. Curtis' ar- 
ticle "T-Bug for II" In the April 
1980 Issue of 80 Microcomput- 
ing started me thinking that 
others may find my modifica- 
tions useful. Because I added 15 
new commands to T-Bug and for 
the sake of clarity in this article, 
I have named the new version 
NEWBUG. The following source 
code listing may be assembled 
using Radio Shack's Editor/ 
Assembler. 

NEWBUQ 

Once you have the object 
code of the NEWBUG patch, 
simply load T-Bug II (the version 
of T-Bug modified with Mr. 
Curtis' enhancements), and 
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with the L command, load the 
patch. When the tape stops, the 
first difference you will notice 
is that the # prompt has 
become an * . This tells you that 
this Is no longer T-Bug, but 
NEWBUG. Before you go any 
further, it would be wise to 
punch a copy of NEWBUG to 
tape. To do this, type P 4380 
4C5C 4762 NEWBUG. If you 
use the V command to verify 
the dump, you wilt get an error 
message. This Is because the 
input buffer is written to tape 
also, and when you go to verity 
the dump, the contents of this 



buffer will have changed caus- 
ing the apparent error. You 
don't have to fully understand 
this, but there Is usually no 
need to worry. If you are using 
T-Bug to enter the patch, type In 
the jump in line 27 of the listing 
last. This Is the line that con- 
verts T-Bug Into NEWBUG. If 
you type it In before the rest of 
the patch is In place, It wilt 
wreak havoc with the system. 

The following Is a short de- 
scription of some of the uses of 
the new commands. Keep In 
mind that these are only ex- 
amples and you should feel free 



to experiment with the com- 
mands where possible, but take 
care to heed any warnings 
given. 

Clear 

Occasionally the CRT screen 
gets cluttered up with al- 
phanumeric or graphic char- 
acters. This can happen while 
debugging programs which 
display data or text on the 
screen. One way to clear the 
screen Is to jump to Basic by 
executing a J 0072, hit the Clear 
key, and jump back to T-Bug. 
There Is now a quicker and 









Program Listing 








"NEMBU6 


" a patch to Modify T-BU8 




OOOOl 


. 


Mrittsn 


by K«n Marks Jr. final copy 1/11/Bl 




00OO2 


1 








00003 


; 








0O0O4 


• 






43A3 


00003 


BACK2 


EQU 


43A5H 


43CD 


00006 


BACK 


EQU 


43CDH 


4401 


0O0O7 


NONE 


EQU 


4401H 


4322 


00008 


CXJTA 


EQU 


452»H 


4332 


00009 


ASPC 


EQU 


4532H 


453C 


00010 


CRS 


EQU 


453CH 


457B 


OOOll 


SPC 


EQU 


457BH 


4389 


00012 


INA 


EQU 


4589H 

Progmm contlrtuM 



Pmgnm eontinu»d 












45A7 




00013 


LST 


EOU 


45A7H 




45Ca 




00014 


INKV 


EQU 


45C8H 




4762 




00013 


NENBUG 


EQU 


4762H 




4«2S 




0OO16 


REGS 


EOU 


4B25H 




482D 




00017 


FLAG 


EQU 


482DH 




4e3D 




00018 


CURSR 


EQU 


483DH 




43DE 




00019 




OR6 


43DEH 


I ADDRESS OF ' 'T 


43DE 


2A 


00020 




DEFB 


2AH 


(CHANGE TO t 


47B2 




00021 




ORB 


4782H 




47B2 


C2BD48 


00022 




JP 


NZ, CLEAR 


(INSERT JUMP TO PATCH 


4B31 




00023 




ORG 


48S1H 


J START OF PATCH 


4BS1 


D9 


00024 


HLIN 


EXX 




ITHIS SUBROUTINE 


4B52 


CD8943 


00023 




CALL 


INA 


; LOADS THE HL 


4few 


D9 


00026 




EXX 




{REGISTER WITH 


ABTih 


67 


00027 




LD 


H,A 


{AN INPUT FROn 


4857 


D9 


00028 




EXX 




{THE KEYBOARD 


4ssa 


CDS945 


0OO29 




CALL 


INA 




48SB 


D9 


00030 




EXX 






4GSC 


6F 


00031 




LD 


L,A 




48SD 


C9 


00032 




RET 






AfVW 


C5 


0OO33 


HLOUT 


PUSH 


BC 


{THIS SUBROUTINE 


4BSF 


7C 


00034 




LD 


A,H 


J OUTPUTS THE 


4SM> 


CD6C48 


00035 




CALL 


OUT 


{CONTENTS DF 


4863 


7D 


00036 




LD 


A,L 


(THE HL REGISTER 


4864 


CD6C48 


O0037 




CALL 


OUT 


ill A SPACE 


4867 


CD7B45 


0OO38 




CALL 


SPC 


{AT THE CURRENT 


486A 


CI 


00039 




POP 


BC 


(CURSOR POSITICW 


486B 


C9 


00O40 




RET 






4B6C 


47 


00O41 


OUT 


LD 


8,A 


(THIS SUBROUTINE 


486D 


CB3F 


00042 




SRL 


A 


(OUTPUTS THE 


486F 


CB3F 


00043 




SRL 


A 


(CONTENTS DF THE 


4871 


CB3F 


O0044 




SRL 


A 


fA REGISTER 


4873 


CB3F 


0O045 




SRL 


A 


(AT THE CURBEUT 


4873 


D9 


0O046 




EXX 




{CURSOR POSI^ON 


4876 


CD2245 


00047 




CALL 


OUTA 




4879 


D9 


0004B 




EXX 






487A 


78 


00047 




LD 


A,B 




4678 


E60F 


00O5O 




AND 


OFH 




487D 


D9 


OOOSl 




EXX 






487E 


CD2245 


00052 




CALL 


OUTA 




4881 


D9 


00033 




EXX 






4882 


C9 


00054 




RET 






4B83 


DF 


00O33 


ERR 


RST 


ISH 


; COMPARE START AND END 


4884 


DB 


0OO36 




RET 


C 


; RETURN IF ALL DKAV 


4885 


2A3D4B 


0OO37 




LD 


HL, (CURSR) 


(ELSE ^T CURSOR POS. 


4Bnfl 


3645 


00058 




LD 


(HL) , 'E' 


(OUTPUT AN "E" 


48aA 


CSA543 


00059 




JP 


BACK2 


(AND AMIRT 


488D 


FE63 


0O06O 


CLEAR 


CP 


63H 


(CHECK FDR < CLEAR > 


488F 


200A 


00061 




JR 


NZ,ARITh«1 


(GO IF NOT PRESSED 


4891 


AF 


00062 




XOR 


A 


{CLEAR A 

Pmgnm continues 



neater approach. The Clear key 
works just as it did In Basic, 
ciearing the full screen and 
returning the * prompt to the 
upper left-hand corner. 

Hexadecimal Arithmetic 

Have you ever wanted to 
calculate an absolute address 
from a jump relative displace- 
ment value? Have you ever 
found the need to add or sub- 
tract two hex numbers tor one 
reason or another? Well, my 
hexadecimal math has never 
been great, and the fact that 
even slight mathematical er- 
rors are enough to "bomb" a 
machine-code program should 
point out the usefulness of this 
command. It has saved me 
much needless grief. Type A 
(for arithmetic) followed by any 
four digit hexadecimal number. 
Now specify either addition or 
subtraction by typing + or - . 
You must now give the com- 
puter a number to be added to 
or subtracted from the first, so 
enter a second four digit 
number. An = and the resulting 
hex value will be displayed. 

Selective Block Change 

While working on a program, 
I found the need for a quick way 
to search for all the occur- 
rences of a particular byte and 
then change them to another 
value In a specified block of 
memory. So, out of necessity 
rose the block change com- 



FROraSSIOKAI. MAIUHO 
LtST PROaBAMS 



3 LINE lABEl, OFTIONAL 4TH LINE OR 
DMPRIMTED LINB FOR SEAHCII CODES, TABULAR 
PRINTOUT, SEARCH AND PRINT ON SCREEN ORPRDTT- 
ER SORT 500 NAMES DJ ZIP OR ALPHA-NUMERIC 
ORDER IN 10 SECONDS. DELETE DliTUCATES, MEROE 
FTLES AND MORE •TSJW 

lUIUUXnC WLUB~A1L THE FEATURES OF PAST- 
MAIL TNCTUDINQ THE OPnONAI, tTH LINE. SEPA- 
RATE LINES TOR PHONE. ALPHANUMERIC SORT 
CODE AND SEARCH CODES STBJX) 

WMoamjuaioujkMirmjamMAMmaTiua 



UEROE DISKS OF NEW, MIXED NAMES INTO 
YOUR MASTER DISK SORT AND DELETE DUPLI 

CATES •as.oo 



'-take files which have become too 
laroe and splft them at the point of your 
choice ■m.oo 

hlx-phint out nuubbr of names in each 

FILE tUB.0O 

mmx/tnafwuMtr MiTCT«MAnj»B ij»r wootam 

• 1U.00 

laqinsiaa waz.oou 
THE PERIPHERAL PEOPLE ^576 

P.O. lOX 2111) 

SLATTU, WA9l1tl 

1M-632-S649 




SFINKS1.61 

MICROCOMPUTER 

CHESS 



SFINKS was recenlty chanenged by ihe bes pro- 
9ams avadable for the TRS-80' mcracompuler 
kt B Canadian Round Robtn 

THE RESULT 

SRNKS riddled MYCHESS, SARGON D and 
GAMBET 80 to fineh «^ a Op for 1 si place 
SFINKS features an aodto aierl. o problem mode 
si^icib ^ophics. and nine kuek of play Pby ches 
uiilh the best tor Ibk' 

32KModelITTlS-80' 

cassette or disk only 29.95 



WILLIAM A. FINK 

PO BOX 5912 
Lighthouse Point. FL 33064 

Dealer hqukiei 
Wticome 

'Tndnrotid 
T«ndy CorTftmy 



.557 




DDDDDDDDDnnnnD 



4'^^'' 



D 

n 
a 
n 

D 

n 
n 

a 
n 

D 
D 
D 
D 

n 

G 

ci 



ACCOUNTS R£C£IVABL£ 
& SALES ANALYSIS 

* 1300 Customers 

' 1300 Sales/Payments 

' 99 Departments 

' Alphabetical Listings 

* Selective Late Charges 
' 30-60-90 Day Aging 

* Mailing Labels 

' Sales Analysis by Dept. 

' Rapid Entry & Operation 

REQUIRES 46K MOD III 

2 DRIVES 

J150.00 -*« 

JERRY MEDUM & ASSOCIAUS 

310 SOUTH JEFFERSON ST. 

NAPA. CAUFORNIA 94559 

(707) 255-4475 



D 
D 
D 
D 
D 

a 

D 
D 
D 

n 

D 
D 
D 
D 
D 

a 

D 
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program continued 








4892 


322240 


00063 


LO 


<4022H) ,A 


4BV5 


CDC901 


00064 


CALL 


1C9H 


4878 


C3CD43 


00065 


JP 


BACK 


489B 


FE41 


00066 ARITHM 


CP 


'A' 


4890 


203A 


00067 


JR 


NZ, CHANGE 


489F 


CD3245 


00068 


CALL 


ASPC 


4BA2 


CD5148 


00069 


CALL 


HLIN 


4805 


E3 


00070 


PUSH 


HL 


48A6 


CD7B43 


00071 


CALL 


SPC 


48A9 


CDC845 


00072 81 


CALL 


INKY 


48AC 


FE2B 


00073 


CP 


'+' 


4eAE 


2806 


00074 


JR 


Z,B2 


48B0 


FE3D 


0OO75 


CP 


•=• 


48B2 


20F5 


00076 


JR 


NZ,B1 


48B4 


D610 


00077 


SUB 


lOH 


48B6 


F5 


00078 B2 


PUSH 


AF 


4867 


CD3245 


0OO79 


CALL 


ASPC 


48BA 


CD5148 


0O08O 


CALL 


^«_IN 


48BD 


E5 


OOOSl 


PUSH 


HL 


48BE 


CD7B45 


00082 


CALL 


SPC 


48C1 


3E3D 


00083 


LD 


A,'-' 


48C3 


CD3245 


00084 


CALL 


ASPC 


4BC6 


01 


00085 


POP 


DE 


4807 


Fl 


00086 


POP 


AF 


48C8 


El 


00087 


POP 


HL 


4aC9 


FE2B 


00088 


CP 


' +' 


48CB 


2805 


00089 


JR 


Z , PLUS 


48CD 


AF 


00090 


XC» 


A 


48CE 


E052 


00091 


SBC 


HL.DE 


48D0 


1801 


00092 


JR 


83 


48D2 


19 


00093 PLUS 


ADO 


HL.DE 


48D3 


CD5E48 


00094 B3 


CALL 


HLOUT 


48D6 


C3A543 


00095 


JP 


BACK2 


48D9 


FE43 


00096 CHANGE 


CP 


'C 


4808 


2042 


00097 


JR 


NZ, EXPANO 


48DD 


CD3245 


00098 


CALL 


ASPC 


48E0 


CD5148 


00099 


CALL 


HLIN 


48E3 


E5 


00100 


PUSH 


HL 


48E4 


CD7B45 


OOlOl 


CALL 


SPC 


48E7 


CD5148 


00102 


CALL 


HLIN 


4BEA 


E5 


00103 


PUSH 


HL 


48EB 


G07B45 


O0104 


CALL 


SPC 


48EE 


CD8945 


00105 


CALL 


INA 


48F1 


F5 


00106 


PU&* 


(^ 


AQF2 


C07B45 


00107 


CALL 


SPC 


48F5 


CD894S 


00108 


CALL 


INA 


48F8 


47 


00109 


LD 


B,A 


48F9 


Fl 


00110 


POP 


AF 


48FA 


El 


00111 


POP 


HL 


48FB 


01 


00112 


POP 


OE 


48FC 


F5 


00113 


PUSH 


AF 


48FD 


OF 


00114 


RST 


18H 


48FE 


3009 


O0115 


JR 


NC,B4 


4900 


2A304B 


00116 


LD 


HL, (CURSR) 


4903 


3645 


00117 


LD 


(HL) , 'E' 


4905 


Fl 


001 IB 


POP 


AF 


4906 


C3A543 


00119 


JP 


BACK2 


4909 


AF 


00120 B4 


XOR 


A 


490A 


E052 


00121 


SBC 


HL,OE 


490C 


E5 


00122 


PUSH 


^ft. 


4900 


05 


00123 


PUSH 


DE 


49oe 


C5 


00124 


PUSH 


BC 


490F 


01 


00125 


POP 


DE 


4910 


El 


00126 


POP 


HL 


4911 


CI 


00127 


POP 


BC 


4912 


Fl 


00128 


POP 


AF 


4913 


03 


00129 


INC 


BC 


4914 


03 


OO130 


INC 


BC 


4915 


EDBl 


00131 LI 


CPIR 




4917 


E2A543 


00132 


JP 


P0,BACK2 


491A 


2B 


00133 


OEC 


HL 


491 B 


72 


00134 


LO 


<HL) ,0 


491C 


23 


00135 


INC 


HL. 


4910 


18F6 


00136 


JR 


LI 


491F 


FE45 


00137 EXPANO 


CP 


'E' 


4921 


2044 


00138 


JR 


NZ,HEXI»ff> 


4923 


214049 


00139 


LO 


HL,MES 


4926 


CD5349 


00140 


CALL 


OUTMES 


4929 


0608 


00141 


LD 


8,8 


492B 


212048 


0O142 L2 


LD 


HL.FLAS 


492E 


3E30 


00143 


LO 


A.'O* 


4930 


CB06 


00144 


RLC 


(HL) 


4932 


3001 


00145 


JR 


NC,B5 


4934 


5C 


00146 


INC 


A 



jTURN CURSOR CM=F 

; CLEAR SCREEN 

jAND RETURN 

; CHECK FOR "A" 

;GO IF NOT PRESSED 

; OUTPUT (A) + SPACE 

;BET 1st OPERAND 

iSAVE IT 

) SPACE 

;LOAD A FRCttI KEYBOARD 

; ADDITION? 

(SUBTRACTION? 

J NO. TRY AGAIN 

J CORRECT TO "-" 

(SAVE CM'ERATOR 

; OUTPUT (A) + SPACE 

;BET 2nd OPERAND 

(SAVE IT 

) SPACE 

i OUTPUT "=" + SPACE 

;POP OPERAND #2 

;POP OPERATOR 

;POP OPERAND «1 

;A00? 

jGO IF (A)=-' + " 

; CLEAR CARRY 

;ANO SUBTRACT 

;A00 

(DISPLAY RESULT 

J RETURN 

(CHECK FOR "C" 

;60 IF NOT PRESSED 

-.OUTPUT (A) + SPACE 

;6ET START OF CHANGE 

(SAVE IT 

; SPACE 

(GET END OF CHANGE 

(SAVE IT 

(SPACE 

(GET TARGET BYTE 

;SAVE IT 

(SPACE 

iGET NEW BYTE 

;NEU BYTE -> 8 

(POP TARGET BYTE 

[POP END 

(POP START 

(SAVE TARGET AGAIN 

(CHECK FOR START >END 

(GO IF NOT 

(ELSE OUTPUT 

( "E" FOR ERROR 

(RESTORE STACK 

I RETURN 

[CLEAR CARRY 

(COMPUTE COUNT 

SAVE IT 

PUSH ALL ONTO STACK 

TO SWITCH VALUES 

NEW BYTE -> D 

START -^> HL 
(BYTE COUNT -> BC 
(TARGET BYTE -> A 

CORRECT BYTE COUNT 

BY ADDING 2 

SEARCH FOR TARGET BYTE 

RETURN IF SEARCH OVER 

NOW HL POINTS TO TARGET 

CHANGE TARGET INTO NEW 

RESTORE TO NORMAL 
;CONTII«JE 'TILL DONE 
(CHECK FOR "E" 
;GO IF NOT PRESSED 
(POINT TO MESSAGE 
; OUTPUT 

( (B) = BIT COUNT 
I ADDRESS OF T-BUS FLAG 
;BIT (B) ASSUMED = O 
(LEFTMOST BIT -> CARRY 
(BRANCH IF BIT = O 
(NOW (A) IS ASCII "1" 



Program continues 



mand. As a quick and visible 
display of this command's 
operation, try the following ex- 
ample: type C followed by the 
starting and ending addresses 
of the block of memory you 
wish to change. For this 
demonstration, type 3C00 and 
3FFF. These are the starting 
and ending addresses of the 
video display memory. Choose 
the addresses carefully or you 
may find (the hard way) that 
writing over the vector restarts 
(immediately following the 
screen memory), the area of 
memory in which NEWBUG 
resides, or any other dedicated 
block of memory, can be hazar- 
dous to the well being of any 
program in memory. 

So far the command has 
done nothing. That is because 
we have not told it what byte to 
look for. Enter a two digit 
"target" byte followed by the 
byte that will replace it 
wherever it is found. For this ex- 
ample type 20 and BF. If you 
didn't follow what happened, 
the computer went searching 
through the video memory for 
all occurrences of 20 which is 
the ASCII code for a space and, 
upon finding them, changed 
each into BF which is the 
graphic code for all pixels 
(blocks) on. This is, of course, 
only an example and any values 
can be used, but take care in 
choosing safe values so that 
you don't "bomb" the system. 

Expand Flag Register 

The need to know the status 
of each Individual flag bit in the 
flag register is important when 
debugging a program. The flag 
register can be displayed with 
the R command, but this Is of 
little value unless you have 
memorized the position of each 
separate flag bit and have 
paper and pencil nearby to con- 
vert the hexadecimal digits into 
their binary equivalents. Press 
the R key and find the F 
register. Now press the E key. 
This will expand the register in- 
to its binary form. By compar- 
ing the hexadecimal output 
with its binary counterpart, you 
should find the command's 
operation quite reliable. 

Hex/ASCII Dump 

My need to display a full 
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RACET SORTS - RACET UTILITIES - RACET computes - RACET SORTS — HACET UTILITIES - RACET computos - PAGET SORTS - RACET UTILITIES - RACET computes — 




I FIELD PROVEN!! 

I 10 MEGABYTES and MORE for the TRS-80* Model II 

>. plus SHARED ACCESS to HARD DISK DRIVE 

I Hard/Soft Disk System (HSOS) Software allows access as single drive You can have that 10 Megabyte continuous file ■ tfiat M 000 name maillisi or inventoryi 

S Or a direciory wiih 1000 entries! All completely compatible with TRSOOS 2.0 BASIC. You can mix lloppy and hard disk drives. Includes special utilities including 

t^j HPURGE. DCS Directory Catalog System, HZAP Hard Disk Superzap, and many special formalling options. Three lo eight limes faster than floppy! RACET quality 

5 HARD DISK DRIVE 4 CONTROLLER $5995. Second User $595. HSOS Softwire $400. (Note: HSDS now alsoavailabiefor CORVUSdrivesi') 

^ XF5-80 (1 drive 32K Min - Mod II 64K) Mod r and III $100, Mod II $175 

^ Assembly language ISAM facility! Interfaces with BASIC Very fast access to records in large files Access/insert times 1 A seconds 

g B Tree difeclory slructure eliminates record searcfi No file reorganization required Sector buffering reduces media and drive wear while increasing performance 

K Can be used for primary and secondary file database applications. Records are kept in sorted order on disk by alpha key Deferred write option. Comprehensive 

,_ file maintenance and debugging utilities are included Attention applications programmers - Save time in imptefnenlmg your custom database application software 

u MAILLISI ( 1 -drive 32K Min - Mod II 64K) Mod I and III $75. Mod II $150 

IT This ISAM-based maillisi minimizes disk access times. Four keys — no separate sorting Supports 9-digit zip code and 3-(Jigit stale code Up to 30 attributes 

I Mask and query selection Record access/update time 1-4 seconds" 

^ OISCAT (32K 1 -drive Mm) Mod I and III $50 

g This comprehensive Diskette Cataloguing/Indexing utility allows the user lo keep Irack of thousands of programs m a categorized library Machine language program 

K works with all TRSDOS and NEWDOS versions files include program names and extensions, program length, diskette numbers Iront and back and diskette 

tree space. RS23? drivers and other features. 
£ LPSP00L(32KI-driveMin)Modl$75 

1 LPSPOOL — Add multi-tasking to permit concurrent printing while running your application program. The spooler and despooler obtain print jobs from queues 

S maintained by the system as prinl files are generated. LPSPOOL supports both parallel and serial printers, 

1 BASIC LINK FACILITY 'BUNK' (Mod I Min 32K 1 -disk] Mod I $25; Mod II $50; Mod III $30 

I Link from one BASIC program to another saving all variables! The new program can be smaller or larger tfian the original program in memory. The chained program 

^ may either replace the original program, or can be merged by statement number. The statement number where the chained program execution is to beain mav 

{^ be specified! 

£ INFINITE BASIC (Mod I & Mod III Tape or Disk) Mod I $50; Mod III $60 

I Extends Level II BASIC with complete MATRIX functions and 50 more string functwns. Includes RACET machine language sorts' Sort 1000 elemenls tn 9 seconds" 

S Select only functions you want to optimize memory usage. 

b INFINITE BUSINESS (Requires Infinite BASIC) Mod I ft III $30 

p Complete printer pagination controls — auto headers, footers, page numbers Packed decimal arithmetic — 1?7 digit accuracy -f, -,* / Binary search of 

^ sorted and unsorted arrays Hash codes, 

u COMPROC (Mod I & Mod III — Disk only) Mod I $20; Mod III $30 

S Command Processor Auto your disk to perform any sequence of instructions that you can grve from the keyboard DIR, FREE pause wait for user input BASIC 

I No of FILES and MEM SIZE, RUN program, respond to inpul statements, BREAK, return lo DOS, etc Includes kwercase driver software debounce and screenpnnli 

^ GSF (Mod I & III Tape or Disk - Specify Memory Size) Mod I $25; Mod II $50; M«d III $30 

Generalized Subroutine Facilities The STANDARD against which all other sorts are compared! And then compare prices! Machine language — fast and powerful' 
« Multikey mulli-vanable and multi-key character string. Zero and move arrays. Mod II includes USR PEEKS and POKES Includes sample programs 

S DSM (Mod I Min 32K 2 drive system Mod 11 64K 1 -drive Mod III Min 32K 1 -drive) Mod I $75; Mod II $150; Mod III $90 

g Disk Sort/Merge for RANDOM files. All machine language stand alone package for sorting speed. Establish sort specification in simple BASIC command File 

1 Execute from DOS Only operator action to sort is to change diskettes when requested' Handles multiple diskette files' Super last sort times — improved disk I/O 
g times make this the fastest Disk Sort/Merge available on the TRS. 

I UTILITY PACKAGE (Mod II 64K) $150 

E Important enhancements to the Mod 11 The file recovery capabilities alone will pay lor the package In even one application' Fully documented In 124 page manual' 

^ XHIT, XGAT, XCOPY and SUPERZAP are used to reconstruct or recover data Irom bad diskettes! XCOPY provides mulli-file copies, 'wild-card' mask select 

g absolute sector mode and other features. SUPERZAP allows examine/change any seclor on diskette Including track-0, and absolute disk backup/copy with 1/6 

< recovery DCS builds consolidated directories Irom multiple diskettes into a single display or listing sorted by disk name or file name plus more Change Disk 
I ID with DISKID. XCREATE preallocates files and sets 'LOF' to end lo speed disk accesses. DEBUG!! adds single step, trace, subroutine calling program looping 

M dynamlcdisassemblyandmore!! 

p BASIC CROSS REFERENCE UTILITY (Mod I! 64K) $50 

d SEEK and FIND functions for Variables, Line Numbers. Strings, Keywords. 'All' options available for line numbers and variables. Load from BASIC — Call with 

D 'CTRL'R. Output to screen or printer! 

m DEVELOPMENT PACKAGE (Mod II 64K) $125 

< Includes RACET machine language SUPERZAP, Apparal Disassembler, and Model II interlace to the Microsoft 'Editor Assembler Plus' software package including 
I uploading services and patches for Disk I/O. Purchase price includes compleie copy of Editor Assembler -f and documentation (or Mod I Assemble directly 

(o into memory. MACRO facility, save all or portions of source to disk, dynamic debug facility (ZBUG), extended editor commands 

^ DEALER inquiries invited System Houses - check for special pricing on hard drives and software 
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program conUnutH 














4935 


CD3245 


00147 


BS 


CALL 


ABHC 




(OUTPUT (A) + SPACE 


4938 


lOFl 


00148 




DJNZ 


L2 




jCONTIUE FOR ALL BITS 


493A 


CD3C45 


00149 




CALL 


CRS 




I OUTPUT A C/R 


493D 


C3A543 


00150 




JP 


BACK2 




(RETURN 


4940 


18 


OOISI 


HES 


DEFB 


IBH 




(BACKSPACE 


4941 


53 


001S2 




DEFn 


•s z - 


H - P N C |FLA6 reSSAGE | 


4950 


0D2O 


001S3 




DEFH 


200DH 




(C/R AND SPACE 


4952 


00 


00154 




DEFB 







(0 MARKS THE Ehtt) 


4953 


ED4B3D48 


0013S 


DUTnES 


LD 


BC, <CURSR) 


(OUTPUTS r£SSAGE 


4957 


ED432040 


00156 




LD 


(4020H) 


.BC 


;AT CURRENT CURSOR 


495B 


CDA728 


00157 




CALL 


28A7H 




tPOSITION USING 


495E 


ED4B2040 


0O1S8 




LD 


BC, (4020H} 


(ROM OUTPUT 


4962 


ED433D48 


00159 




LD 


(CURSR) 


,BC 


(ROUTINE 


4966 


C9 


0O160 




RET 








4967 


FE48 


00161 


HEXDMP 


CP 


'H' 




(OCCK FOR "H" 


4969 


2066 


00162 




JR 


NZ.INITIA 


(BO IF NOT PRESSED 


496B 


CD5245 


00163 




CALL 


AUPC 




(OUTPUT (A) + SPACE 


496E 


CDS 148 


00164 




CALL 


t«_IN 




;BET START ADDRESS 


4971 


E8 


0016S 




EX 


OE.HL 




(MOVE TO DE 


4972 


OEIO 


00166 


HEXDUT 


LD 


C, lOH 




(LINE COUNT 


4974 


2A3D48 


00167 




LD 


HL, (CURSR} 


(GET T-BUG CURSOR 


4977 


222040 


00168 




LD 


(4020H) 


,HL 


(PUT IN BASIC CURSOR 


497n 


EB 


00169 




EX 


DE,HL 




(SAVE DE 


497B 


3E0D 


00170 




LD 


A.ODH 




(ODH - C/R 


497D 


CD33O0 


00171 




CALL 


33H 




(OUTPUT A C/R 


49BO 


EB 


00172 




EX 


DE.HL 




1 RESTORE DE 


498 1 


2A2040 


00173 




LD 


HL, (402OH) 


i BASIC 5 ClffiSOR 


4984 


223D48 


00174 




LD 


(CURSR) 


.HL 


;BACK TO T-BUG*S 


49B7 


62 


0017S 




LD 


H,D 




(PUT DE INTO HL 


49S8 


6B 


00176 




LD 


L,E 






4989 


CDSE4a 


00177 




CALL 


HLOUT 




(OUTPUT MEM POINTER 


49BC 


3E5E 


00178 




LD 


A,5EH 




(5EH ~ RIGHT ARROW 


4VHt 


CD3245 


00179 




CALL 


AiiPC 




(OUTPUT ARROW 


4991 


DS 


0O18O 




PUSH 


DE 




(SAVE MEM POINTER 

Program coftlinuas 



page of 256 continuous bytes 
of memory in hexadecimal 
along with their associated 
ASCII symbols prompted this 
next command. If you type H 
0000 you will see the first 256 
bytes of ROM. Each line con- 
tains the starting address of 
that line followed by sixteen 
hexadecimal numbers grouped 
in twos. The ASCII symbols for 
these are printed to the right on 
each line. The cursor character 
is displayed in place o1 graphic 
and control characters. Press 
Enter to look at the next 256 
bytes of memory. You should 
now see the second page of 
ROM which starts at 0100. If 
you look in the ASCII section, 
you will notice the data for the 
Radio Shack Level II Basic 
message. Press 1 if you want to 
look line by line through 
memory instead. By pressing 
any key 1-9, that many more 
lines will be displayed. Press- 
ing 0, you will find, scans over 
the contents of the next 1024 
bytes of memory. The scan 
feature can come In handy for 
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TRISWATCH 

Keeps your TRS-80 Mod II 
up with the times. 

The Triswatch. formally known as the CCB-II 
is a clock, calendar, and audio alarm rolled 
into on») 

■ ForTRSDOS users, the CCB-U eliminates 
the hassle of setting the lime and date 
when you reset your Mod II. 

■ The PAT CP/M* 2 system date aad time 
are synchronized to the CCB-II each time 
the system i^ reset. 

■ The CCB-II indirectly accessible tfom any 
language that allows direct port Input 
and output. 

■ A pacemaker battery is included, which 
provides over 8 years of continuou& 
timekeeping. 

Keep up with the times ar>d order 
the CCB-II for S1 75 plus shipping. 

^ITCKLPC* TRS-BO is a Irabemark o( Tandy Corp. 

^^2^^^**<^\ CP/M is a registered trademark of Oigilal Research Inc. 

i^ PICKLES & TROUT 

1 ROU 1 ® PC BOX 1206 GOLETA CA 931 16 (80S| 685-4641 

Warntng Irtstallation requires opening rhe Model II. which may void its warranty 
We suggest walKig until ttie warranry oenod has expired belore iristailing the CCBHI. 
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StatPacI IF YOUR TIME IS MONEY 




AND YOU NEEDDETAILED STATISTICAL 
ANALYSIS . . . 



then you need StatPac 

Because with StatPac you won't need to sit at the com- 
puter for hours typing in each task. StatPac is uniquely 
designed to perform batch processing: You can specify 
several hundred tasks to be processed in a batch, then 
leave the computer alone to do the work 

Your valuable time is tree to do other work 

StatPac is available tor Model I (requires NEWDOS) or 
Model III. 2 disk drives. 48K RAM and a lineprinter. Also 
available for other operating systems. 

StatPac handles all phases of research analysis including. 
frequency analysis, descriptive slatislics. crosstabs S chi 
square, t-test, correlation & linear regression, analysis of 
variance, multiple linear regression and management 
reports. 
. Buy the complete 3-disk package for $285 The extensive 
user's manual is mcluded or may be purchased separately 
(or$30 (the cost of the manual may be applied to the cost of 
the disks at a later dale) MasterCard and VISA accepted 
Entire package includes over 30 integrated programs. 

For more information and a free 16-page brochure write 
or call: 



612/866-9022 

Walonick Associates ,^363 
5624Girard Ave. So. 
Minneapolis, MN 55419 



LOAD 
80 

LOADS 
EASY 



Q 



f) 



LOAD 80 



ELIMINATE HOURS OF 
TYPING AND 
AGGRAVATION 




In the April, 1981 issue of 80 Mic roco mputing , we 
introduced LOAD 80 to save you the time and trouble of 
typing our programs yourself. LOAD 80 cassette tapes 
contain dumps of the major program listings in 80 
M icrocomputing . 

If you have not yet ordered any LOAD 80 tapes and 
wish you had, don't worry. We are now offering a "back 
issue" cassette program. You can order any LOAD 80 
cassette from April, 1981 to date for $9.95. Back issues 
of 80 Microco mp uting are also available with the LOAD 
80 cassettes tor $3.50. With the complete documenta- 
tion found in the companion magazine issue, you 
should have no difficulty loading any of 80"s major 
programs. 



Please send me the following: 

month year month 

Tapes Magazinas 



year 



ITEM 


COST 


QTY. 


TOTAL 


LOAD 80 Tapes 
overseas, add SI 00 


S9.95 






BD Mlcrocompuling 
add S1 .00 per magailne (or postage and 
handling If orderino magazines 


S3 50 








T 


OTAL 





[1 Check Enclosed Bill my: D MC TJ AE D VISA 

NAME 

ADDRESS ^___ .^_^ 

CITY 

CARD# 



STATE. 



_ ZIP. 

EXP. DATE. 



SIGNATURE 



_ INTERBANK**. 



Please a Dow 4-6 weeks for delivery 

LOAD aO • BO Pine Street • Peterborough NH 03458 

Attn: Oebra Boudneau 



'5m Lisi ot Advertisers or) page 402 
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searching large sections of 
memory. To exit this command, 
press X. I will mention here that 
the X key can be used to exit 
most of the new commands. 

Initialize 

When you first load NEWBUG 
and get ready to start de- 
bugging, or whenever you wish 
to clear all the workable reg- 
isters, simply press I. This in- 
itializes NEWBUG by zeroing 
the register sets, both prime 
and non-prime, and the IX and I Y 
index registers. The stack 
pointer (SP) and program 
counter (PC) are not zeroed 
because this would have dis- 
astrous effects. To convince 
yourself that the registers are in 
fact cleared, press I and then R 
and observe for yourself. 

Block Checksum 

Checksums are useful for 
comparing blocks of memory 
and for other special cases 
when you need to know the sum 
of a block of memory. Most 
checksums add together the 
values of all the bytes in the 
specified block of memory and 
display only the least significant 
byte of the resulting checksum. 
For most cases this is fine, but 
tfiere are times whten the total 
value of the checksum is needed. 
Type K for checksum (C was al- 
ready used for the change com- 
mand) followed by the starting 
and ending addresses of the 
block of memory of which you 
wish to compute the checksum. 
The resulting eight digit hexa- 
decimal number Is the com- 
puted checksum of the chosen 
block of memory. Because the 
checksum command is non-de- 
structive (that is, it doesn't 
change any memory locations), 
it can be used anywhere in RAM 
or ROM. In all commands deal- 
ing with a block of memory the 
starting and ending memory lo- 
cations are Included in the op- 
eration and are said to be in- 
clusive commands. You may 
also notice that if the starting 
address is larger than the end- 
ing address, an E will be printed 
and the command will be 
aborted. This is because the 
commands are not capable of 
operating on Imaginary blocks 
of memory which end before 
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Program 


continued 










4992 


0608 


ooiai 


LD 


B,8 


;FOR 8 PAIRS OF BYTES 


4994 


lA 


00182 L3 


LO 


A, (DE) 




4995 


67 


001B3 


LD 


H,A 


;H=FIRST BYTE 


499t 


13 


00184 


INC 


DE 


; INC POINTER 


4997 


IP 


001B3 


LD 


A, (DE) 




499B 


6F 


00186 


LO 


L,A 


fL=SECOND BYTE 


4799 


13 


00187 


INC 


DE 


( INC POINTER 


499fl 


CD5E4B 


00188 


CALL 


HLOUT 


; OUTPUT A PAIR OF BYTES 


499D 


10F5 


00189 


DJNZ 


L3 


;CONTINUe 8 TIMES 


499F 


Dl 


00190 


POP 


DE 


;BET MEM POINTER ABAIN 


49AO 


2A3D48 


00191 


LD 


HL, (CURSR) 


{CURSOR -> HL 


49A3 


0610 


00192 


LD 


B, lOH 


J FOR 16 CHARACTERS 


49A5 


lA 


00193 L4 


LD 


A, (DE) 


;GET CHAR 


49A6 


FE20 


00194 


CP 


' ' 


;TEST FDR LESS THAN 20H 


49AS 


3804 


00193 


JR 


C,B6 


; (CONTROL CHARACTER) 


49AA 


FE81 


0O196 


CP 


eiH 


;TEST FDR GRAPHIC CODE 


49AC 


3802 


00197 


JR 


C,B7 




49AE 


3E5F 


00198 B6 


LD 


A,3FH 


{SUBSTITUTE CHAR 


49B0 


77 


00199 B7 


LD 


(HL) ,A 


J STORE CHAR 


49B1 


23 


OO2O0 


IMC 


HL 


;INC SCREEN POINTER 


49B2 


13 


OO201 


INC 


DE 


;INC MEMORY POINTER 


49B3 


lOFO 


00202 


DJNZ 


L4 


{CONTINUE FOR 16 CHARS 


49B5 


OD 


00203 


DEC 


C 


{DEC LINE COUNTER 


49B6 


20 BC 


00204 


JR 


NZ,HEXaUT*2 


{K) IF NOT DONE 


4988 


D9 


00203 B8 


EXX 




{SAVE REGISTERS 


49B9 


CDCB45 


00206 


CALL 


INKY 


{GET (A) FROM KEYBOARD 


49BC 


D9 


00207 


EXX 




{RESTORE REGS 


49BD 


FE58 


00208 


CP 


•X' 


{CHECK FOR EXIT 


49BF 


CA914B 


00209 


JP 


Z,CLEAR*4 


{CL5 AND RETURN 


49C2 


FEOD 


OO210 


CP 


ODH 


(CHECK FDR C/R 


49C4 


2BAC 


00211 


JR 


Z,HEXOUT 


(OUTPUT 16 MORE LINES 


49C6 


D630 


00212 


SIIB 


30H 


(CORRECT ASCII 


49C8 


38EE 


0O213 


JR 


C,B8 


1 IF LESS THAN 1 


49CA 


FEOA 


00214 


CP 


OAH 




49CC 


30EA 


0021S 


JR 


NC,Ba 


{ IF tSREATER THAN 9 


49CE 


4F 


00216 


LD 


C,A 


(COUNT -> C 


49CF 


18A3 


00217 


JR 


HEXOUT+2 


{CONINUE 


49D1 


FE49 


00218 INITIA 


CP 


' I' 


(CHECK FOR "I" 


49D3 


200D 


00219 


JR 


NZ, CHKSUM 


(GO IF NOT PRESSED 


49D5 


212548 


00220 


LD 


HL , REGS 


((HL>=START DF REGISTERS 


49D8 


0614 


00221 


LD 


B, 14H 


(BYTE COUNT -> B 


49DA 


36O0 


00222 L5 


LD 


(HL) ,0 


(ZERO A REGISTER 


49DC 


23 


00223 


INC 


HL 


(POINT TO NEXT 


49DD 


lOFB 


00224 


DJNZ 


L3 


(CONTINUE 'TILL DONE 


49DF 


C3914B 


CO 225 


JP 


CLEAR+4 


(CLEAR SCREEN tt RETURN 


49EZ 


FE4B 


00226 CHKSUM 


CP 


•K* 


(CHECK FOR "K" 


49E4 


Z03C 


00227 


JR 


NZ.NPUT 


(GO IF NOT PRESf^FD 


49E6 


CD3243 


0O228 


CALL 


ASPC 


(CMJTPUT (A) + SPACE 


49E9 


CDS 148 


00229 


CALL 


h«-IN 


(BET START OF CHECKSUM 


49EC 


E3 


00230 


PUSH 


HL 


(SAVE START ADDRESS 


A9ED 


CD7B45 


00231 


CALL 


SPC 


(OUTPUT SPACE 


49F0 


CD514B 


00232 


CALL 


h«-IN 


{BET END ADDRESS 


49F3 


E5 


0O233 


PUSH 


HL 


{SAVE END 


49F4 


CD7B45 


00234 


CALL 


SPC 


(OUTPUT SPACE 


49F7 


Dl 


00233 


POP 


DE 


(GET END 


49F8 


13 


00236 


INC 


DE 


(CORRECT FDR COlWtT 


49F9 


El 


00237 


POP 


m. 


{ffilT START 


49Ffi 


CD834B 


0O238 


CALL 


ERR 


{CHECK FOR START >END 


49FD 


09 


00239 


EXX 




(94ITCH REGS 


49FE 


210000 


OO240 


LD 


ML,0 


(CLEAR LSB DF CHECKSUM 


4A01 


E5 


00241 


PUSH 


HL 




4A02 


Dl 


00242 


POP 


DE 


(CLEAR MSB OF C»£CKSUB 


4A03 


E5 


00243 


PUSH 


HL 




4A04 


CI 


00244 


POP 


BC 


(CLEAR BC 


4A05 


09 


00243 


EXX 




(SWITCH REGS 


4A06 


7E 


00246 B9 


LD 


A, (HL) 


(GET BYTE 


4A07 


D9 


00247 


EXX 




(SWITCH REGS 


4A08 


4F 


0024 B 


LD 


C,A 


(BYTE INTO BC 


4fl09 


09 


00249 


ADD 


HL.BC 


{ADD TO CHECKSUM 


4AOA 


3001 


O025O 


JR 


NC.BIO 


{JUMP IF NO CARRY 


4A0C 


13 


00251 


INC 


DE 


; INC MSB OF CHECKSUM 


4AOD 


D9 


00252 BIO 


EXX 




(SWITCH REGS 


4AOE 


23 


00253 


INC 


H. 


( INC POINTER 


4AOF 


DF 


00254 


RBT 


18H 


(CHECK IF DONE 


4A10 


38F4 


00253 


JR 


C,B9 


; CONTINUE 


4A12 


D9 


0O256 


EXX 




(SWITCH RE8S 


4A13 


EB 


00257 


EX 


DE.HL 


(PUT MSB IN HL 


4A14 


CD5E48 


00258 


CALL 


»«-DUT 


{ OUTPUT I T 


4A17 


213D48 


00259 


LD 


HL, CURSR 


(GET CURSOR 


4A1A 


35 


00260 


Dfei: 


(H_) 


(REMOVE SPACE 


4A1B 


EB 


00261 


EX 


DE.HL 


{GET LSB IN HL 


4A1C 


CD5E48 


00262 


CALL 


HLOUT 


{ OUTPUT I T ■ 


4A1F 


C3A543 


00263 


JP 


BACK2 


(RETURN 

Program coni'nu«s 



~>' I!', 

BO" SHROUDS 




essionally 
module of 



molded 



Other Models 

'LNW DEfA\'CASE..$32.50 

•LNW SHROUD $27.50 

•"BO" SHROUD $24.50 

Add $2.50 shipping & handling 
N.Y.S. residents add 7% sales tax 
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SYRACUSE R&D CENTER 

Box 125. Dewitt. N.Y. 13214 
"Sp»clillzlng In Elactrontc Packaging" 




.^80 



ttvi ttunax 
IIHI. join MM 



AUTh40RIZED SOUTH EASTERN REGION SERVICE 
CENTER FOR AM ELECTRONICS 




On* Y*or Warranty on Partoc I Taoc Drivai 



-WMMM Dri.* Ill AMI U4»a> 



1'OISK PERTEC FLIPPY tlHSOO 
1 DISK TEAC 11t7S 00 



iW BARE DRIVES 
i'J,- COMPLETE DRIVES 



EPSON PftlNTEIK KAU 



^2 



iV." FLOPPY DRIVE REPAIR 
US. Flat R*l« pivl Partt 

OPEN 3-9 pm (EST) MON— FRI 
Tochnklon ovaitabl* oftof 5 PM. 



Cill II* wHIi an tf^H. Wt IM V* • CMHWdion - M 

< tBt ) Ml Him for your WM 



Bayvsian 

InvQstment 

S«rvic«s 

Send for free catalog 
discussing TRS-80 
programs available for 
evaluating: 

Options & Futures 

Stocks & Bonds 

Convertible 

& Other Hedges 

Portfolio Position 

Tax Positions 

Market Timing 

Write or call: 
Bay«slan ^.se 
InvQstment 
Services 

Dept. H3 

757 Santa Rosita 

Solana Beach, CA 92075 

(714)755-6225 



MAKE «*$$$ 
**«$ MONEY 

Selling 80 Microcomputings the only major journal for tiie users of the 
TRS-80*, it a sure bet for getting the computer enthusiast into your 
store. Once through the door you can sell him anything. 

We know "8o" will make you money. . .it's the only magazine for the 
TRS-80* users and you know how many of those there are. So call today 
and join the dealers who make money with ^^80". 

For information on selling 80 Microcomputing, call 603-924-7296 and 
speak with Ginnie Boudrieau, our Bulk Sales Manager. Or write to her 
at 80 Microcomputing, Pine Street, Peterborough, NH 03458. 



'TRS-SO Is a trademark of the Tandy Corp. 
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Program contmned 










4A22 FE4E 


00264 NPUT 


CP 


'N' 


; CHECK IF "N" 


4A24 2054 


002&5 


JR 


NZ, OUTPT 


;B0 IF NOT PRESSED 


4A26 CD3245 


00266 


CALL 


ASPC 


;CXJTPUT (A) + SPACE 


4fl29 CDS 148 


00267 


CALL 


M-IN 


;GET START OF INPUT 


4A2C EB 


0026S 


EX 


DE,HL 


; START -> DE 


4A2D CD7B45 


00269 


CALL 


SPC 


; SPACE 


4A30 215E4C 


00270 


LD 


HL,END+1 


; LOWEST ALLOWED -> HL 


4A33 008348 


00271 


CALL 


ERR 


;Ch«CK IF START IS LOW 


4A36 EB 


00272 


EX 


DE.HL 


jDE < — > HL 


4fl37 C093O2 


00273 


CALL 


293H 


jREAD LEADER 


4A3A 0&08 


00274 


LD 


B,8 


(COUNT -> B 


4A3C CD684A 


00275 


CALL 


».0K 


(INPUT (B) BYTES 


4A3F FE3C 


00276 L7 


CP 


3CH 


;DATA HEADER? 


4A41 2014 


00277 


JR 


NZ, ENTRY 


(NO. mJST BE ENTRY PT. 


4A43 CD2C02 


00278 


CALL 


22CH 


(FLIP/FLOP "«" 


4A46 CD3S02 


00279 


CALL 


235H 


(READ BYTE 


4A49 77 


00280 


LD 


<HL),A 


(STORE IT 


4A4A 23 


00281 


INC 


HL 




4A4B 47 


00282 


LD 


B,A 


;LOAD B WITH COUNT 


4A4C CD&84A 


00283 


CALL 


BLOK 


;REflD IN IB) BYTES 


4A4F CD704A 


00284 


CM-L 


IN2 


;BET 2 MORE 


4A52 CD704A 


0028S 


CALL 


IN2 


(AND ANOTHER 2 


4A55 18E8 


00286 


JR 


L7 


(CONTINUE LOADING 


4A57 CD704A 


00287 ENTRY 


CALL 


IN2 


(GET ENTRY POINT 


4A5A 2B 


00288 


DEC 


HL 


(HL = END OF INPUT 


4A5B EB 


00289 


EX 


DE.HL 


(SAVE HL 


4A3C 3E2D 


00290 


LD 


A,'-' 




4A5E CD3245 


00291 


CALL 


ASPC 


(OUTPUT "-" + SPACE 


4A61 EB 


00292 


EX 


DE,hB- 


(GET END AGAIN 


4A62 CD5E48 


00293 


CALL 


HLOUT 


(OUTPUT END ADDRESS 


4A65 C3A543 


00294 


JP 


BACK2 


( RETURN 


4A68 CD3502 


00295 BLOK 


CALL 


235H 


(SUBROUTINE TO INPUT 


4A6B 77 


00296 


LD 


(HL>,A 


( (B) BYTES FROM TAPE 


4A6C 23 


00297 


INC 


M. 


(AND STORE AT (HL) 


4A6D 10F9 


00298 


OJNZ 


BLOK 




4A6F C9 


00299 


RET 






4A70 EB 


00300 IN2 


EX 


DE,HL 


(SUBROUTINE TO INPUT 


4A71 CD 1403 


00301 


CALL 


314H 


(2 BYTES AND 


4A74 EB 


00302 


EX 


DE.HL 


(STORE IN (HL) 


4A75 73 


00303 


LD 


(HL) ,E 




4A76 23 


00304 


INC 


HL 




4A77 72 


00305 


LD 


(HL) ,D 




4A78 23 


00306 


INC 


HL 




4A79 C9 


00307 


RET 






4A7A FE4F 


00308 OUTPT 


CP 


'O' 


(CHECK FOR "O" 


4A7C 2025 


00309 


JR 


NZ.QUE 


(GO IF NOT PRESSED 


4A7E CD3245 


00310 


CALL 


ASPC 


(OUTPUT (A) + SPACE 


4A81 CDS 148 


00311 


CALL 


HLIN 


(GET START OF OUTPUT 


4A84 ES 


00312 


PUSH 


HL 


(SAVE IT 


4A85 CD7B45 


00313 


C«-L 


BPC 


(SPACE 


4A88 CDS14B 


00314 


CALL 


HLIN 


(BET END OF OUTPUT 

Program corlmms 



they start. 
Tape Input 

If you look at the source co(Je 
listing of the NEWBUG patch, 
you wiil see that the cocje for 
the patch loa(Js into three sep- 
arate blocks of memory start- 
ing at 43DE, 47B2, and 4B51. 
Because the patch is non-con- 
tinuous, it cannot be punched 
to tape to make a backup copy 
with the P command. The input 
command will read in any 
system formatted machine- 
code program and store a byte- 
for-byte image of the taped pro- 
gram in a memory buffer which 
you select. If you have assem- 
bled NEWBUG with an editor/ 
assembler and have the tape 
with the object code nearby, 
load the tape and type N 5000. 
The cassette drive should start, 
the tape should be read in. and 
the * should blink as usual. 
When the program Is finished 
loading, the ending byte of the 
input buffer is displayed. Save 
the starting and ending ad- 
dresses for use with the next 
command. You may examine 
the contents of the buffer with 
the H command if you wish. 

Tape Output 

Until now, the input com- 
mand may seem to be of iittle 
use because the program 
stored in the buffer cannot be 
correctly copied to tape with 
the P command. Well, that's 
what the output command is 




GET THIS ONE FOR THE COOK! 

Tired o1 the same old meals week after 
week? 



exercise some control over the 



Want to 
cook? 

BREAK OUT OF YOUR GASTRONOMIC 

RUT!!! 
MAIN COURSE PLANNER provldet 
self adaptive scheduling of your favorite 
meals. It won't make you a gourmet, but 
its use can increase your eating enjoyment. 

Buy The MAIN COURSE PLANNER Now 

THE COOK WILL LOVE ITU 

TRS-80* 16K MODEL I LEVEL II TAPE 

SEND S9.95 TO. 
SCDC, 223 Cedar Heights Drive, 
Thousand Oaks, CA 91360 

California Residents Please Add 6% Tax 
■TfSdemark of Tandy Corporation ^^589 



JOE COMPUTER PRESENTS WORD GRHMOER 

80,000 

WORDSI 



WORD GRINDER IS A DATA BASE OF OVER 
80,000 ENGLISH WORDS IN ALPHABETICAL 
ORDER WITH SPACES DELIMITING EACH 
WORD. THE TRS-80t AND APPLE VERS/ONS 
INCLUDE A BASIC EDITOR FOR DISPLAYING 
OR EDITING THE DATA FILES USING RAN- 
DOM ACCESS. WORD GRINDER IS AVAIL- 
ABLE FOR TRS-80 MODEL I. II. OR III. APPLE, 
CP/M, RT-! I/HT-! 1 OR ANSI TAPES PRODUC- 
ED ON A PDP-1 ). PRICES START AT S89.95 
FOR MODEL I, III OR APPLE. S 124.95 FOR 
MODEL II, CP/M, RT-! 1 OR ANSJ TAPES. 
MAKE CHECKS PAYABLE TO: 
JOE COMPUTER - PHONE ORDERS AND 
INFORMATION: |2I3) 992-OSM SEND TO. 
JOE COMPUTER. Z2713 VENTURA BLVD.. 
SUITE F, WOODLAND HILLS, CA 91364 

^ 193 
CALIF RESIDENTS ADD (/SALES TAX. 
tTRSaO IS A TRADEMARK OF TANDY CORP. 



»^100 



CainpuCDUEn 

COVER YOUR INVESTMENT 



■CiDlh BKhtO NauQariT 

■iTiD'owo ntin&<iii« 
lonoar Lrif 




THtH WOCHL I 



PKhUt Off* 



Ovu 200 conn, writo tor comp*«rt Hat 



iiAd ihkk it mtiiti t'tv II 



DEOlEIIINQUIIIESiaVIIED 



Uir, El"* 'L 1?MS 
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Expensive 




EXPENSIVE- TheLNW 
System Expansion H comes with a 
full 32K of 200ns RAM. and built-in 
RS232c 20 MA current loop serial interface. 
That's for starters. Next, consider our heavy gauge 
steel case, power indicator lamp, gold-plated 
connectors, FR-4 glass epoxy circuit hoard with 
solder mask and silk screen legends. Then there is 
the parallel printer port, screen printer port, real 
time flock, and extra heavy duty onboard power 
supply with over current protection, over voltage 
protection and thermal shutdown. If that's not 
enough then there is the floppy disk controller, 
guaranteed operation at a 4MHz CPU speed and 
our 6 month warranty. Kvery one of these features 
is STANDARD. This is true system expansion. 
You get every 'expensive' feature without 
spending more. 

CHEAP - Our price is $399.95. Any way you 
compare, features or price, I.NW's System 
Expansion II is the clear winner. The LNW 
System has been field tested for over two years 
with thousands of users. It works with any DOS, is 
IOCS TRS-80 Model I compatible and it works 
'right out of the box'. If there is any doubt in your 
mind as to whether you should buy ours or the 
'other guys', just ask an LNW owner! 

WE ARE §1 - Number one in price, features, 
reliability, performance and delivery. I.NW is 
committed to 'expensive' features and quality at 
reasonable prices. LNW is committed to support, 
thorough documentation, and reliabilitv- 

LNW Research Corp. 

2620 WALNUT Tustin, CA. 92680 
(7141 641-8850 (714) 544-5744 



made us the numtjer one 
manufacturer of system expansion units 

and accessories for the Model 1 computer. 

EXPANSION OPTION - 8 inch drive capability 
is as easy as plugging in the LNDuubler HIS 
option*. Now you can have any combination of 
single- or double-density, single- or double-sided. 
8"* and/or 5" disks on-line! 8-inch di^k storage 
increased to 591,360 bytes 77-track single-sided, 
double-density or 1,182,720 bytes - 77-track 
double-density, double-sided. 

The LNDoubler's unique 5/8 switch allows you 
to boot from 5- or 8-inch system disks and it's 
accessible from outside the interface. The S219.95 
LNDoubler 5/H comes with a double density disk 
operating system (DOS+ 3.3.9), complete with 
BASIC and utility programs... ready to run your 
software. 

Each of your present 40-track, single-sided 5-inch 
drives will store up to 184.320 bytes (formatted 
storage) - that's an 80% increase in stctrage 
capacity for only half the cost of just one disk 
drive. With three 8-inch double-density, 
double-sided drives your Model 1 will have 3.75 
Megabytes of online storage - that's more storage 
than a Model II or Model 111' 



'M' driic ii[iprHl 1(111 reqtii 
ii,-iihlr drnsiH feniiirt.. i ' 
m.-iili..iii..ii i.r I.NW-Wi-iMH- 




\MH/ ri'|- Sliced !■[> 
.,iTI|..il..r 



for. Position the tape to where 
you wish to dump a backup 
copy, press the record and play 
buttons, and type O followed by 
the starting and ending ad- 
dresses you should have saved 
from the last command. The 
tape wili start rolling and a 
copy of the original program 
will be written to tape. If you 
want to make another copy of 
the program, just use the out- 
put command again using the 
same addresses. Unless you 
wipe out the copy of the pro- 
gram in the buffer, there is no 
need to load it for each copy 
you make. If you try to input 
into a buffer less than 4C5C, 
the computer will respond with 
an E. This is to protect 
NEWBUG from being written 
over accidentally. 

Cue Tape 

While positioning tapes for 
reading or writing, the small 
grey remote plug on the cas- 
sette recorder is constantly be- 
ing pulled out. This leads to bent 
and worn out plugs. In an effort 
to save the plug, the Q com- 
mand transfers control of the 
cassette to you. Control will be 
returned to the computer when 
you hit the X key. 

Block Ssarch 

Some machine-code mon- 
itors have commands to search 
for occurrences of one or two 
bytes. I found the need to search 
for a string of three or more 
bytes at a time, so the variable 
length block search command 
became part of NEWBUG's 
menu of commands. 

Suppose we wanted to know 
from where in ROM the sub- 
routine for clearing the screen 
(located at 01 09) was called. To 
do this, we have to search loca- 
tions 0000 to 3000 (the block of 
memory containing the ROM) 
for occurrences of CD C9 01 
which Is the machine code for 
the Instruction call 01C0. Type 
S 0000 3000 CD C9 01 and press 
Enter. The addresses are found 
and displayed eight to a line. 
Go ahead and use the M com- 
mand to verify that the code is 
actually at these addresses. 
The uniqueness of this com- 
mand is that the search key (In 
this case CD 09 01) may be 
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program continued 










4A8B 


E5 


0031S 


PUSH 


HL 


;BAVE IT 


4A8C 


CD7B43 


00316 


CALL 


SPC 


; SPACE 


4A8F 


Dl 


00317 


POP 


DE 


J POP END INTO DE 


4A90 


El 


00318 


POP 


rt. 


;POP START INTO HL 


4A91 


13 


00319 


INC 


DE 


; INC TO INCLUDE LAST BYTE 


4A92 


CD834a 


00320 


CALL 


ERR 


'yCHECK FOR START >END 


4ft'?3 


CD8402 


00321 


CALL 


284H 


; WRITE LEADER 


4A98 


7E 


00322 LB 


LD 


A, (HL) 


;DATA -> A 


4fl99 


CD6402 


00323 


CALL 


264H 


; OUTPUT A 


4A9C 


23 


00324 


INC 


HL 


i POINT TO NEXT 


4A9D 


DF 


00323 


RBT 


\BH 


J CHECK IF DONE 


4A9E 


58F8 


00326 


JR 


C,LB 


iCONINUE IF NOT 


4AA0 


C3A543 


00327 


JP 


BACK2 


; RETURN 


4AA3 


FE51 


0032S QUE 


CP 


•0' 


;CHECK FOR "Q" 


4AA5 


2011 


00329 


JR 


NZ, SEARCH 


;Ga IF NOT PRESSED 


4AA7 


CD3245 


0033O 


CALL 


ASPC 


; OUTPUT 1A> + SPACE 


4AAA 


3E04 


00331 


LD 


A, 4 


;SET BIT 2 


4AAC 


D3FF 


00332 


OUT 


(OFFH),A 


;TURN ON CARSFTTE 


4AAE 


CDC845 


00333 Bll 


CALL 


INKY 


;SCAN KEYBOARD 


4AB1 


FE58 


00334 


CP 


'X' 


jSTOP? 


4AB3 


20F9 


00335 


JR 


NZ.Bll 


;CONTINUE IF NOT 


4AB5 


C3A543 


0033A 


JP 


BACK2 


{RETURN 


4ABB 


FE53 


0O337 SEARCH 


CP 


•S' 


(CHECK FDR "S" 


4ABA 


206F 


00338 


JR 


NZ , TRANSF 


;G0 IF NOT PRESSED 


4ABC 


CD3245 


00339 


CALL 


ASPC 


; OUTPUT (A) ♦ SPACE 


4ABF 


CD514S 


00340 


CALL 


HLIN 


;GET START OF SEARCH 


4AC2 


E5 


00341 


PU8H 


HL 


[SAVE IT 


4flC3 


CD7B43 


00342 


CALL 


SPC 


; SPACE 


4AC& 


CD514B 


00343 


CALL 


HLIN 


)GET END OF SEARCH 


4AC9 


E3 


00344 


PUSH 


HL 


;SAVE IT 


4ACA 


CD7B45 


O034S 


CALL 


SPC 


; SPACE 


4ACD 


Dl 


00346 


POI* 


DE 


;PDP END 


4ACE 


El 


00547 


PUP 


HL 


(POP START 


4ACF 


13 


00348 


INC 


DE 


; CORRECT COUNT 


4AOO 


CD8348 


00349 


CALL 


Ef« 


; CHECK FOR START >END 


4A03 


E3 


00330 


PU»1 


HL 


iSflVE START AGAIN 


4AD4 


D5 


00331 


PUSH 


DE 


;SAVE END ALSO 


4ADS 


CD8945 


00332 


CALL 


INA 


jGET 1st BYTE OF KEY 


4ADS 


210042 


00353 


LD 


M-,4200H 


; START OF KEY BUFFER 


4ADB 


OEOO 


00354 


LD 


C.O 


; COUNT = 


4ADD 


77 


00355 


LD 


(HL> ,A 


;SAVE BYTE 


4ADE 


D9 


00356 L9 


EXX 




;SAVE REGISTERS 


4A0F 


CD7B43 


00357 


CALL 


SPC 


i SPACE 


4AE2 


09 


003,-iR 


EXX 




;GET REGISTERS 


4AE3 


2B 


00359 


DEC 


H. 


|DEC BUFFER ADDRESS 


4AE4 


OC 


00360 


INC 


C 


J INC COUNT 


4AES 


D9 


00361 


EXX 




J SAVE REGS 


4AE6 


CDC843 


00362 


CALL 


INKY 


jGET 1 INPUT 


4AE9 


FEOD 


00363 


CP 


ODH 


jC/R? 


4AEB 


280F 


00364 


JR 


Z,B12 


i IF SO THEN START 


4AED 


CDA743 


00363 


CALL 


LST 


{ELSE GET OTHER HALF 


4AF0 


CD8C45 


00:VtA 


CALL 


INA 4^3 


;OF THE INPUT 


4M^3 


D9 


00367 


EXX 




;GET REGS 


4AF4 


77 


00368 


LD 


<HL>,A 


; STORE BYTE 


4AFS 


3EOF 


00369 


LD 


fl.OFH 




4AF7 


B9 


00370 


CP 


C 


i 16 INPUTS? 


4AFB 


20E4 


00371 


JR 


NZ,L9 


)GO IF NOT 


4AFA 


OC 


00372 


IMC 


C 


(CORRECT COUNT 


4AFB 


D9 


00373 


EXX 




;SAVE REGS 


4AFC 


CD3C45 


00374 B12 


CALL 


CRS 


(OUTPUT A C/R 


4AFF 


D9 


O0375 


EXX 




(GET REGS 


4BOO 


Dl 


00376 


POP 


DE 


(END OF SEARCH 


4B01 


El 


00377 


PUP 


rt_ 


; START OF SEARCH 


4B02 


41 


00378 B13 


LD 


B,C 


(COUNT -> B 


4B03 


DD210042 


00379 


LD 


IX,4200H 


; START OF LOOKUP KEY 


4B07 


DD7EOO 


00380 B14 


LD 


A, (IX) 


[SET KEY BYTE 


4BOA 


002B 


00381 


DEC 


IX 


(DEC KEY POINTER 


4BOC 


23 


00382 


INC 


HL 


(INC HEMORY POINTER 


4BOD 


BE 


00383 


CP 


(HL) 


; MATCH? 


4BOE 


2013 


00384 


JR 


NZ,B15 


J GO IF NOT 


4B10 


10F5 


00383 


DJNZ 


B14 


(LOOP B TINES 


4B12 


E5 


0O386 


PUSH 


HL 


(SAVE 


4B13 


C3 


D0387 


PUSH 


BC 


(SAVE 


4B14 


AF 


003Rn 


XOR 


A 


[CLEAR CARRY 


4B1S 


47 


00389 


LD 


B.A 


[B>0 


4B16 


ED42 


00390 


SBC 


HL.BC 


((HL)-START OF FIND-1 


4B1B 


23 


00391 


INC 


HL 


[CORRECT (HL) 


4B19 


CD5E4a 


00392 


ciajL 


ML OUT 


(OUTPUT thfl.) + SPACE 


4B1G 


06O3 


00393 


LD 


B,3 


(OUTPUT 3 MORE SPACES 


4B1E 


CD7B45 


00394 SPA3 


CALL 


SPC 




4B21 


lOFB 


00395 


DJNZ 


SPA3 




4B23 


CI 


00396 


POP 


BC 


(POP 


4B24 


El 


00397 


POP 


HL 


(POP 


4B2S 


DF 


00398 BIS 


R8T 


ISH 


; IS SEARCH OVER? 

Program continues 



Program continued 










4B2& 3aDA 


0O399 


JR 


C,B13 


;B0 IF NOT 


4B28 C3fl543 


00400 


JP 


BACK? 


;RETURN IF FINISHED 


4B2B FE54 


0O401 TRftNSF 


CP 


'T" 


{CHECK FOR "T" 


4B2D 2046 


00402 


JR 


NZ, WRITE 


;B0 IF NOV PRERRFD 


4B2F CD3243 


00403 


CALL 


ASPC 


{OUTPUT (A) + SPACE 


4B32 CDS14B 


00404 


CALL 


HLIN 


;BET START OF SOURCE 


4B33 E5 


00405 


PUSH 


HL 


{SAVE IT 


4B36 CD7B45 


0040& 


CALL 


SPC 


{SPACE 


4B39 CD514B 


00407 


CALL 


HLIN 


{GET END OF SOURCE 


4R-W; E3 


00408 


PUSH 


HL 


iSAVE IT 


4B3D CD7B45 


00409 


CALL 


SPC 


{SPACE 


4B40 CD514B 


00410 


CALL 


HLIN 


;SET START OF DESTINATION 


4B43 E5 


00411 


PUSH 


HL 


{SAVE IT 


4B44 CD7B45 


00412 


CALL 


SHC 


; SPACE 


4B47 CI 


00413 


POP 


BC 


{DESTINATION -> BC 


4B4a Dl 


00414 


POP 


DE 


;SOUHCt END -> DE 


4B49 El 


0O415 


POP 


HL 


{SOURCE START -> HL 


4B4A CD834B 


00416 


CALL 


ERR 


{CHECK IF START>END 


4B4D EB 


00417 


EX 


DE,HL 


{DE < — > HL 


4B4E AF 


004ie 


XOR 


A 


{CLEAR CARRY 


4B4F ED52 


00419 


SBC 


HL.DE 


{BET BYTE COUNT- 1 


4B51 23 


004 20 


INC 


HL 


{CORRECT IT 


4BS2 D3 


00421 


PUSH 


DE 


{PUSH ALL ONTO STACK 


4B53 C5 


00422 


PUSH 


BC 


{TO SWITCH 


4B54 E5 


00423 


PUSH 


HL 




4B55 CI 


00424 


POP 


BC 


{BYTE COUNT 


4BS6 Dl 


00425 


POP 


DE 


(DESTINATION 


4B57 El 


0042£> 


POP 


HL 


;50Ur«:E 


4BSB ES 


00427 


PUSH 


HL 


{SAVE AGAIN 


4859 B7 


00428 


OR 


A 


{CLEAR CARRY 


4BSA ED52 


00429 


SBC 


HL.DE 


{FIND MOVE DIRECTION 


4B5C El 


00430 


POP 


HL 


{GET SOURCE AGAIN 


4BSD 3aO£> 


00451 


JR 


C.B16 


;BO IF HOVE BACKWARDS 


4BSF EDBO 


00432 


LDIR 




{MOVE IT 


4B61 EB 


00433 


EX 


DE.HL 


{DE < — > HL 


4B62 2B 


00434 


DEC 


HL 


{CORRECT TO END 


4B63 leOA 


0O435 


JR 


B17 




4B(S'l 09 


00436 B16 


ADD 


W.,BC 


{FIND START OF MOVE+1 


4B&£> 2B 


00437 


DEC 


ML 


{CIWRECT START 


4B67 EB 


00438 


EX 


DE,HL 




4B£i8 09 


0043V 


ADD 


HL,BC 


{FIND END OF MOVE+1 


4B69 2B 


0044O 


DEC 


HL 


{CORRECT ALSO 


4B&A EB 


00441 


EX 


DE.HL 




4B&B D5 


0044Z 


PUSH 


DE 


(SAVE END 


4B6C EDB8 


00443 


LDDR 




{HOVE BACKWARDS 


4B6E El 


00444 


POP 


HL 


{POP END FROM STACK 


4B6F CD5E48 


00445 B17 


Cffl-L 


HLOUT 


{DISPLAY END 


4B72 C3fl543 


00446 


JP 


BACK2 


{RETURN 


4B75 FE57 


00447 WRITE 


CP 


'W' 


(CftCK FOR "W" 


4B77 2074 


00448 


JR 


NZ.ZERO 


;G0 IF NOT Pf^SSED 

Program continues 



from one to sixteen bytes long. 
If the key is sixteen bytes long, 
execution will begin auto 
maticaily. However, it the key Is 
less than sixteen bytes long, 
press Enter to start execution. 
Take care not to search for a 
byte or bytes which may occur 
at a great number of places 
because the command will 
print page after page of ad- 
dresses without stopping until 
it has listed them all. If you 
don't have a full 48K of 
memory, typing the command S 
COOQ FFFE FF Enter will show 
you what I am referring to. 

Block Transfer 

Transferring blocks of data 
from one place to another in 
memory requires writing a 
block move program and ex- 
ecuting it. I found myself doing 
this so frequently that the 
transfer command was created 
to save time. As an example of 
this command's use, let's move 
the first page of ROM (0000 to 
OOFF) into RAM starting at 
5000. Press T followed by the 
source block addresses 0000 
and OOFF. Follow this with the 
starting address of the destina- 
tion block which In this case is 
5000. In no time at all the end- 
ing address of the destination 
block is displayed and the ' 
prompt returns ready for your 
next command. Type H 5000 to 
have a glimpse of the data that 
was just transferred. You may 
wish to perform a checksum on 



GET YOUR 
TRS-80 DIRECT 



FORT 



MmOMZED UUI CEITER 



AND 



WORTH ClJMPliTERS VIDEO 

377 PUZA, HWY 377 GMNBURY 

H)RT WDRTK TX TBMB -^^^ 



AND SAVE $ 




Qmt our quotm 'btlote' you buy 

FiMl irtMnufactunn' innnnt. 

TtJTu r^uOerYtt Mtf 4% M«M tax 



817-573-4111 



COST OF CALL flERMDED FOR OROBtS BT TB.EPHONE 



TRS«0 SOFTWARE 

M<t«t*r Disk Ittilax (MDI); S12/cassetle. 
$16 'SW disk Creiales and maintains a 
master !ile of disk directories updated by 
automatically reading each disk's directory 
MDI rtx'ords may be selectively displayed, 
pnnt«d or deletwJ by either stnng matching or 
record number Uses fast machL'-.e code sort 
NEEDS 32k, 1 disk Leve: II Basic 

Lunar Londar $!0'<L;.assette Solidly based on 
physics Displays L^:e landscajie, crail and 
changing naviyaLonal miormabon NEEDS 

16k Uvd II Basic 

Othallo 3.0: JlO'cassette Better than the 
bodrd game Much better because ;1 fdays you 
vs THS BO, you vs a fnend, or THS-80 vs. it- 
self Slaughters programs that maxL-nizecap 
tures NEEDS: 16k Levd 11 BASIC 

Note: NY residents add sales tax 
CUSTOM SOFTWARE 
PC Box 3241 Raymond Avenue 
Pouqhkeepsie, NY 126C'3 




Computes the acceleratton 
time for starting electric 
motors unijer load 

INE - Calculates pressure versus 
flowrate curve data points 
for pipelines 

Analyies branched pfplng 
N systans to detereiine 

flowrates and pressures 

For MOOtL I LEVEL II 16K 
CASSETTE OB DISK 



MOTOR START 
, PIPELINE 
PIPE DESIGN 



il9.95 
S?9.95 
S49 . 95 



ALL THREE S7S.O0 

AX SIO.OO FOR DISK 

SEND CHEC< OB MONEY ORDER TO 



PRACTICflL ANALYSIS 

65ie LA MORA 
HOUSTON. TEX 77QS3 ►'386 

Ji^Jr=Jf-Jp:J.-=:j=;r=^r=.'f=Jr=^r^T.'?=,r£J;=jnJ^Jr~,.!i -^,=j^ 




^See List at Ativeriisers on page 402 
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the two blocks 0000 to MFF 
and 5000 to 50FF to see that 
they are Identical. The source 
and destination blocks were 
not overlapping but the com- 
mand can handle them without 
losing data If they do overlap. 

Direct Register Write 

Did you ever wish that you 
could step in and write values 
directly Into the active registers 
to alter the flow of a program 
that you were debugging? If so, 
you will enjoy this next com- 
mand. Press Wand you will see 
the contents of the AF register 
pair followed by a /. If you want 
to place a 1234 In the BC 
register pair and a 5678 in the I Y 
Index register, press Enter to 
advance to the BC pair and type 
1234. Now press Enter until the 
lY register Is displayed and 
type 5678. it's that easy. Are 
you convinced that they were 
changed? Don't take my word 
for It. Press R and see tor 
yourself. 

Zero Memory 

This command will clear (by 
writing in OGs) any block of RAM 
memory. By typing Z 4C5C 
BFFF, the programming work- 
space of a 32K machine will be 
cleared. Users with a 48K 
machine will notice that Z 4C5C 
FFFF yields little more than an 
E being displayed. This Is be- 
cause the computer Interprets 
FFFF as a - 1 . However, Z 4C5C 
FFFE works fine. This Is a de- 
structive command. Choose 
values wisely. 

Memory Teat 

As a finish, press * and wait a 
moment. The resulting output 
tells you that the memory has 
been checked and Is valid to the 
displayed address. If this first 
value Is not your machine's top 
of memory, the ceil at this ad- 
dress plus one may be faulty or 
intermittent. Press * a few 
times to confirm the results of 
the test. The test starts with the 
RAM Immediately following 
NEWBUG. The test Is non- 
destructive and does not 
change any of the memory that 
is tested. The second line of 
this output tells you at what 
size you set the current 
n^emory. In case you do not 
remember. ■ 
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Pmgtam conUnutd 












4B79 CD3C4S 


0O449 




CALL 


CRS 


(OUTPUT A C/R 


4B7C FD212D48 


0O4SO 




LO 


IV,REBS+fl 


(POINTS TO T-nUG'S AF REG 


4B80 DD21CE4B 


00451 




LD 


1 X , nE»NbG 


; START OF MESSAGE 


4B84 EDSB3D4e 


00432 


B18 


LD 


DE, (CURSR) 


(CURSOR -> DE 


4B8B O&OS 


0O433 




LD 


8,3 


(CHAR COUNT = 3 


4B8A DD7E00 


00434 


LIO 


LD 


A, (IX-H)) 


I GET ChlAR 


4B8D B7 


00435 




OR 


A 


(TEST FOR ZERO 


4RRF CAAS43 


0045& 




JP 


Z,BACK2 


(RETURN IF DOtC 


4B91 12 


00457 




LD 


(DE) ,A 


; STORE ON SCREEN 


4B?2 DD23 


004S8 




INC 


IX 


1 INC MESSAGE PTR 


4B94 13 


00439 




INC 


DE 


1 INC SCREEN PTR 


4BV5 10F3 


004&0 




DJNZ 


LIO 


iLOOP 5 TirES 


4B97 EDS33D4B 


0O4&1 




LD 


<CURSR>,DE 


(SAVE NEM SCREEN POSITION 


4B9B FIM.&01 


00462 




LD 


H, <IY*1) 


|BET VALUE OF CURRENT 


4B9E FD&EOO 


00463 




LD 


L, (lY+O) 


(REGISTER INTO HL 


4Bni FD23 


00464 




INC 


IV 


(UPDATE RES PTR 


4BA3 FD23 


004AS 




INC 


lY 




4BA3 CD3E4S 


OOAbh 




CALL 


HLOUT 


(OUTPUT OLD RES CONTENTS 


4BAB 3E2F 


0O467 




LD 


A,'/' 


(OUTPUT A "/" 


4BAA C03245 


00468 




OAU- 


ASPC 




4BAD CDCa4S 


00469 




CALL 


INKY 


(GET INPUT FROM KEYBOARD 


4BBO FEOD 


OO470 




CP 


ODH 


[CHECK FOR <ENTER> 


4BB2 2811 


00471 




JR 


Z,B19 


(BO TO NEXT IF PRESSED 


4BB4 CDA745 


00472 




CALL 


LST 


(GET SECOND HALF OF A 


4BB7 CDSC4S 


0O473 




CALL 


INA+3 




4BBA CDS54a 


0O474 




CALL 


ft_irH^4 


(CALL HERE TO COMPLETE 


4BBD E8 


00475 




EX 


DE,f«_ 


(PUT NEW VALUE IN DE 


4BBE FDES 


00476 




PUSH 


lY 


(GET REGISTER PTR 


4BC0 El 


00477 




POP 


HL 


I IN HL 


4BC1 2B 


0O478 




DEC 


HL 




4BC2 72 


00479 




LD 


<H-) ,D 


tSTUKL NEW MSB 


4BC3 2B 


0O480 




DEC 


HL 




4BC4 73 


00481 




LO 


{^>,E 


1 STORE NEW LSB 


4BC:S DDES 


00482 


B19 


PUSH 


IX 


(SAVE MESSAGE PTR 


4BC7 CD3C4S 


00483 




CALL 


CRS 


(OUTPUT C/R 


4BCn DOEl 


00484 




POP 


IX 


(RESTORE MESSAGE PTR 


4BCC 18B6 


00485 




JR 


BIB 


(CONTINUE 


4BCE 41 


00486 


ME91EG 


DEFM 


'AF - BC " DE 


= HL = IX = lY - • 


4BEC OO 


004B7 




DEF8 





(0 MARKS THE END 


4BED FE5A 


00488 


ZERO 


CP 


■Z' 


(CHECK FOR "Z" 


4BEF 201C 


00489 




JR 


NZ , TEST 


;GO IF NOT PRESSED 


4SF1 CD324S 


00490 




CALL 


ASPt: 


[OUTPUT (A) + SPACE 


4BF4 CD314B 


0049I 




CALL 


HLIN 


(GET START 


4BF7 E5 


00492 




PUSH 


HL 


(SAVE IT 


4BF8 CD7B45 


00493 




CALL 


SPC 


(SPACE 


4BFB CDS 148 


00494 




CALL 


HLIN 


(GET END 


4BFE Dl 


00493 




POP 


DE 


[POP START 


4BFF EB 


00496 




EX 


I1E,HL 


(SNITCH THEM 


4CDO 13 


00497 




INC 


DE 


1 INCLUDE LAST BYTE 


4C01 CD8348 


0049B 




CALL 


ERR 


(CHECK FOR START >END 


4C04 3600 


00499 


B20 


LD 


(HL>,0 


(-ZERO" (HL) 


4C06 23 


OOSOO 




INC 


HL 


(POINT TO NEXT 


4C07 DF 


OOSOt 




RBT 


IBH 


(CtECK IF DONE 


4C08 38FA 


00S02 




OR 


C,B20 


[60 IF NOT 


4C0A C3A343 


00303 




JP 


back:2 


(RETURN 


4CO0 FE2A 


00SO4 


TEST 


CP 


•»' 


[CHECK FOR ■»■ 


4COF C20144 


0OSO3 




JP 


NZ.NOiC 


(BACK TO T-BUG IF NOT 


4C12 213A4C 


00S06 




LO 


HL,nES2 


(GET MESSAGE 


4C15 CD5349 


00307 




CALL 


OUTMES 


(OUTPUT IT 


4C18 21SD4C 


00908 




LD 


HL.END 


(START OF (ISI-R MEMORY 


4C1B 23 


00309 


Lll 


INC 


HL 


irCXT BYTE 


4C1C 7E 


00510 




LD 


A, (HL> 


[GET CONTENTS 


4C1D 47 


00311 




LD 


B,A 


(SAVE IN B 


4C1E 2F 


00312 




CPL 




iCOnPLLTENT (A) 


4C1F 77 


005J3 




LD 


(H_>,A 


(PUT BACK IN (HL) 


4C20 BE 


OOS14 




CP 


(HL) 


(TEST MEITORY CELL 


4C21 70 


00513 




LO 


(HL),B 


(RESTORE TO ORIGINAL 


4C22 28F7 


00516 




JR 


Z,L11 


(CONTINUE IF ZERO 


4C24 28 


00317 




DEC 


HL 


(BACK UP TO LAST GOOD 


4C23 CD3E48 


00518 




CALL 


HLDUT 


(OUTPUT LAST GOOD BYTE 


4C28 214C4C 


0O519 




LD 


HL,nES3 


(SET KCXT MESSAGE 


4C2B CD3349 


00520 




CALL 


DUTTES 


[OUTPUT IT 


4C2E 2AB140 


00321 




LD 


H_, (40B1H) 


(GET MEMORY SIZE 


4C31 CD3E4e 


00522 




CALL 


H-DUT 


[OUTPUT ALSO 


4C34 CD3C4S 


00523 




CALL 


CRS 


[OUTPUT C/R 


4C37 C:3AS43 


OOS24 




JP 


BACK2 


[RETURN 


4C3A OD 


0O325 


rc&2 


DEFB 


ODH 


[C/R 


4C3B 4D 


00S26 




DEFM 


'nEMUKY VALID 


TO ' 


4C4B OO 


00527 




DEFB 





|D MARKS THE END 


4C4C OD 


00528 


MES3 


DEFB 


ODH 


[C/R 


4C4D 40 


00329 




DEFM 


'rCHCWY BET AT 


' 


4C3D OO 


00530 


END 


DEFB 





|0 MARKS THE END 


4762 


00531 




END 


NEWBUe 


Prognm conthuMt 



**SPECIAL**SPECIAL** 

TRS-60 ADD ON DRIVES 
IMMEDIATE DELIVERY 



SINGLE SIDED $225.00 
DOUBLE SIDED $345.00 



COMPLETE SYSTEMS 
SINGLE SIDED $365.00 
DOUBLE SIDED $485.00 

INCLUDES: 
MINI DISK DRIVE 
FUSED POWER SUPPLY 
VENTED CABINET 
CABLE 

90 DAY WARRANTY 
FACTORY ASSEMBLED 
FACTORY TESTED 

THESE ARE NEW 5" FD's 



I 



2 INTERFACE, INC ^246 

20932 CANTARA ST 
CANOGA PARK, CA 91304 
(213)341 7914 

VISA AND MASTER CHARGE ACCEPTED 



HARD DISK FOR 

TRS-80* 
MODELS I & III 

The PSM-W5 

FEATURES: 

• Seagate ST506 5.25" drive 
•5.0 Megabytes formatted 

capacity 
•Full block buffering 
•Winchester controller 

• Error accommodation 

• OEM-style packaging 

PRICING: 

PSM-W5 (open frame) $2300 

Additional 5MB drive 1500 

Multiuser interface 500 

Cabinet 250 

LDOS operating system 149 

for more into contact: 

r^C tK /I programming 
I ^^1 wlandsv^tems 
1 # w T I managemenUnc 

P.O. Box 1877 
Kettering, OH 45429 

(513) 426-8644 

•TRS-80 is a trademark of Tandy Co. 



CANADIANS 

NOW IN STOCK 

ACORN SOFTWARE 

BIG FIVE 
SOFTWARE 

Super action with SOUND 

& Machine Language SPEED 

Also good Utilities 

Mod I & Mod III 

Cass or Disk 

Excellent 5 i " Diskettes 

Single Density S5 50 

Double Density S5.95 

Fully guaranteed' 

Lovi/er-case Modification 

One 10 No Descenders 

Kit $29.95 

IBM Selectric Printer 
Conversion Kit $825.00 

SEND FOR FREE INFORMATION 
We accept VISA 

CMD MICRO 

PO BOX 1212 

Edmonton, Alberta 

T5J 2M4 



Quality Products With Support And Service For Less! 1 1 



16K Radio Shack Model 3 computer $839-48K for $899 
With 2 40 track drives $1890 and a RS232 for $1959 
16Kfor the Radio Shack Model 1, 3, and Apple 2+ $16 

Percom Electric Crayon — add color and hl-res graphics to your model 1 $ 1 39 

Ttic Connection— for Model 1—300 baud— orig. only fi. direct connect for $1 19 
Lex 1 I coupler— 300 baud— orlg/ans-half/full duplex $ 1 29 

Omnltek 40 track drive w/p.s. S^ case $295—80 track $395—5 8. 3 ms access 
Omnitek 80 track dual head drive with p.s. and case $499 
Omnltek 8" disk drive power supply and case $69^ 

Omnitek Power Supply and Case for 5" drives $63 and for 8" drives $ 1 39 
Omnitek cables for 5" drives — 2-drive for $24 and 4-drive for $29 
Omnitek cables for 8" drives — I -drive for $24 and 2-drive for $34 
Economy 5" double density disks $24 with center rings $28 
Disks for 8" drive — double density $36 

1 2' B&.W Leedex (Amdek) Monitor $ 1 1 4 and 10" Bfi^W APF Monitor $99 

Base 2 printer $539 C.ltoh Starwriter $1439 

Okldata Mlcrollne 80 printer $369 Tractor $50 

Okidata Mlcrollne 82A printer $499 and 83A $749— 1 ZOcps, uc/lcygraphics 




commcxlcjra 



Call for Quotes on Epson, Apple, and Commodore equipment. 

Dealer Inquiries Invited. Mass. Residents add 5% Tax. F.O.B. Tewksbury. freight extra. M/C, Visa or check accepted. 
TRS-80 is a reg. trademark of Tandy Corp. ^^^ 

Omnitek Computers International Inc., 1899 Main St., Tewksbury, Ma 01876 



r'See List ol Advertisers on page 402 
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FRICTION FEED FOR YOUR EPSON 

MX-70' MX-80 



• Canrtilt jour iirlntfr Idi Irlcllan 
(ff( sf SINGLE SHEEIS at ROLl 
P*P£R, 

• SIMPK InstalKliDn 1*11 rou 
neeJ u * tcrmdiixr. no loifltfirg 

• Triclgr Ittt rtnilfli un4tilurbta 

• Proutn rthibiiilr 4.^ '^^^ 

• A<ii>itlc NOIII! ^"~^^^^/ 

' Only *3^, W iite II. iD fDr'o8it«9(r 



^470 MICRO-CHIP, LU 
P. Q. lOX 03 
\ I MHttt C*r( Auntta LAFB VA ZXit 

BD4} i;t-StD! 

• •• IRS-SD SOflWARE "' 




DELTA PRESENTS 

PRICES WITH BYTE 



MODEL II; 

2K Molltng Uti-Keep rrack at 2.000 nam«s & 
aMrsssK. rBtrelvB any ons In 7 seconds The most 
sopfitslcoled moHet on tlw mattm Wftfi Zlp-swflng 
motllrtg lobsl prim«r t349.9S 

DMMU (DIsk/Mtmonr Monogemwit L;tlM11as) - Reod. 
write, move and copy any sectot on any dlW. 0( seotcti 
a dIsK tor □ specfXc rwx a ASCIi sfrtng Use DISASSTRS 
to dlSOSSen^Ue or^htng in memory to tilgrity-reodatHe 
Z-80 mnemonics 134 95 

DCS NU-BASIC- Better mon me oltw extended 
BASICS, lof mucfi lessi Sort & seorcfi orroys. PEEK & 
POKE, reod frofTi CRT. slngle-slefi BASJC, if»«T & 
dete'e lines urde* progtom control creara imkaOle 
BASIC modules whicr looo & eiecuie wmour closing 
files or erasing vonoDles use ON BRf AK GOIO fo trap 
intetrupts. better line & string editing, single-line 
dupllcote & relocate, run type oheod . 80X48 
groptilcs, muffHine functions, mucn more Must be 
seen to Oe Deilevedi SI 70 

DCS CUSTOM SERVICES-We provide fully custom 
softwore of rne industry s most reosonobU roles Coil 
or write for details 

MODEtl/ll 

MAGIC-Thols who' we call our Advanced Gropnics 
InstfucMon Coufse Learn to drow a-dimensionol 
sr)opes and curves rnat look rii-res> Volume i ovoiiobie 
nowfor4Kl.l6KI1&ltl $9.95 

MODSMON-Examine n^odlfy. dump & load to lope. 

compute JB voluBS tor Hond-ossembfy 

f6KIII t9.95 

DISASSTRS -Mocr^lne code disossen^bier 16KII or 
III 99. 9S 

MODEL n DISKS (tot of 10} t3«.H 

We Invite submlssloni from all softwa's authors. 

Highest royalties paid For more 

Information, call or writ* 



DELTA COMPUTER SYSTEMS 

668 Chenongo Street 
BInflhamton, NY 13901 ^p. 
(607)722-9593 ■.570 513^^ 
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A DEI 

A" 



Program contir}iMd 
















ARITHM 


489B 


OOOM> 


O0O61 












ASPC 


4532 


00009 


0006G 


00079 OOOS4 


00098 


OOI47 


00163 


001 79 








00228 


00266 00291 


00310 


00330 


00339 


00403 








00468 


00490 










Bl 


48A9 


000 72 


00076 












BIO 


4AOD 


00252 


00230 












Bll 


4AAE 


00333 


00335 












B12 


4AFC 


00374 


00364 












B13 


4B02 


00378 


00399 












B14 


4B07 


00380. 


0038S 












BIS 


4B2S 


0039B 


00 384 












Bib 


4B65 


00436 


00431 












B17 


4B6F 


00445 


00435 












BIG 


4B84 


00452 


0048S 












B19 


4BC5 


00482 


00471 












B2 


4BB& 


00078 


0OO74 












B20 


4C04 


00499 


00502 












B3 


48D3 


00094 


00092 












B4 


4909 


00120 


OOllS 












BS 


4935 


00147 


00145 












B& 


49AE 


00198 


00195 












B7 


49BO 


00199 


00197 












BB 


49B8 


00203 


002 13 


00215 










B9 


4A06 


0024& 


00235 












BACK 


43CD 


00006 


00065 












BACK2 


43A5 


OOOOS 


00059 


00095 00119 


00132 


00150 


00263 


00294 








00327 


0O336 00400 


00446 


00456 


00S03 


00524 


BLOK 


4A&8 


00 295 


00275 


00283 00298 










CHANGE 


4BD9 


00096 


00067 












CHKSUn 


47E2 


00226 


00219 












CLEAR 


4880 


00060 


00022 


00209 00225 










CRS 


453C 


00010 


00149 


00374 00449 


00483 


00523 






CLJRSR 


4B30 


00018 


00057 
00239 


001 16 OOISS 
00432 00461 


001 59 


001 67 


001 74 


00191 


END 


4C5D 


00530 


00270 


0050B 










ENTRY 


4A37 


00287 


00277 












ERR 


4883 


00055 


00238 


00271 00320 


00349 


O041& 


00498 




EXPAND 


491F 


001 37 


00097 












FLAG 


4G2D 


0001 7 


00142 












HEXDffP 


49t7 


00161 


00138 












HEXOUT 


4972 


00166 


00204 


00211 0021 7 










HLIN 


4851 


00024 


00069 


OOOaO 00099 


00102 


00164 


OOZ29 


00232 








00267 


00311 00314 


00340 


00343 


00404 


00407 








00410 


00474 00491 


00494 








HLOUT 


485E 


000 33 


00094 
00445 


00177 00188 
00466 005 18 


00258 
00522 


00262 


0O293 


00392 


IN2 


4A70 


00300 


00 284 


00285 00287 










INA 


4589 


00012 


000 23 


00029 00 105 


001 oa 


00332 


00 366 


00473 


INITIA 


49D1 


0021s 


00162 












INKY 


4SC8 


0001 4 


OO072 


00206 00333 


00362 


00469 






LI 


4915 


0O13I 


00136 












LID 


4B8A 


00454 


00460 












Lii 


4C1B 


00309 


00316 












L2 


492B 


001 42 


001 48 












L3 


4994 


00182 


00189 












L4 


49A5 


0O193 


00202 












L3 


49DA 


00222 


00 224 












L7 


4A3F 


00276 


00286 












L8 


4A9e 


00322 


00326 












L9 


4ADE 


00356 


00371 












LST 


45A7 


00013 


003Afi 


00472 










nES 


4940 


00151 


00139 












tCS2 


4C3A 


00525 


00506 












HES3 


4C4C 


00528 


00519 












MESREG 


4BCE 


004B6 


00431 












NEHBUG 


4762 


00015 


00331 












NONE 


4401 


00007 


00503 












NPUT 


4A22 


00264 


00227 












OUT 


4iwrf: 


00041 


00035 


00037 










OUTA 


4522 


OOOOS 


00047 


00052 










tXn'MES 


4953 


00155 


00140 


OO507 00520 










OUTPT 


4A7A 


00308 


00265 












F*LUS 


4SD2 


00093 


00089 












BUE 


4AA3 


00328 


OO309 












RE6S 


4825 


00016 


00220 


O04SO 










SEARCH 


4AB8 


00337 


00329 












SPA3 


4B1E 


00394 


00395 












SPC 


457B 


00011 


00038 


00071 00082 


OOiOl 


00104 


001 07 


00231 








00234 


00269 00313 


00316 


0034Z 


00345 


00357 








00394 


00406 OO409 


00412 


00493 






TEST 


4C0D 


00504 


00489 












TRANSF 


4fi2B 


00401 


00338 












WRITE 


4B75 


00447 


00402 












ZERO 


4BED 


00488 


00448 













101 U/€/ FOR 

MICROCOMPUTCR 
no. 22 





Includes controller 
board, mounting 
brackets, cables, 
and power supply 
lor 2 internal drives Controls up lo 4 drives 
which may be any combination of internal or 
extcmaJ. This controller has been tested for 
compatibility with TRSDOS', LDOS^ and 
NEWDOS' Using TRSDOS' yiiu may use 
eilher Tandon or MPl 40 or 80 track dnves. 
With LEWS' or NEWDOS^ you may use any 
combinalion or 5'A" drives The controller 
supports any mi\ of 5Vi" dnves including 
single or double density, single or double 'iided, 
35.40. 77 or 80 tracks. 

TERMS: Cashier's Check, VISA, MAS- 
TERCARD, or C.O.D. Personal checks ac- 
cepted, but will require 2-3 weeks to process. 
COD. add 3%. 

To Order, CaU (505) 265-5072 

OR Mali order vrith paymcnl lo addrcsi bckmi 

P]>— T^AM Systems. Ltd. J 

605^6 San Mateo Blvd., N.E. 
Albuquerque, N.M. 87108 



TRSIXJS IS a Tni<km»it «( R*(lio Sh»ct (.ntporad.m 
LDOS \i a Trailemart. (it L j>gKil Syslcmi. Int 
NEWDOS \i 1 Trademait o1 APPARAT 



FREE! 

A SASE gets you a free pro- 
gram listing and a list of our 
low prices. Here are a few: 

AXIOM iMP2 Printer $579 

IMP2PAA 1 Will! Iraclor, single or roll teed. .5K but- 
ter, includes tull graphics sottware 

SEIKO Printer $359 

CP80 M 

PERTEC Drive $325 

FD 200 complete "Hippy" fwiin supply & case) 
capable ol 40 track, double tfe/isity operation 

Also cassettes, diskettes, 
cables, memory, power sup- 
plies and cases 
Software: auto minder, graph- 
ics monitor, mailbox, talking 
keyboard & more 

TERMS: Check, Mastercharge, 
Visa or money order 

Micro Mnemonics 

(801)825-9317 
403 W 2250N 
SUNSET, UTAH 84015 ..b^ 



Z8 BASIC 
COMPUTER/CONTROLLER 




As featured in 
Byte Magazine, July and August 1981 

•On board tiny BASIC Interpreter. 
•2 on board parallel ports. 
•Serial I/O port 

• 6 interrupts. 

•Just attach a CRT terminal and 
immediately write control programs 
in BASIC. 

•BAUD RATES 110-9600 BPS. 

• Data and address buses available for 
124K memory and I'O expansion. 

• 4K RAM, 2716 or 2732 EPROM 
operation, 

•Consumes only 1 V2 WATTS 
Z8 Basic Microcomputer/Controller 

Assembled & Tested $195.00 

Complete Kit $165.00 

Universal Power Supply 

( + 5, -1-12, &-12V) $ 35.00 

Z8 IS a Irademark ot Zrlog Iric 



SWEET-TALKER. 

IT GIVES YOUR COMPUTER 

AN UNLIMITED VOCABULARY. 




As Featured In 
Byte Magazine, September 1981 

•Utilizes VORTRAX SC-01A speech 

synthesizer chip. 
•Unlimited vocabulary. 
"Contains 64 different phonemes 

which are accessed by an 8-bit code. 

• Text is automatically translated into 
electrically synthesized speech, 

•Parallel port driven or 
Plug-in compatible with APPLE II. 

• On board audio amplifier. 
•Sample Program for APPLE II on 

cassette 
SWEET-TALKER 
Assembled and Tested 

Parallel Port Circuit Card S139 

APPLE II Plug-in Card $149 

VOHTRAX IS a IrademaiK of Federal Screw Works 



DlSK-80 

EXPANSION INTERFACE 

FOR THE 

TRS-80 MODEL I 




4s Featured In 
Byte Magazine, March 1981 

•Disk controller (4 drives) 
• Hardware data separator 
•Buffered TRS-bus connector 
•Real-time clock 
"Printer port (optional) 

DISK 80-ASSEMBLED & TESTED 

with 32K RAM $329.95 

Centronics Printer 

Port add $ 50.00 

DISK-80 pc board $ 48.00 

Printer/Power Supply 

pc board $ 16.00 

Complete Kit with 32K 

RAM and Printer Port $275.00 

TBS-80 )s Uadamark of Tandy Corp. 



To Order: Call Toll Free ■ 1-800-645-3479 
(In N.Y. State Call: 1-516-374-6793) 
For Information Call: 1-516-374-6793 



MICROMINTINC. 
917 Midway 
Woodmere, N.Y. 11598 




^■'See List ot Advertisers on page 402 
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GENERAL 



Twelve new commands for good old Level II Basic, 



Basic— Enhanced Again 



Mark Goodwin 
S.R. 79, Box 103 
Orland, ME 04472 



When Radio ShacK marKet- 
ed their Model I they 
wanted it to appeal to a wide 
variety of users. The TRS-80 is a 
versatiie machine but it does 
iack fiexibiiity in more specific 
appiications. 

When i first acquired my com- 
puter, I was very excited about 
the graphics capabiiitles. But 
with my first attempts at creat- 
ing games, 1 found the TRS-80 is 
iimited in graphics capabilities. 
Many programs can be en- 
hanced by the use of high speed 
graphics, but with Level II Basic 
fast graphics are just not possi- 
ble. 

I realized that if I wanted high 
speed graphics, I would have to 
take on a serious study of ma- 
chine language. Once I learned 



to create faster graphics by us- 
ing machine language, I quickly 
found disadvantages to this 
method. The biggest disadvan- 
tage is the amount of time need- 
ed to develop a program. Fur- 
thermore, accessing machine 
language subroutines from 
Level li Basic can be frustrating. 

So I t)egan studying, to see if 
there was a way to add com- 
mands to Level II Basic. After a 
couple of years of experience 
with machine language, 1 finalty 
found various ways to link up 
new commands with Level II Ba- 
sic. From there it was a simple 
matter to write the machine lan- 
guage routines necessary to 
add virtually any command I 
wanted. Thus I created En- 
hanced Basic V1 .0 (see Program 
Listing 1). 

Enhanced Basle adds 12 new 
commands and modifies one ex- 
isting command. It allows the 
user much more flexibility in 
writing graphic programs. Fur- 
thermore, it allows easier ac- 
cess to machine language sub- 
routines in applications where 
even greater flexibility is re- 
quired. 

I do not intend to go into the 
details about how Enhanced Ba- 



sic is written. The purpose of 
this article Is not to Instruct you 
on machine language program- 
ming, but to supply you with a 
useful rrnxJification to Level II 
Basic. Program Listings 2, 3, 4, 5 



and 6 contain some brief ex- 
amples of Enhanced Basic's 
versatility. ■ 

The program is available from 
the author. 



Table 1. Command Descriptions 



USRsddraMM 

Calls a mactilrw language subroutlrw at ttte addraas •psclttad. Exacutton la Iha 
sarrw as Laval M USR{x) command I n evary othar raspact. Ttils anablaa tha program 
to cortaln an uniimliad number of machina isnguaga subraullnas, wfttwut ttia 
rwed ot POKEIng the entry address into memory. 

Example: 

100 X - USR27000,(N) 

ts the same as: 

1M POKE16526.120:POKE18S27.105lX = USR(N) 

X = »#1^,y) 

This command allows tor setting a double width graphics poirtl. 

X musi> = and<M 

y must> - and<48 

Example: 

100 X = &#1 ,(32.23) 

is the sarT>e as: 

1 0OSET(64,23);SET^,23) 

X-M2^lrt 

This command allows rasattlrvg a douMa width graphics point. 
X rrtust> = af>d<M 
y must> = and<48 

Example: 

1XX = &K.(32,23} 

Is the same as: 



raM* continuta 
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Now fori ~'^^^^^^^ii ■ni«lMn- 
vestment you can ^^^Nw havatrt* 

powar and accuracy o( Iha computar <n 

your |ob costing. We have developed pro- 
grams to run on the Radio Shack TR&M 
Model II Computer vrtilch produce the follow- 
ing repone: 

• Complete Job Cost Reports 

• Job Scheduling 

• Worfc In Process Report 

• On-llr>a Job Status Inquiry 

• Operallon Productivity Report 

• Material Uaaga Summary 

• Employee Charge Out Summary 

The program prompts Ihe operator through 
every step in plain and simple English. Only a 
few hours of instruction and preparation are 
needed to begin use. lis ideal For the small 
company with S 10 50 employees. 

The price Is S495.W tor the program and 
complete Instructions. A set of sample reports 
are available for (19.95 which is applicable 
toward purchase. 

Suite 208 404-455-6549 

2957 N. Dekalb Drive 

Doraville, GA 30340 

or 

PO Bo» 6555 Macon, GA 31208 

912 745-5822 



NEW PROGRAMS 
FOR THE TRS-80 

incoPROP 

Income Property Analysis 
for the TRS-80 

INCOPROP: Based upon siandardiiea melhoOs 
□f piopeily analysis used t^roughoui ir^e real 
eslale industry Generales a 3 page leporl contain- 
\ng an annual property operating slalement and 3 
comprehensive 10 year casfi flow analysis Con 
tains IRS l3> table to p'oiecl atlertai income 
stream and investor's l.R.H. 

• Hartoiei^ailfertrr methods ot tdk c^eprtcijrion 

• Hin(ll()uplo3loans&]aiTTe<cnl lyDT loinl 

• HiflM, mrericin* lornal permili Stnuiiniy Anjlysij 
« [>i4k ttifs creeled tor oerrrvan^ni irord^oi daia 

Uinimum iy^xtm requ.itinfnilj 1?t RAM I O'i't tna 



P'lnlar Sofd Aiin in'or'r>tliv 


e 7i L>#0« u1*' 1 m« 


u(l cc»e' 


ing tjisic aipecis o< iico 


^e P'ot>e'[» in.eji 


ler.i < w 


3t<t os'^tncctt 






M»1tI . * 111 rir utfitr- 1 


i^' etffT ii4nir>'< 




la disk 




JliOOO 


Woac: II tuiB men asiieite 


»i*i(JO 


MxJ'i II V»riio<i ■.■<lat>l* in MBASiC 




, njr\r\ rq u"fl* 


CP M 


• 16iOC 



MAINDEX: An easy-to-use piogram ro aiC ion m 
Ihe indeiing ol your 'lies on disk Can 1 lind that 
program you nnrote last month'' Pul youi computer 
to mro'li' Firxl any program or data tile m your sys 
lem in seCor>dS 

« A MlinlrKlflt Oi all 10JI Olh«r di)k S (lirrCtO'iRS 

« ■Lrpna[>4lijes '.st oi tiips «<x} gii-vt you nam«s grans 

ui^ dates *rttien irachsarK] ikivdesfpiions 
■ Scuts F lies Dy rume. duk. ard caicgwies 

• FileOalciitnionicanbe learchH) lo' key od'Os 

• Plinth disk labels Mil n dish niiTi<*rK] lii* rumes 

• UseT. all the ad'anced *fid ailrBmeiy lasi tile maniDij 
lalioncipatjililiejotApMul Inc sNFWrxlS'eP 

He<iuirel Level II. *e« t disk dnve inO NfWDOS'80 on 
caiseiie lor easy tiansler loflisk iM 96 

r 




OEPT EM, PO SOX SII.PtOVATO. CA M»47 



TRSW™* Models 1 & 3 

SOFTWARE 

SYSTEM DIAGNOSTIC $99.95 

Tests every component of your TRS-80 
tor proper operation: ROM, RAM, Video 
Display, Keyboard, Line Printer, Cassette 
Recorder. Disk Drives, RS-232 Interface 
Cor>tiniiOus or monitored operation. 

SMART TERMINAL $69.95 

The intelligent telecommunication pro- 
gram that enables your TR5-80 to be 
used as a timesharing terminal. Automatic 
transmission to and from another com- 
puter. Control keys, break key, lower 
case, cassette and disk files compatible 
with both Electric Pencir and Scripsit 
programs. 

MONITORS $39.95 

Disassembler, memory display, move. 
search, verify, modify, read and write 
machine language cassettes, objea code 
relocator. hexadetimal arithmetic, 
symbolic disassembly output. 

MONITOR #4 $49.95 

Same asMonito< f 1 tnjt adds disk lileand sec- 
tor ir>pirt/oijtput. RS-232 communications. 

PENCIL PATCH ^ $19.95 

Fixes the Electric Pencil" Model 1 ver- 
sion so that it runs on the Model 3. (You 
must already own the Model l version.) 

GRAPH PRINT $19,95 

Creates formatted printout on the 
Epson MX-00 printer Enhanced print 
modes print quality text surrounded by 
graphic border. Editing, disk save/rek>ad, 
text entry, error testing. 

Send S.A.S.E. for FREE Catalog. 

HOWE SOFTWARE 

14 Lexington Road. NewCity, NY 10956 
'TRS-ftO IS a registered trademark o( the 

Radio Shack division o( Tandy Corp. >^ '03 



^OLOR GOmPUTE 



ADVENTURE 



THS-80 



^PERCHARGER RAMCHARQER 
64K UPGRADE 32K UPGRADE 

• EXTEMD MEMORY • EXTEMD MEMORY Combat the powers of darkenss and 
FROM 4/1 6K TO 64K FROM 16K to 32K evUl Can you recover the treasure of 

• $299 95 • $9995 the Golden Sorcerer before his 

• 100% Compatible w/Ext. or DOS BASIC minions overcome you. A 

• No Soldering or Modification Required adventure for endless hours of fun 

• Fits Inside Computer's RFI Shield^ and excitement. $19.95 



Space Invaders 
Meteorolds 
Space War 

• The Best Games Available 

• High Resolution Graphics 

• Fast, Meichine Language 

• Compatible w/ Ext. Basic 

• $21 ,95 each. $59.95 for all three 
EXTETiDED BASIC GAMES 

• LOTHAR'S LABYRirfTH) 
Word Search Puzzle 

• BATTLEFLEET 

Battleship Search Game (one or 
two players) 

• SPACE TRADERS 
Galactic trading game 

$14.95/ea. 





THE FACTS 

At last, a complete description of 
the "guts" of the Color Computer. 
Specs on all the ICs, complete 
schematics, theory of operation 
and [xogramming examples. 

$14.95 

UTIUTIE8 



' EDFTOR/ ASSEMBLER $34.95 

' SUPER MONITOR 19.95 

Full leatufp machnne language 
monitoc Coii>p(e(*ly poutioo 
tndependeni code Icis yout 
load ii anywhere ir^ the 
computer's memory 

EPROM PROGRAMMER 89,95 

(Progrsm ycxjr own ROMs for the ROMPAC port) 

MAGIC BOX 24.95 

LoBd MOD l/lll Tapes into ttw co(t>r computer 




SPECTRAL 
ASSOCIATES . . 

141 Harvard Ave. 

Tacoma. Washington 98466 1 

(206) 565-8483 
WRITE FOR COMPLETE 
CATALOG 

ADD 3N FOW SHIPPING 

VISA OR MASTERCHARGE ACCEPTED! 



'Sm List ol Advefltaars on page 402 
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Tatilt co/iCnumf 



1M RESET(64.23):RESET (65.23) 

X = *t34«,¥) 

This command aJlows the testing ol a ctoubEe width graphics 
poini It Mfiil relufn ( - 1 or true) i< the point is Ml. otlMrwIse 
returns (0 or false) it the pomt is reset. 

Example: 

100 PF«(»3,(32,23)THENX = 4»2,(32,23)ELSEX = A«l.(32.23) 
Tests lo see it the pomt is set it true [hen the point will be 
reset, else the pomt will be set. 

X = «H,n 

This command will display byte n at all video locations. 

Example 

100X = «»4,191 

is the same as 

100 FORN = 15360TO16383:POKEN.191:NEXT 

X = «t5 

This commanii will invert all video locations containing 
characters greater than 127 

X = A#e,eddress,n,x,x,x,eic. 

This command allows POKEing multiple bytes into nTemoty. 

address -^ slartiiitj address 

n - nuinljei ol bytes lo t>e POKEd 

X = tjyie to bo POKEd 

Exampta: 

100 X = 4*6,27000,7.205.127. 10.41,1iB,15.10 

IS the same as. 

too POKE27000,205:POKE27001,127:POKE27002,10;POKE2/0O3, 

4]:POKE270O4,195:POKe27005,15:POKE27006,10 

X = A«7 .address 

This command allows (etching from memory a 15 t)it word. 

Example. 

1MX = 4»7,27000 

is Ihe same as. 

100 X = PEEK(27000) + PEEK(27001)-2S6 

X = «H.addrMS^*aliM> 

This command allows POKEmg a 16 bit word into memory 
address = address to be POKEO 
value ^ 16 bil word to tie POKEd 

Example 

too X = 4 #8,27000,(27000) 

IS the sartM as 

100 POKE27000,120:POKE27001.105 

X = AWg,x,y,l«r^h 

This command allows the drawing of a ho<i2ontsl line, 
X = horizontal starling position 
y = vertical position of the line 
length = length of the line 

Example: 

100X = 4i»9,0,0,128 

Is tho same as 

too FQRX = 0TO127:MT(X,0):NEXT 

X»«tt10,K,y,lenslh 

This command allows the drawing of a vertical line, 
X = horiMHtal position ol Ihe line 
y = vertical starting position 
length = length of the Hrw 

Example: 

100 X = 411110,0,0,48 

is the same as: 

100 FORY = 0TO47:SET(0,Y).NEXT 

X = A#11.x,y.lM)ath 

This command allows the erasing of a horizontal lif»e. 

x = horizontal starting position 
y = vertical posilion of the line 
length = length of the line 

Example: 

IOOX = i#11,0,0,12e 

is the same as 

100 FORX = 0TO127:RESET(X,0):NEXT 

X-»#12Ay.length 



Table coniinues 



Table conunved 

This command allows the erasing of a vertical Hrw. 

X - horizontal position of the line. 
y = vertical starting position 
length = length of Ihe line 

Example: 

100 X = ai»12,0 0.48 

Is the same as. 

100 FORY = 0TO47:flESET(0.Y)NEXT 





Program Listing 1. 




42E9 


BSIBB 


LHC 


12E3V. 




42E9 COCSfll 


BBllB START 


CALL 


1C9H 


;CLEAKS SCRE 


EK 










42EC 21D244 


BB12B 


LD 


HL.Ml 


; POINT KL TO 


MESSAGE 










42BF CDA7 2B 


esne 


CALL 


28A7H 


i DISPLAY MES 


SAGE 










42F2 21F144 


«ei4B 


LD 


IIL, BASIC 


;HL~5TART OF 


BASIC-1 










42F5 36BB 


BB15B 


LD 


IHLJ ,B 




42F7 23 


BBieB 


INC 


HL 




42P8 22A44a 


0B17B 


LO 


(48A4H) ,HL 


[START OF BA 


SIC PROGRAM 


POINTKR-HI, 








42FB 2AB14B 


Bsiee 


'.,D 


HL, (4BalHl 


jHL=TOP OF B 


ASIC KEHORY 


POINTER 








42FE IICEFF 


BB19B 


LD 


DE,0FFCEH 




4301 19 


0B2eB 


ADD 


HL.DE 


:HI.-HL-5i 


4302 22AB4fl 


BB21B 


LD 


(40A0H1 ,KL 


[START OF ST 


RING SPACE POItJTEH-llL 








43B5 CD4D1B 


BB22B 


CALL 


1B4DH 


:M:\iC7 POINT 


ERS 










430S CD7644 


Be23B 


CALL 


LEV 3 


iCAI.L LINKUP 


ROUTINE 










43BB C319IA 


BB24B 


JP 


1A19H 


; RETURN TO b 


ASIC 










43BE CD9DBA 


8B25B DUNMY 


CALL 


aA9DH 


; fET NTF TO 


INTECEfl 










4311 21Bea0 


0e26B 


LD 


IIL,0 




4314 CDSAaA 


2fl27B 


CALL 


SA9AK 


jLOAD ACCUn 


WITH ZERO 










4317 2AEe4S 


eaiea -^tTi 


l,L> 


KL, (40E6H) 


;HL-EHCODED 


STATEHUNT POINTER 








431A C9 


BB29B 


RET 






431B F5 


00300 GRAPH 


FU3H 


AF 


;SAVE GRAPHI 


CS HODE TO S 


TACK 








4:iC 7A 


0031B 


LU 


A,D 


:A«X VALUE 


43iD F5 


B0320 


PUSH 


AF 


iSAVE IT 


431E 7B 


00330 


LD 


A,E 


;A-Y VALUE 


431F 218D91 


B0340 


LD 


HL,18DH 


fPOIHT TO DU 


HHY STRING 










4322 C35eBl 


eeisi 


JP 


150K 


jGOTO GRAPill 


CS ROUTINE 










43 2 5 CF 

X 

4326 2C 


00360 SUB] 


RST 


esH 


;CHECK SYhTA 


00370 


DEFB 




;«UST HE A , 


4327 CF 
X 

4328 ;e 


flBlHB 


PST 


esH 


; CHECK SYHTA 


00 iSi 


DEFB 


■(■ 


;MUST bf A ( 


4329 CDlCiB 


BB4BB 


CALL 


2B1CH 


.■EVALUATE EX 


PRESSION 










432C C9 


0e41B 


RLT 






432D Cd:543 


00420 SUB 


CALL 


SUBl 




433B FE4B 


B043B 


CP 


4eB 


:SEE IF X>63 


4332 D24A1F 


0044B 


JP 


NC,1E4AH 


!lF>b3 THEN 


FC ERROR 










4335 F5 
E 

4336 CDI72B 


004^0 


PUSH 


AF 


;KAVK X VALJ 


00460 


CALL 


2B17H 


.-FVALUATK EX 


PRESSION 










4339 FE3e 


BB47B 


CP 


3BH 


;SKE IF ¥>47 


I33B D24A1F 


00480 


JP 


HC,1E4AH 


; if:-47 then 


FC ERROR 










433E F5 


00490 


PUSH 


AF 


;SAVE Y VALU 


433F CDBCBl 
X 


BBS00 


CALL 


lacH 


; CHECK SYHTA 


4342 22EG40 


BSSlfl 


LD 


(4BE6H] ,HL 


; ENCODED STA 


TEHENT POINTtR-HL 








4345 Fl 


0SS20 


PO? 


AF 


;(:eT V VALUE 


4346 5F 


30530 


LD 


E,A 


; SAVE IH E 


4347 Fl 


Bfl54B 


POP 


AF 


::1ET X VALUE 


4348 B7 


005^0 


ADD 


A, A 


;X=X'2 


4349 57 


E056e 


LD 


3, A 


;SAVE l!i L' 


434A C9 


00^^70 


KtT 






434B CD2Dt3 


03580 .^FT2 


CALL 


EU3 




434E D5 


BB590 


PUSH 


DE 


jSAVE X,Y VA 


LUE 










434F 3E8B 


0B6B0 


LD 


A,e0H 


,-a-set graph 


ICS KODE 










4351 CD1B43 


B0610 


CALL 


GRAPH 




4354 Dl 
UE 

4355 14 


BB62B 


POP 


EE 


;GET X,Y VAL 


0063B 


INC 


D 


;X-X>1 


4356 3£8e 


00640 


LD 


A.BBH 


.-A=SET liHAi-H 

Program continues 
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Dynamic Report Generator 



No Programming Required 



• Maintain diftannt data filet, tach with iti own *et 
of inurnal logical rBlatiomhipt. 

• Parmttf umt to dafifw cuftomizad raport formati 
and column hvadingi. 

• SfMcrfy arithmetk: ralBtionshipi batwaan cotumm. 

• Automatic sorting and file comprvnion. 

• Kayad index for rapid ratriaval of data. 

• Rad«fin« indax bv axchanging it with othar raport 
column I. 

• Flaxibia add. dalsM. and liii modai. 

• Edit mode allovri heading* and arrthmatic ralaiiorv 
ihipi to be altered vritbout reentering data. 

• Lift mode atlowi for laiected ranges and optiorul 
Mib-totalt. 

FOR USE ON 48K-TRS-80 MOD 1. 
1 DISK ANDPRINTER. 

PRICE: $14.95 INCLUDES DISK, 

44 PAGE BOOKLET, SHIPPING AND HANDLING. 



DYNAMIC 




^242 

SOFTWARE 



Bayiide Ncwlbiii n3W 



PofiKiFii copyrigrited by Mjctoiofi, 1980 
TRS-SO II ■ rttiiurad tiadHnark ol Taody Coip 



ENGINEERING ANALYSIS 

SOFTWARE ^^9 

Box 10^9 

Highitown, N). O8S20 

(201) 367-573S 

Crllkil Pith (C^M) Proftti Conud 

ccxTi(]um rmAorti ujrt'vop djEn vmh fkui 

frnrUi co« ind pro)«t u«ijl Mikmion rtfon 

i nonort jjwi (fan - SOO nod* itfunj 

TRS«a |l. II. 1 <ll) A Nonh Sur SWDO 

Tub* Bcndini — litrKjiion ixi to' btni tube ihipfi 

irtpui bend ridib^ ind noit coonltnjtn 

tompuin lute cut Imp*', bend ind plJne mglrv ifjmeni 

kfijlhs ind rruKlfei H09 mio^ t^niimJ Im t«n(*n|; 

mKt»nei - IKSW |<. II. I Itl) 1 Nonn Sur lIlS 00 

Linear Profnininlnt — iomputn nm/Fiwi (o« ^n<iK>ns 

»9UJ[)0n( jFt einpml imnj Irw-lofm rnpul 

TRS-SO (I. M. « III) a ^onh Su> UO 00 

Cu^ofn dppticilKXii ot thn pro^m 10 compuie ttnj ini». 

Kf cmm btoidi. men miiurH. fii I'c i>i>Ublr 

<*ll ^r QuoTP 

Oitxf (iumtmni rroptm irx>iKi*<% ^^C) iokwjrt 

SpKc Fimr Slniclurti AutfVt 

WVAC LoHJ Comcvuiom 

Firt ipnnkltf Doi|n 

Hif^j Crmi W«ti SfHpn fiuljiit 

Shrti MfUi Euimitinj 




TOTAL 

DISKETTE 

BACKUP 



» 



DO NOT TAKE UNNECESSARY RISKS 
WITH YOUR SOFTWARE. 

If vour diikcite software library it not com- 
pletely backed up. or. if you are watting ditk- 
ettei by making backup copies of all your 
diskertet, your problem ii lolvedl Uting 
DUMPLOAD, the total contenli of your diik- 
etlei can be iafe<y dumped to tape. The hi- 
■peed tape option allowi lix 35 or 40 track 
diikenef to fit on one C60 caieiie. 
■ TRS-80 Model I 16K - 48K 

• TRSDOS or NEWDOS80 Compatible 

• May be uied to back-up TRSDOS, VT05 
4.0, NEWDOS, MICHOOOS. or data 
ditki. (Sing'« Qgnnly) 

— $16.95 on Caiieile — Jl 9.95 on Uiskeiie 
P<uiS1. 00 handling (Indiana Res. add 4% tax) 
TOLL FREE 24 HH. ORDERING SERVICE 
1«»525-9391 (E»t. 509) (Except Colo.) 
1-800-332-9259 (Ext 6091 (Colo Residents) 

Of Mail Check or Money Order To. ^^^ 

COMPLETE COMPUTER SERVICES I « 

B188 HEATHER DRIVE 
NEWBURGH, INDIANA 47630 ^i9h 



YOUR IDEAS IN 
ACTION 

ENCYCLOPEDIA 
FOR THE TRS-80* 



Wayne Green Books needs 
your articles in the areas of: 
Business, Education, Games, 
Graphics, Hardware, Home 
Appiications, Interface, Lan- 
guage, Tutorial, Utility, and 
special interest areas such 
as the Model III and the color 
computer. The Encyclopedia 
is a living network of informa- 
tion for the TRS-80 user— be 
a part of it! Send manuscripts 
to: 

Attn: Encyclopedia Editor 

Wayne Green Books 
Petert>orough, NH 03458 



A cassette ot disk must accompany any articles 

with program listings. 

•TRS-eO IS a trademark Ol Tandy Corporation 



B1 7 TAPE OPERATING SYSTEM will let you 

• Save & Load orograms 6X faster than ModeM. 

• Save & Load Data Arrays over 800X lasler 

• Backup standard System tapes that load-n-go. 

• Certify cassetle tapes at 3000 baud 
(24.95 Specify Mode) 1/3 16K/32K/4eK RAM. 
Inexpensive Upgrades available 3rd year of sales. 

B1 7DISK/BAS isaOisk version. Leis you saveany 
disk tile to cassette at 3OO0 baud Inexpensive way 
to backup your (ilos. Works with any DOS. Includes 
tape certifier Requires 32K RAM-up 
$14.95 

WORDSMITH Word processing program in BASIC 

A Tramer' lor more complex W/P programs. Easy- 
lo-use. Specify Tape/Disk version Tape version 
requires B1 7 Tape Operating System (above} Disk 
version requires 32K RAM-up. Uses MX-BD Printer. 
Only $14.05 

30-day money-back guarantee with all programs. 

ABS Suppliers ^sso 

3003 Washtenaw. Suite 4A • Ann Arbor. Ml 48104 
(313) 973-8266 

Cofning soon 

Inexpensive computer service business Wnte'" 



m 



microcomputing 




BINDERS 

order 
yours 
today 



Keep your library of 50 Micr ocompu tinq safe from losi 
or dorryige In these hondsomelY oppolnred birxlers with 
rkh dork green covers or^d gold leiiering. Eoch binder 
holds 1 7 issues making on EXCELLENT REFERENCE HAND- 
DOCK. Sevsrol binders Form a quoliiy librory you con be 
proud of 

iTJO«Kh Olo>1717; bloKIOO 
Pni09e patd tn USA f otvign vd^i pieos* mckxW i2 iO lo* poiro^t. 

IpMHy 1M0 or 1H1 

Send ctieck or money order only to. 
80 MICROCOMPUTING BINDERS 
P O Bon b120. Phtia . PA 19141 



COMPUTER SOFTWARE 

10% Discount 



TRS BO Lll 



AdTsniuia Serim * 1 - 11 
CoolMcl Z500 
DMthmaie 5000 



AT AP 
AI AP 
AP 



tir 95Tipe 
nSOTape 
1 1 U Tape 



EmpiiBoltneOvaim.nd T AT AP (31 M> Diih JfOOTape 

Invader! tram Specs T or>iy l34STap« 

Rescue el Riga) T AT AP 269STapa 

Super Script T only ?fl99Tape 

Tiwdai Leal Redoubl T (Ti^) t22 45 Onl 117 96 Tape 
AP (D»k) 



Many more games, ulilitias, business, etc available 
Dlak and Cassette 

Purchase by MO. Check (Allow 10 days lo clear). 

or COO 

Add S1 00 Poalage Per Oroer 

(MD Add 5% Sales Tax) 



For prtca theel. inrllv to. 



^C 



Computer Software 

P O BOX 59612 WALTER REED STATION 

WASHINGTON DC 2001? 



°'°°"°LNW8(F' '^^ 

• COMPUTERS ° 

a«a»n«n»D«n»n»n«n»Q«n«u«a»D 

□ HIGH RELIABILITY DESIGN n 

□ TRS-80* COMPATIBLE n 

• • 

• IN STOCK NOW!! call for ^ 

□ SPECIAL SYSTEM PRICE! n 

n (213) 851-0626 * 

(714) 973-1939 

? EXCELLONIX ° 

□ □ 

• 7180 WooDRow Wilson Dr. • 
n Los Angeles, CA 90058 □ 



I o» TAHO« CQ*» Cp i*"<J^ 



• See List of Advertisers an page 402 



□•n»n»D»n«D»n*n«n«n«n»n«n»n 
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Program continued 








Program cofilinued 








ICS NODE 


















435B CD1B43 IBG^B 


CALL 


CNAPH 




43 E« 2C 


11781 


DEFB 


' , 1 


INOST BB A , 


435B C3IE43 IflGEI 


JP 


DUMNY 


iRETURH TO B 












ASIC PROQRAH 








43E7 CD122B 


■ 139R 


CALL 


2BB3H 


(GBT ADDRESS 


43Se C02D43 Bl«7a RES: 


CALL 


SUB 














4361 D5 BI6HI 


PUSH 


□ E 


(SAVE x,y VA 


43BA 22E648 


11411 


LO 


(4BEGH) ,HL 




LUE 








43BD D5 


11411 


PUSB 


DE 




43(2 3Eai lifiSff 


LO 


A,l 


rA'RESBT GBA 


43EE El 


11421 


POP 


HL 




PHICS NODE 








43BP 7E 


81438 


LD 


A,(HL) 




4364 CD1B43 IITBI 


CALL 


CRAPB 




43P8 4F 


81448 


LD 


C,A 


(C-LSB 


4367 Dl ini 


POP 


DE 


;CET X,Y VAL 


43F1 23 


B1458 


INC 


HL 




UE 








43P2 7R 


81468 


LD 


A,{HL} 




436B 14 BI72i 


INC 


D 


;X-X*1 


43F3 47 


B147B 


LD 


I>,A 


(B-MSB 


4369 IBBl •■71B 


LD 


A,l 


tA-RESBT GRA 


43F4 C5 


81488 


PUSH 


RC 




PBICS NODE 








43F5 El 


11491 


POP 


HI 




43GB C01B43 11741 


CALL 


GRAPH 




43FG CD9A8A 


11511 


CALL 


8A9AH 


l&AVI VALOB 


436e C3IE43 18711 


JP 


DUHKY 


] RETURN TO B 


43P9 C31743 


11511 


JP 


RETl 


iRinnui HiTB 


KSIC PROGRM 








VALUE 










4371 CD2041 BB76f POI 3 


CALL 


SUB 




43FC CF 


B153B STORE 


RST 


18H 


r CHECK SYNTA 


4374 JVF BB77B 


XOR 


A 


tA-POIHT GRA 


X 










PBICE HODE 








43FD 2C 


11538 


DEFB 


1 > 


(NUST BB A , 


4375 CD1B43 aB7Ba 


CALL 


GRAPH 














4378 CD7PIA «>79> 


CALL 


1A7PH 


(CONVERT ACC 


43FE CD822B 


11541 


CALL 


2BI2H 


rGBT ADDRESS 


DH TO INTBCEB 


















437B CD9ABA BBBBB 


CALL 


8A9AH 




4411 D5 


11S5B 


PDSa 


DE 




43TE C31743 flBBia 


JP 


RETl 


1 RETURN TO B 


4482 CF 


■ 1568 


RST 


iSH 


(CHBCI STVTA 


ASIC PROGRAM WITS VALUE 








X 










4381 CD172B ai82B HBITE 


CALL 


2B17H 


(EVALUATE EX 


4413 2C 


81S78 


DEFB 


1 ,t 


IKUST BB A , 


PRESS lOH 


















4384 22E64I BISIB 


LO 


(4BE6H) ,HL 


(ENCODED STA 


44B4 CF 


815B1 


RST 


IBS 


(CHECK SYVTA 


TEMEHT POINTEH-HL 








X 










4387 31»B3C BaB4B 


LD 


HL,3C88H 


(HL-START OF 


4415 3B 


11591 


DEFB 


'(' 


IRDST BE A ( 


VIDEO KEHORY 


















43BA aieaa4 aassa 

F VIDEO NEHORY 


LD 


BC,1824 


(BC-LBKiTH 


4486 CD822B 
4489 OS 


1161B 

■ 1«11 


CALL 
PUSH 


3B82B 
DE 


(GET NIMBBR 


438D 77 IBBsa HHll 


LD 


(BL) ,A 


(DISPLAY BYT 


44BA CDBCSI 

X 

448D 22E648 


81628 


CALL 


IBCH 


(CBBCK SYNTA 


E AT (BL) 

4308 23 88878 


INC 


HL 




11628 


LD 


(48e6H) ,HL 




43ep as a§tt§ 


DEC 


BC 




4418 Dl 


11641 


POP 


DE 




439B 57 aa89a 


LO 


D,A 


(SAVE BIIB T 


4411 El 


81658 


FOP 


HL 




BE DISPLAYED 








4412 7B 


81661 


LD 


A,E 




4391 7B 88988 


LD 


A,B 


(CBBCK 


4413 77 


1167B 


LD 


(HL),A 


(POKE LSB 


4392 Bl 88918 


OB 


C 


1 FOR BHD 


4414 23 


11688 


INC 


HL 




y MEHORY 








4415 7A 


81698 


LD 


A,D 




4393 7A 88928 


LD 


A,D 




4416 77 


81788 


LD 


(8L|,A 


(POKE MSB 


4394 21F7 88938 


JR 


HI.HBIl 


(COHTINQB UN 


4417 C38E43 


81718 


JP 


DUHNY 




TIL END OF VIDEO HEHORY 








44IA CD172B 


B17 28 LINES 


CALL 


2B17H 


(GET X VALUE 


439G C3BE41 81948 


JP 


Dumy 














4399 22E64B 88958 REV 


LO 


{41EGH) ,HL 




441D F5 


81738 


PUSH 


AF 




439C 21ie3C 88961 


LD 


HL,3C8BK 


(BL-START OP 


44ie CD172B 


11748 


CALL 


2B17H 


(GBT Y VALUE 


VIDEO NEHORY 


















439F 118814 88971 


LD 


BC,84B8H 


(BC-LENGTH 


4421 F5 


11751 


PUSH 


AF 




F VIDEO HEHORY 








4422 CD172B 


1176B 


CALL 


2B17H 


rGBT LENGTH 


43AI 7E 889BI REV2 


LD 


A,(HL) 


(A-VIDEO HEN 


4425 a2EG41 


81771 


LD 


(41EGH] ,HL 




ORT (HLI 








442B 47 


117S8 


LD 


B,A 


1 B-LEKGTB 


43A3 FB88 88998 


CP 


B8U 


(CHECK FOR G 


4439 Fl 


11798 


POP 


AF 




RAPBICS CODE 








442a SF 


llSll 


LD 


E,A 


(E-Y VALUE 


43A5 ISBB I181> 


JR 


C.REVl 


J IF NOT COTD 


443B Fl 


■ 1B18 


FOP 


AP 




RBVl 








442C 57 


81B28 


LD 


D,A 


|D-X VALUE 


43A7 2F 0181B 


CPL 




(INVERT A 


442D C9 


81B3B 


RET 






43AB CBFF Bie2B 


SET 


7, A 


t SET BIT 7 


443E CD1A44 


81848 HLIHS 


CALL 


LINES 












4(31 3E8S 


81B58 bLIl 


LD 


A,8BH 


(A-SET GRAPH 


43AA CBB7 1183* 


RES 


6, A 


{ RESET B 


ICS MODE 










IT « 








4433 C5 


81B68 


POSH 


BC 




43iu: 77 11848 


LD 


(HL) ,A 


(DISPLAY BYT 


4434 D5 


81878 


PUSB 


DE 




e 








4415 CD1B43 


81BB8 


CALL 


GRAPE 




43AD 23 811S8 REVl 


IHC 


HL 




4431 Dl 


B1S91 


POP 


DE 




43A£ 8B 818(8 


DEC 


BC 




4439 CI 


11911 


POP 


BC 




43AF 78 11178 


LD 


A,B 


(CHECK 


443A 14 


11911 


IKC 


D 


(X-X+1 


43B8 Bl 811S1 


OR 


C 


1 FOR END 


4438 1IF4 


11931 


DJNI 


BLIl 


(LOOP TILL L 


P VIDEO HEHORY 








INE SET 










43B1 21EF 11198 


JR 


HI,REV2 


( IF SOT 


443D C31B43 


11911 


JP 


DUMHY 




JDMP 








4448 CD1A44 


11941 VLINS 


CALL 


LIMES 




43B3 C3BE41 lllBB 


JP 


DUMHY 




4443 SBBB 


11958 VLIl 


LD 


A.BIH 


lA-SET GRAPH 


43B6 CF 11111 PORE 


BST 


8BH 


(CHECK SYNTA 


ICS NODE 










1 








4445 C5 


81968 


PUSH 


BC 




43B7 3C 11121 


DEFB 


''■ 


(HUST BE A , 


444G DS 
4447 CD1B43 


81978 
11981 


PUSH 
CALL 


DE 
GRAPH 




4388 CD822B 11131 


CALL 


2B83B 


(GET STARTIN 


44 4A Dl 


11991 


POP 


DE 




G ADDRESS 








444B CI 


13111 


POP 


BC 




43BB 05 11148 


PUSH 


DE 


(SAVE IT 


444C 1( 


12118 


IHC 


B 


lT-Y*l 


43BC a>172B 811S8 


CALL 


2B17H 


(GET KUHBER 


444D 18F4 


■a83B 


DJNt 


VLIl 


(LOOP TILL L 


OP BYTES 








INE SET 










43BF rs BllGB 


PUSH 


AF 


(SAVE IT 


444F C38E43 


■2131 


JP 


DUHMY 




43CB 22E641 81178 


LD 


(48E6H) ,HL 




4452 CD1A44 


1284B HLINB 


CALL 


LIKES 




43C3 IBIl 811B8 


JR 


POKl 




44SS 3E81 


12B5B aLI2 


LD 


A,l 


(A-RESBT GRA 


43C5 CS 81198 POR2 


PUSB 


BC 




PHICS NODE 










43C6 2&B648 81288 POKl 


LD 


HL,(41EGH] 




4457 C5 


8216B 


PD&U 


BC 




43C9 CD172B 81218 


CALL 


2B17H 


(GET BYTE TO 


44S8 DS 


12878 


POSH 


DE 




BB POKED 








4459 CD1B43 


83188 


CALL 


GRAPH 




43CC 22Be48 B1228 


LD 


(48EGH] ,HL 




445C Dl 


83191 


POP 


DE 




i2gr CI 81331 


POP 


BC 




445D CI 


12118 


POP 


BC 




43Di U 81348 


POP 


HL 




44SE 14 


12118 


INC 


D 


(X-X*l 


43D1 77 812S1 
4103 33 81261 


LD 
INC 


(BL),A 
HL 


(POKE BYTE 


445F 18F4 
INE RESET 


82128 


DJNI 


HLI 2 


(LOOP TILL L 


43D3 E5 81278 


PU.^H 


HL 




44C1 C38B43 


B211B 


JP 


DUNHY 




43D4 1(BP B12B8 


DJHI 


POKl 


(IP BYTES LB 


4464 CD1A44 


82148 VLINR 


CALL 


LINES 




PT JDHP 






4467 3E11 


82158 VLI2 


LD 


A,l 


(A-RESBT GRA 


43DG El l^ilB 


POP 


HL 




PHICS MODE 










43D7 Clle43 11388 


JP 


DUHNY 




4469 C5 


82168 


PUSH 


BC 




13DA CD813B 11318 USR 


CALL 


2B81B 


(GET ADDRBSS 


44GA DS 
446B C01B43 


82178 
■ 21B8 


PUSH 
CALL 


DE 
GRAPH 




43DD ED538E48 11328 


LD 


t48SBH) ,DB 


(SAVE IN an 


446L Dl 


82198 


POP 


DE 




RT POIHT LOCATTIOH 








446F CI 


• 238B 


POP 


BC 




43B1 CF 81331 


RST 


IBH 


(CHECK SYNTA 


*47fl IC 


B2218 


IHC 


S 


I»-Y+l 


X 








4471 11F4 


82228 


DJNI 


VLI2 


(LOOP TILL L 


43E3 3C 81348 


DEFB 


'-■ 


(MUST BB A , 


INE RESET 
4473 C31E43 


82238 


JP 


DUNHY 




43E3 2B 81351 


DEC 


HL 




4476 3EC3 


82248 LEVI 


LD 


A,1C3B 




4314 C» 81361 


RKT 






4478 129441 


82258 


LD 


(4194a] ,A 


(SET UP 


43B5 CT 81378 PETCH 


RST 


■ BH 


(CHECK SYNTA 


447B 21BB44 


82268 


LD 


HL.PT 


1 t 


E 






Program continues 


447E 239S41 


B2378 


LB 


(4195B) ,BL 


( tin 
Program corjtinues 
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Program continued 



4481 32A941 
4484 21DA43 
44B7 22AA41 
448A C9 
«48B D7 
44 SC CF 
X 
448D 23 

44BE CD1C2B 

NUMBER 
4491 FBSD 
4493 D21A1B 
l>12 THEN FC 
449e FBBl 
4498 CA4B43 
449B FEa3 
449D CA5B43 
44AB FEB3 
44Aa CA7143 
44A5 FEa4 
44A7 CAB143 
44AA PBIS 
44AC CA9943 
44AF FEIfi 
44B1 CAB643 
44B4 FBBT 
44B6 CAES43 
44B9 FBIB 
44BB CAFC43 
44BB FEa9 
44Ci CA3e44 
44C3 FBIA 
44C5 CA4I44 
44C8 FBBB 
44C:A CAS244 
44CD FBVC 
44CF CAG444 
44D2 45 
44E5 >D 
44Ee 41 
4 IPS BDIi 
44P7 II 
42E9 



02288 
I229B 
123 IB 
B231B 
82328 FT 
• 2330 

■ 2340 

ease 

12360 
12378 
ERROR 
82388 
12398 
B24B0 
82410 
12429 
B243S 
02440 
B245B 
82460 
82478 
02488 
12498 
82580 
02518 
02528 
82538 
82548 
0255B 
I25«8 
82570 
82588 

82598 

82600 

82618 

82628 Ml 

B2638 

B2648 

■ 2fi5l 

B2668 BASIC 

12671 



LD 

LD 

LD 

RET 

RST 

RST 



DEFB 

CALL 

CP 
JP 

CP 
JP 
CF 
JP 
CP 
JP 
CP 
JP 
CP 
JP 
CP 

JP 

CF 
JP 
CP 
JP 
CP 
JP 
CP 

JP 

CP 

JP 

CP 

JP 

DEFH 
DEFB 
DEFM 
DEFW 
DEFB 
END 



(SET UP 

] USR 
I LINK 



] CHECK SINTA 
iKUST BE A I 
rGBT COMMAND 

J IF CW4MAflD 



(41A9B) ,A 
HL.USR 
(41AA»} ,HL 

18B 
BBB 

'I' 

2B1CK 

13 
NC,1E4AH 

1 

Z,SET2 

2 

Z,RES2 

3 

!,P0I2 

4 

2, WHITE 

5 

Z,REV 

6 

I, POKE 

7 

Z, FETCH 



Z, STORE 

9 

Z.HLINS 

10 

Z.VLINS 

11 

Z.HLIHR 

12 

ZpVLINH 

'ENHANCED BASIC VI. 8' 

BDH 

'B<f MARK GOODHIN' 

BDH 

B 

START 



10CLS 

20 X = 4#6J7000,7,205,1Z7.10.41.195,164.10 

30 FORM = 1T010:PR1NTN;-2 = ■■;USR27000,(N):NEXT 

Program Listing 2 



10CLS 

20FORN = 0TO63 

30FORN1=0TO47STEP2 

40X = «#1,(N,N1) 

50NEXTN1,N 

e0FORN = 0TO63 

70FORN1 = 0TO47 

80IF&#3,{N,N1)THENX = i»2,{N,N1)ELSEX=^i»1,{N,N1) 

gONEXTNI.N 

100 GOTO60 



Program Listing 3 



10CLS 

20X = 4#4.190:PRINT@0."HELLO"; 

30IF1NKEY$ = '-THEN30 

40X = «#5 

50GOTO50 

Program Listing 4 



10CLS 

20X = 4#8,2700O,(12M5) 

30PRINTi#7,27000 

Program Listing 5 



10CLS 

20FORN = 0TO47:X-4»9,0,N,128:NEXT 

30FORN = 47TOOSTEP-1:X=4#11,0,N,12e:NEXT 

40 FORM -0TO127:X = 4#10,N,0,48:NEXT 

50 FORN = 127TO0STEP- 1:X = «#I2,N,0,*8;NEXT 

Program Listing 6 




NOW-A MODEM 

AND MUCH, 



MUCH MORE! 



AUTOTERM— The ultimate TRS-80* lerminal package that 
exploits the full capabilities of your computer and the 
MICROCONNECTION'-*^' with Autodial/Autoanswer. It has ALL 
the features of the "other" smart terminal programs, plus: 

• Dials MICROCONNECTION'" from terminal 

• Allows full I/O translation 

• Complete modem control and handshaking 

• Paged screen scrolling 

• Spooled printer output 

• Parity, overrun and framing errors status 

• Fully user-configurable 

• Includes 77-page manual 

• Text editor and hex conversion utilities 

• Requires TRS-80 Model I or III. 32K and 1 disk drive 

• Price— $99.50. Documentation alone~$15. 00 

SMART SERIES SOFTWARE FROM THE 
MICROPERIPHERAL CORPORATION 

All terminal programs feature manual or automatic 
upload/download, two user-defined messages, auto prompt 
message entry, transfers EDTASM and Orchestra-80 files, for- 
mats screen line length, file transfer speed selection, 
upper/lower case drivers, auto-repeat key, "beep" function for 
keystroke entry, buffered print output, compatible with SCRIPSIT 
and PENCIL, Comes with text generator for those who do not 
have a word processor. 

SMART SOD (disk)~$2995 purchased alone or FREE* 

Requires Model I 32K plus one disk drive. Available for both 
RS232 and Buss-decoding MICROCONNECTION.^ 

SMART 80C (cassette)— $29.95 purchased alone or FREE* 
Requires Level II 16K-48K system. Available for both RS232 
and Buss-decoding MICROCONNECTION.*^ 

SMART 80E (wafer)— $2995 purchased alone or FREE* 
Tiie first and only smart terminal program for the EXATRON 
"Stringy Floppy." Requires Level II 16K plus one ESF drive. 

SMART HID (disk)— $49.95 purchased alone or $20.00 with 
purchase of MICROCONNECTION. 

The FIRST smart terminal program for the Model III. Offers 
popular features of SMART 80D plus several new features 
associated with the Model III. Requires Model III 32K plus 
one disk drive and RS232 board. 

SMART IMC (cassette)— $29.95 purchased alone or FREE* 
The FIRST cassette-based smart terminal program for the 
Model III. All the power of SMART 80C plus numerous other 
features. Requires Model III Level II 16K plus RS232 board. 

*One software package included with the purchase of each 

MICROCONNECTION.t^ 
^Trademark of the Tandy Corp. 

the mcropenpheral corporation 



2643 151st Pi. NE 
Redmond, WA 98052 
206/881-7544 

v^306 




t^S** List of Attvmtisers on page 402 
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UTILITY 



With a mite of effort, it'll work on your Model III! 



T-Bug III 



Kevin Kleinfelter 
3337 Sevier Ave. Apt. 3 
KnoxvUle, TN 37920 



When you bought your Mod- 
el III you may have been 
told, "And we'll have T-Bug for 
Model 111 very soon." Well, after 
three months of waiting, I finally 
gave up and fixed it myself. This 
article will show how easily you 
can make T-Bug run on your 
Model III. 

A First Attempt 

Unwilling to believe Radio 
Shack, I loaded my Level II 
T-Bug into my Model III and tried 
it out. Voila.-.all the com- 
mands worked except the tape 
routines. Upon studying dumps 
of T-Bug and ROM, I learned that 
the tape I/O performed by T-Bug 
is completely incompatible with 
Model III. The solution? Replace 
T-Bug's tape routines with 
Model III ROM routines. 

Step1 

Load T-Bug at 500 baud. The 
punch command's tape routines 
are replaced by ROM calls here. 
In place of T-Bug's routines, put 
ROM's write header, write byte, 
and cassette oft routines. Use 




ADDR INSERT 
4600 000000 
4eEB 008702 
4eEE 180B 
46f E IMD2 
4706 6402 
4713 6402 
4717 6402 
4725 6402 

4729 6402 
4731 6402 
4737 6402 

4730 6402 
4740 F801 
4746 6402 
474A 6402 
4760 6402 
4769 6402 



Fig. 1 



ADOR INSERT 
4643 000000 
4647 9602 
4649 1S07 
464BAF 
464C 00000000 
4653 3502 
466C3502 
4861 3F3C 
4666 3F3C 
4669 3502 
4674 3502 
467D3502 
4666 3502 
4699 F801 
4690 3502 
4eA1 3502 



Fig. 2 



T-Bug's memory command to 
make the changes shown in 
Fig. 1. 

Steps 2 and 3 

Now the T-Bug routines for 
the Load command are replaced 
by calls to ROM's read header, 
read byte, and cassette off. 
Once again use the memory 
command (see Fig. 2). 

Finally, use the memory com- 
mand to change location 4211 
(hex) to anything but 00. This 
sets the cassette speed to 1500 
baud. Set up the tape recorder 
and type "P 4380 4980 43A0 
TBUG" and hit Enter. While 
you're at it, why not punch out 
several copies so you won't 
have to rewind after each load? 

As with all new programs, test 
your new T-Bug thoroughly. 
Also, you probably will want to 
look up one of those articles 
about relocating T-Bug to high 
memory. 

Another Choice 

Alternatively, you can use an 
assembler (perhaps EDTASM 
modified to run on Model III) 
to make a patch tape. Load 
EDTASM, then the patch tape, 
and then take T-Bug and punch 
out several copies. Now you 
have your own T-Bug Ml ! ■ 
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COLORSOFT™ 

' 'Oualify Software at an Affordable Price ' ' 
TRS-60* Color Computer Sottwaro 
flrfcarf From J7.95 

• Home/personal • Games 

• Educational • Financial 

We Mso Offer: 

• Custom Programming 

• Royalties for Software 

Documentation and a limited guarantee 
wltti all COLORSOFT™ software. 
Free catalog containing descriptions of 
30 software items, write to; 

Color Software Services 

P.O. Box 1723 
Greenville, Texas TC401 

'TmirCorpTradansni Vta/ttamanl McapW 



64K COLOR 

TRS-80' COLOR 

COMPUTERS 

64K $699 16K $389 

32K $429 4K $329 

Add $90 for axtwidvd baeic 

EXPANSION KITS 

64K $375 16K $35 
32K $75 XBASIC$90 

Call for detaHe on ottwr TRS-80' 
computere A acceaaortoe. 

SOUND CENTER ..^ 
RADIO SHACK DLR 
Los Alamos, NM 87544 

(505) 672-9824 

'TRS-80 Is a tradwnark of 
Tandy Coip. 




if You've Written A Program 

And Need Copies 

(1 to 1.000.000) 

Give Us A Call! 

Penner Bros.. Inc. 

305-287-0588 .^e 

210 Seville St. Stuart. FL 33494 



Data Acquisition 

and Control for the TRS-80* 

$180 ppd. 

The STARBUCK-8882 is a complete eighl ctannel 
data acquisition and control system, plug 
compatible with the Wodei I Level tl TRS-80. it 
includes 8 protected analog inputs (0-5 Vdc with 
82 1 Dit accuracy) 8 protected digital inputs. 8 
oploisolated digital outputs, and two joystick 
ports. Interrupt-dnven software package allows 
slimiltamws data acquisition and storage while 
using the TRS-80 lor any other purpose' 

Application manual covers home security, energy 
monitoring, weather station use, appliance 
control, graphics and games Price includes 
case, power supply, extra expansion card edge. 
connector cable, complete software package and 
detailed applications manual Manuals only are 
available lor $4 00 ppd Model ill version also 
available. To order, write 

STARBUCK DATA CD. 

PO Box 24, Newton. MA 02162 



WdSMcliusens resiflenis aOfl b% sales Ui 
•TflS-60 rs a IfflOemarh ol Tanfly CO'D 
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TRS-80 MODEL r" 
GOLDPLUG-80 

Eliminate disk re-boots and data 
loss due to poor contact problems 
at card edge connectors. The 
GOLD PLUG - 80 solders to the 
board card edge. Use your ex- 
isting cables. 
CPU /key board to 

expansion interface $18.9S 

Expansion interface to disk, prin- 
ter, RS232, screen printer 

(specify) $9.95 ea 

Full set, six connectors. . . $54.95 



EAP COMPANY 

P.O. Box 14, Keller, TX 76248 

(817} 4984242 

"TRS-SOisa trademark of 

Tandy Corp. 



^592 



^i0^^ 



PROFESSIONAL 
FEDERAL INCOME TAX 
PROGRAMS 

• f^of TBS 80 MotJel I or Model III Rvqoii", 2 Dkv 
Dn.ei ana 3?K 

■ Oeterminci Leasi Tii OmcUy 

• Eisenlial Inlo'malron Rplay^fl t>*ln*tn Foims 
AuToTialictf ly AvoiOs Dupiicaimg Eoiri«s 

• Uses >HSp'esC'ib*<l Comouiei GeneiaredPfii uuts 

• Profiibiii Bypasi^rig ol Ma'iaaiory Enn.es 

• Afciiracy Assureo by Tup/e Crieck Logic 

• Enie' only Peflinent Liops -Mucn faster man Litip 
D) Line tntry 

■ Single Lme Ccection n-lh Atiiomalic Update ui 
Succeed-ng TolaiS 

Bajic Package 1040 I040A S<:^eau^ei A 6 * IC 

AM lo' 1100 00 AOdil.Qiai ScneduPes i2f. 00 tacfi 

Single Schedules may tie puicnased sepaiileiy 

Send i 2 60 lor Fud Oescriphon and Sa'upiei 

{applied to purchase pncei 



MICRO-TAX m 

P.O Box 4262, Mountain View, CA 94040 

Call: (415) 964-2843 ^^ 







>^)4^^ 



{/'you've H^rfCten a 
Topnotctt Program- 
We'd Uke to Publish W 
Programs needed for BUSINESS/ 
OFFICE Applications: 

WORD PROCESSING 
PATROLL/TAX CALCULATION 
GENERAL LEDGER/ AR-AP 
ORDER ENTRY/INVENTORY 
Start collecting your royalty 
checks sooni Write for our free 
Programmer's Kit today. 
INOTANT SOFTWARE. INC. 
Snbmlsalona Dept. 
Peterborough, NH 03458 



^2 



^^tu^ 




(^' 



W"^ 



y You've WritUnan 
Outstanding Program- 
We'd Like to Publlmh Itl 

We're looking for EDUCATION 

Programs: 

SPECIAL EDUCATION/AID 

TO THE HANDICAPPED 

MULTI-MEDIA COMPUTER INSTRUCTION 

TEACHER AUTHORING LANGUAGES 

MANAGEMENT TRAJNING 

SIMULATIONS 

Earn money while helping others. 
Write for our free Progranuner's 
Kit today! 

INSTANT SOFTWARE. INC. .^Z 
Submissions Dept. 
Peterborough, NH 03458 



^ Smartmodem 




^ 



■ Auto-Answer • Auto-Dial • Repeat 
• Programmable ■ Use Any Language 

• Touch-Tone and Pulse Dialing 
' Audio Monitor - Listen to Connection 

• FCC-Approved Di'ect-Connect 

• Full or Halt Duplex. 0-300 Baud 
> RS-232C Interface • 7 Status LED s 

• Two Year Limited Warranty 

$249 

Send certified check or money order 
Allow two weeks lor personal check 
FloTKla residents add 4% sales 1a> 

nc€ coMPUTcn produos 

^265 ot Florida Inc. 

1640 N W 3rd STREET 
DEERFIELD BEACH, FLA 33441 



■^See List ot AUvtrlistn on ptgt 402 
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APPLICATIONS 



A median-length statistics program 

for those who have deviated from big computers. 



Pocket Stats 



Dr. Walter J. Atkins, Jr. 

Otrs. 4410 A 

USAF Academy, CO 80840 



As an educator and scien- 
tist, I frequently need to 
find statistics tor a set of data. I 
have found my TRS-80 Pocket 
Computer ideal for making these 
calculations. 

This program will find and 
display a great deal of sta- 
tistical information. It will ac- 
cept a data set of up to approx- 
imately sixty values, and will 
find the average value, the 
variance, the standard devia- 
tion, the median value, the high 
and low data values, and the 
midrange of the set. 

I had just finished writing 
and testing this program when I 
read Len Gorney's article, "On 
the Average," in the May 1981 
issue of 80. That prompted me 
to include the midrange calcu- 
lation in this program. His arti- 
cle is also a good reference for 
explanations of the mean, mid- 



range, and median. 

The variance and the stan- 
dard deviation are statistics 
that indicate how much data 
values deviate from the mean. 
The standard deviation Is the 
square root of the variance. 
One use of the standard devia- 
tion Is In assigning grades to 
test scores. The mean value of 
the students' scores is as- 
signed the grade of C. The 
scores in the B range lie one 
standard deviation above the 
mean. The scores in the A 
range lie two standard devia- 
tions above the mean. Likewise, 
scores assigned D and F are one 
and two standard deviations be- 
low the mean. 

The following numbers repre- 
sent the scores that a group of 
students received on a test; 
we'll use the Pocket Computer 
to find the statistics for these 
grades. The students' grades 
are 47, 52, 57, 65, 72, 77, 55, 61, 
85, 87, 66, 75, 98, 88, and 73. 

The mean value of the fifteen 
scores is 70.533. The variance 
is 219.552. The standard devia- 
tion is 14.817. The highest set 
value is 98. The lowest value is 
47. Thus, the midrange value is 
72.5. To calculate the median 



value, the computer first sorts 
the values into ascending 
order, which takes about one 
minute and thirteen seconds 
for the 15 data values used 
here. Since there is an odd 
number of values, the median Is 
the value in the middle of the 
sorted list. Inthiscasethat is72. 
The portability of the Pocket 
Computer facilitates data analy- 
sis almost anywhere, I use my 
computer so much that it is 
never further away than my 
briefcase. 

The Program 

The program is 53 lines long. 
It Is capable of storing a data set 
and its associated statistics so 
the data can be entered at one 
time and the statistic read out at 
another. 

Line 150 allows the display of 
a previously stored data set 
and its associated statistics. 
Line 170 initializes program 
variables. Lines 180-240 enter 
and store the values. Lines 
250-330 calculate and display 
all statistics except for the me- 
dian value. Line 340 determines 
if the median is to be calcu- 
lated. Lines 370-400 sort the 
values into ascending order. 



Lines 410-440 calculate and 
display the median value. Line 
450 allows the data entered to 
be stored In the Pocket Com- 
puter's permanent memory for 
later recall. Lines 500-530 
display a stored data set. 

The variables used in the pro- 
gram are shown in Table 1. ■ 



A 




B 




c 






E 


— Data value 


F 
G 


— Sum of data values 


H 


— High data value 


1 
J 
K 


— Sum of aquered data values 


— Sort flag 


L 


-> Low data value 


M 




N 


— Number of data points 







P 


— Mean value 


Q 


— Madlan value 


R 




S 


— Standard Deviation value 


T 


— Store data flag 


U 


— Midrange value 


V 


— Variance value 


w 


— Median routine pointer 


X 


— Loop counter 


Y 


— Storage array pointer 


z 


— Median calculated Hag 




Table 1. 


Statistics Program Variables 
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100 fiEH *CIATIMIC1- 

110 REll 'W.) .ftTS IMS' 

i::0 PEM 'CCF .FiJjHTEr • 

IZD KEN "Ilfi-.JJ' 

140 FfiUiE "* OlfiTIiTICi •" 

l^C IF T-l niFOT "tSFLv iTOFEL LflTfi <.-.•. H> "; R» . IF K»--V" 

THEr; 50u 

160 IF T-l INFUl -iLLElTS [.=ftTfi > . - H^ - " . R» . IF F-«-"M" THEN 150 

I, L'=ii:0-O.M = u. l«u.H-0.F«O.Gi«(l.i"O.T«O:U-O.I»O 

ISO iJiFuT 'HOu rifin. [fiifl ualue:- ■■ M 

190 ,=^r .L-?:-:-:-:-? 

2C0 FOR ..= 1 TO (' 

210 IIIFUT X-ffTn "ftLUE- '.L.fl' ■.'.■"t'^V-Ytl 

210 0=t*t-.lF t.-H LET H-I 

ZZO l-l.['l..IF l-L LET L-t. 

240 ((E,.T ,< 

250 F=0 fj 

260 i.'e, i-i^tcri- ai-l^:;.= 7- U 

27'0 u:itii:. "»#»«.#•(('■ 

230 Fh irn '■ftL'EF.hlGE '.riEflH. -".r 

2^0 Ffi lin ■■','flf;iriNCE=' I,' 

iOO FSini "4.TriH[.fif:L- tEU,«":5 

310 FRIta "MICH t'MTFl iJmLLIE=" H 

310 RRUa "LCW CrtTft i>fiLUE-' L 

^30 I.1-L + ' H-l_,- -- .FRUIT ■'MIE.FfiriCE UftLUE"''.U 

340 IF ^"j IMFIJT "COflFUTE flEtiftfl <V- H> " '■ . R» . IJ-:MTvH.-I> ; 

if Rl = -[| ■ THEtl 450 

35-0 IF ;:=1 THEII 440 

3o.} FftUiE 'FLEftJE ^:RIT'' 

370 K«D;FC« .i=i7 TO M*16 

ifiC IF A^^>,fl-.:(--l . LET R«fl.,.. ,B-flyXTl 

3?o rtE.n ;-. 

400 IF ^ =1 THEN 370 

410 IF U*l"tl LEI C-'0'U*;i:.. ♦fii,y*I7>,. l.GOTO 430 

410 Ci-Mtij*;: . 

430 CECr 1 

440 FFlin ■■|IE[ Ir^l"' &.Z-1 

4^0 HIFUT -RElFi!li [-RTft 'V M^"'':R*:IF fi«-"H" LET T"0. 

COTO ■»; 

410 1-1 

4^0 0076 140 

500 REM 'LftTftC ;;.FLH. * 

505 FFJUT '(ILlflbCF OF ^Fnft-",H 

510 FOB ;,»ir 10 rl»lfc 

510 FFIHT X'rtTii-" «■;-. ..he;;t ;-, 

5.30 CCTO 1; I.. 

Program Listing. Pocket Computer Statistics Program 
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WifM GrMi Ik. nd 
Dektof) Conpilng in- 
ritc TH ta dm TO* 
CMpvtir iipermctJ 
vMi us. H TM bm H- 
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tol btBinesi ippikafion 
or instdUtion-or i m 

DHW HMMOM WW DOCI 

-n voWd lu to bur 
abort H Drop IB a liw- 
or, bintr fit a mm- 

and tab ol TOW appfio- 

Hon And do it uml Wt 
don'l want fot to ata 
Oil M Bh opportwitT. 
For MTt Mtnga^ 
wrili to: 





First in 

Its Class 

and 

Looking 

for 

Work. 



TRS-ao Modal I, II, III 

Five multiple regression procedures 
(including stepwise, backward elimination, all 
subset, and ridge), 24 transtormations, corrv 
prehensive data base manager (with searcti 
and sort), descriptive statistics, tiypolhesis 
testing {7 tests), time series analysis (7 
models), random variate generation, discrete 
protsability distributions, sampling distribu- 
tions, nonparametrics (5 tests), and corrv 
plete documentation. 

Complete package with manual — $125 

To order, send payment plus $2.00 shipping 
and handling to: 

Quant Syctaaui ^2^^ 

P.O. Box 628 

Charleston. SC 29402 

803-571-2825 

S.C. residents add 4% sales tax 

Overseas orders add $7 tor shipping 



MOVING? 

Let us know 8 weeks In advance so that you won't miss a sin- 
gle issue of SU Microcoiripulfng. 

Attach old label where indicated and print new address 
in space provided. Also include your mailing label 
whenever you write concerning your subscription. It 
helps us serve you promptly. 



n Address change only 
D Extend subscription 
□ Enter new subscription 
n_1_^ear $25X)0 



D Payment enclosed 

(1 extra BONUS issue] 
D Bill me Uter 
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If you have no label handy, print OLD address here. 

^aii 



133 Name 

-J 



Address 



t City. 



Sute. 



Zip. 



Name 



print NEW address here: 
Call 





TRS-60' MOD III 4aK 

WITH YOU? CHOICE OF MPI DISK 
DRIVES INSTALLED UP TO 4 MEG 
ON LINE STORAGE 



4aK MCO III wi!h (2) 1NTHI5MA1 dOtrk DfiT^S 

AS AfiOVE EXCEPT WITH (2) INTERTW. 8a* ORVES 

AS ABOVt EXCEPT WITH (2) INTERN'y. 40/40trV DWVES 

AS ABOVE EXCEPT WITH (2) INTERNAL 60/801* D(?f^S 

r?S232 INTErJFACE INSr/»i_LED - PCO - 

Exterxji aoa on D^je Coble 

B5!s-40W« S 30500 852sdO/«>k 

B^lseark S 42900 B02s-SO/8O«iV 



MOO III IIJSDOS l?DlSKtTI£ 
MOO III II?SDOS MANkW. 

MOO .11 oosaus •■ 

'■ requrfeO la cJouOie-tieod a mwed <3'r\«s 



6 MONTH LEVEl IV PRODUCTS INC. 

LIMITED 32461 SCHOOLCRAFT 

WARRANTY LIVONIA. MICHIGAN 48150 

ON PARTS foil tree 800-521-3305 

AND LABOf? in sfofe 313-525-6200 

visa-mosler cord-C O D 



siasooo 

S211900 
S214900 
S2d^OO 
S 8900 
S 2500 

S445O0 

S57900 



S1495 

095 

9995 



evew 



t^See List ot Advenisers on page 402 
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2 games per cassette 



lor HmTRS-SD Model I or 111 IE K 
Iml 11 or MoMI 1 1 1 USIC ffiKmonvutrs . 
■ II DUr fmruK h»( 

ACTION SOUNDS & GRAPHICS 




lou d«si|n ro<i' o«n spKt lighter ind 
then husl olf into tuttlt. Muman or 
10 ConiHiltrOppoitrits. Fighl la 7 or 3 
dinMniioas. Tlirtt scturios ~%a»it^ii". 
"RtliHOqliDn'.ind "PliMnit Dfuthlon" 

THE NEW STARSHIP VOYAGES 

R brilliiil "trek" tfpe ipactBar JD 
galiirwitttaripiround. Moving hmi| 
crjit, iome art "Clukttf". IS cominands. 
ititm starJMse Dtlti Iron th« RaguCi 
uUlDE Mo 2001 i 19.9S 




PARSECTOR V 



Still 

Tht 
Ultimilt 
Spict 

Hir 



U«i|it spill scr»n giici tich pliTtr i 

prnitf diipli) LjMdi IJMt luttle critt 
jnd njlch lli«(n fi|hl Fire hi|h povered 
tfltrg) tHJms or short r4n|e Hdpon spruds 
Humin O'computei apponent 

FWR5ECT0R B iMiriMifnt Vcriwn. 
Gianl galaiy la cooqifr IiIns« Strileei ' 
catalog (to. 2m i 19. 9S 




!!!antsM! 

iMiiing 
Hir 

BttRMn 
kni 

CelORlH 

FkI, ■adiiMt languait spetd Thri« {imt 
Mfiitiofls: 'Open field '. "Hfst Barrier", 
and "DiggiRglnts*' 2 plijtn ai compiUr 
apponent. fasTtopli), ClialloR|iHg to 
muter. Fita pecked (ine lor ill ages!!! 

THE NEW STARSHIP VOYAGES 

cstalogMo ;003 S 14. 9S 



HIGH SPEED LIFE 

The lASIIST. nest ADVANCtD rtrsian ol 
I.K.Comaii^ lamoHi mithcnulicjl («ne. 
SptctKulir kjleidoscopK anmition. 
SOOgen/min tfpical 32 prept at ruined 
patteriK Mvlliple control tinclions 

( RilMNtPl u. OOSo'l-»teCrilMU».h»i«S 

NAME THAT STATE QUIZ 

I top notck educitianil gjini Dniti 
SO itites md asks lue qucitions. 
Three quii Ifiies. Eis) lo use 
catilq No 2004 1 14.9S 



Disk Owners 

On special request the abaie iimes iri 
itnlaMe on cassette ( you transler j. smw pnce. 
cempil'ble HithntSOOS Disk Basic 4gK 



Add 11 OOpoilagallunlling COD i±i tl ^ 
Fi«.Rn.addI\tii i>Mic(>ik1<d< MO pKr«>i> i<i 

Synef^istic Solar, Inc. 

MBoi 560595, Miami fl 3J156 

1-231 
PiaiHwtiie la mote nlo Dealer ingurf miiM 



REtOAD 80 



You've noticed those LOAD80 
tape files with the note, 
"Needs EDTASM" in the com- 
ments column. These are ma- 
chine language programs in 
source code format. Radio 
Shade's EDiTor/ASseMbler 
(EDTASM) Is required to load 
and use these files. If you have 
ignored them because you 
didn't want to talte the time to 
learn how to use the Editor/As- 
sembter here is a quick tutorial 
to help you get started. 

The Radio Shack Editor/As- 
sembler for the Model I and the 
newly released package for the 
Model III tMth use the same 
command structure. There are 
tape and disk versions for txith 
TRS-80 Models. The machine 
language programs in 80 Micro- 
computing are always printed in 
EDTASM format. These pro- 
grams are listed as assembly 
language source code files. 
These programs must be en- 
tered into the computer using 
the Editor/Assembler, either by 



hand or from tape, and then as- 
sembled and recorded on a sep- 
arate tape (or disk) before they 
can tie run. Remember, a source 
code file will not run— It must be 
assembled first. 

To load a LOADBO source 
code file, first load your EDT- 
ASM program. Once loaded, you 
should see the asterisk (*) 
prompt. Now, type L (or LT or LD 
with a disk based version), fol- 
lowed by an equals ( = ) sign, 
and a filename. (If you press the 
space bar five or six times in 
place of the filename, EDTASM 
will load the first file it encoun- 
ters—for tape files only.) Then 
press PLAY on your tape record- 
er to load your file. The familiar 
asterisk pair will appear and one 
will flash on and off as the file 
loads. 

When the source code file is 
loaded, enter Pit:' to list the file 
on the screen. Inspect this listing 
as you would a Basic program to 
ensure that you have a good 
load. If the load is bad, reload 





November LOADBO Directory 


Program 


Title 


Page# 


Comments 


1 


TENANT 


138 


None 


2 


INVEST 


144 


None 


3 


HOUSE 


160 


None 


4 


GRAPHS 


176 


None 


5 


PRODTIMER 


220 


None 


6 


CHAIN 


250 


Needs EDTASM 


7 


ALTER 


274 


None 


6 


CREDUN 


321 


None 


9 


SPRLIST 


333 


None 


10 


SECSRC 


348 


None 


11 


NEWBUG 


368 


Needs EDTASM 


12 


ENHANCE 


384 


None 



the tile. Data will be in the buffer 
and EDTASM will ask if you are 
concatenating. Concatenating 
means combining two files to 
make one. In most cases, you 
will answer the concatenating 
question, N for 'no.' 

Now that your file is loaded 
and verified, you can assemble 
the program by answering 'A' to 
the * prompt. After the 'A,' add a 
filename (six characters or less). 
The file will then be assembled 
and EDTASM will prompt you to 
ready your cassette for the ot>- 
)ect code file. Your EDTASM 
documentation contains some 
optional parameters that you 
can specify, using the slash (/) 
as a delimiter. These optional 
parameters include: NO for no 
object code, NS for no symbol 
table, LP for output to the line- 
printer, and so on. 

Once you have made an ob- 
ject code tape, you can load the 
tape using the Basic SYSTEM 
command to load machine lan- 
guage programs. If the program 
fails to perform as you desire, 
reload the original source code 
file and use EDTASM's edit 
function to modify the program 
to suit you. Then assemble and 
run the new version and see how 
It goes! 

Our Circulation Department 
reports that the custom soft- 
ware written to handle the 
LOAD80 subscription program 
Is nearly ready. The new year 
will probably see a subscription 
offer for LOAD80. Details forth- 
coming in Decern twr. 

Next month. Holiday goodies 
for LOAD80 users. ■ 
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microcomputirig bookshelf 



—BASIC & PASCAL— 





OMJtoSeU 




VveNN 



• INTRODUCTION TO TR&«> LEVEL II BASIC AND 
COMPUTER PROQRAMMINQ — BK1219 — by Michael 
P Zabinski Wrillenbyanevperienced educator. Ihisis 
the book lot those beginners who want to learn about 
computers without having lo become an expert II has 
poetical programs, useful line-by-line comments. (!< 
cellent flowcharts accompanied by line numbers and 
over 200 exercises which help Ihe reader assess prog- 
ress, reinforce comprehension, and provide valuable 
practical experience. $10 95 " 

• M BASIC EXERCISES flKn92-DyJ P Lamoil.er 
This booh IS slfijciiired around Ifie idea Ifial the best 
^«ay 10 learn a language is through actual practice II 
contains 50 complelely eiplamed exercises Slate 
mem ariO analysis ol Ihe c'oblem, llowcharls, pro 
grams and aclual runs Program subiecis include 
inaihemalics. business, games, and operations ic 
search and are gresenled in varying levels of didi 
cully This loimal enables anyone lo learn BASIC rap 
idly Checking Iheir progress at each step $12.95' 

• THE BASIC HANDBOOK-BKn74— NEW, SECOND 
EDITION by David Lien. This book is unique. It is a vir- 
tual ENCYCLOPEDIA of BASIC. While not favoring one 
compuler over another, it explains over 250 6ASIC 
words, how to use Ihem and alternate strategies II a 
compuler does not possess Ihe capabilities oT a need 
ed or specified word, there are often ways lo ac 
complish ti>e same (unction by using another word or 
combination of words Thais where Ihe HANDBOOK 
comes m II helps you get the most from your com 
puter, beil a boltom-olthe-lme" micro or an oversized 
monster $19 95 " 

• LEARNING LEVEL II- BK 1175- by David Lien Wni 
ten e'-oec y Ic Ihe THS-80 this book concenlrates 
on L.;.ei II BASIC, exploring every imponanl BASIC 
'anguage capabilily Updates aie included for those 
who have siudied the Level I User s Manual Sections 
include ho* lo use the Editor dual cassette opera 
Hon printers and peripheral devices, and ihe conver 
Sion n( Level I programs lo Level M $15 95 " 

• BASIC BASIC <2ND EDITION)- BK102e-by James 
S Coan This is a teitbook which mcorpo/aies Ihe 
learning o' computet programming usmg the BASIC 
language *ilh lOe teaching ot malhemalics Over 100 
sample programs illusl'ite the techniques ol Ihe BA 
SIC language and every seclion is followed by practi- 
cal problems This second eOilion covers characlet 
sinng handling and the use ol daia Mies 110 50 ' 

• ADVANCED BASIC — BKIOOO-Applications. includ 
ing strings and files, coordinate geometry, area, se 
quences and series, simulation graphing and oames 
110 75- 

• SIXTY CHALLENGING PROBLEMS WITH BASIC 
SOLUTIONS (2nd Edillon)- BK1073~by Donald 
Spencer, provides the serious sludenl of BASIC pro 
g ramming with mlerasling problems and solutions No 
knowledge of malh above algebra required Includes a 
numtjer of game programs, as well as programs tor 
financial mleresl conversions and numeric manipula 
tions K 95 ■ 



• PASCAL— BK1188— by Paul M. Chirlian. Professor 
Chirtian's textbook combines a simple approach lo Ihe 
PASCAL language with comprehensive coverage on 
how a computer worKs, how to use a flowchart, work- 
ing from a terminal as well as batch operation and 
debugging. Special attenlion is paid to idiosytKrasies 
of Ihe language and synlax llowchans abound for the 
convenience o' Ihe expenencod programmei Well in- 
dexed $1295' 

• INTRODUCTION TO PASCAL BKl 189 -by Rodnay 
Zaks A step by- step introduction for anyone wanting 
lo learn the language quickly and completely Each 
concept IS explained sin^ply and in a logical order All 
features ol Ihe language are presented in a clear, easy 
to understand format wilh exercises lo test lt%e reader 
al the end ol each chapter It describes both standard 
PASCAL and UCSD PASCAL, the mosl widely used 
dialed lor small computers No compuler or program- 
ming experience is necessary J14 95 ' 

• PROGRAMMING IN PASCAL-BK1l40-by Peter 
Grogono The computer programming language 
PASCAL was the lirst language to embody in a coher- 
ent way Ihe concepts of structured programming, 
which has been defined by Edsger Dijkstra and C.A.K. 
Hoare As such, it is a landmark in the development ol 
programming languages. PASCAL was developed by 
Niklaus Wirth in Zurich; it is derived Irom the language 
ALGOL 60 but is more powerful and easier lo use. 
PASCAL is now widely accepted as a useful language 
thai can be efficiently implemented, and as an ex- 
cellent leaching tool It does not assume knowledge ol 
any other programmirig language, it is therefore suit- 
able for an introductory course S1296 * 

—GAMES— 



• 40 COMPUTER GAMES- BK73ai -Forty games in all 
in nine dilfereni categories Games tor large and small 
systems, and even a section on calculator games Many 
versions of BASIC used and a wide variety ol systems 
represented A must tor the serious computer games- 
man S7 95' 

• BASIC COMPUTER GAMES-BKia74-Okay. so 
once you get your computer and are running in BASIC. 
then what'' Ttien you need some programs in BASIC, 
that's whal This book has 101 games Tor you from very 
simple lo real buggers Vou gel the games, a descrip- 
lion of Ihe games, Ihe listing to pul in your compuler 
and a sample run lo show you how ihey work. Fun. Any 
one game will be worth more than t^e price oft he book 
tor the fun you and your family wilt have wilh it $7 50 ' 

• MORE BASIC COMPUTER OAMES-BK1182 — 

edited by David M. Ahl. More fun in BASIC! 84 new 
games from the people who brought you BASIC Com- 
pulei Games. Includes such favorites as Minotaur (bat- 
tle the mythical beasi) and Eliza (unload your troubles 
on Ihe doctor at bjcgain rates) Complele wilh game 
description, listing and sample run. $7.50.* 

• WHAT TO 00 AFTER YOU HIT RETURN-BK1071 — 

PCC's first book of computer games 48 dillerent 
computer games you can play in BASIC .programs, 
descriptions, many illustralions Lunar Landing, Ham- 
murabi. King. Civel 2, QuDic S. Taxman. Slar Trek, 
Crash. Market, etc $10 95 " 



—BUSINESS— 

• THEOHYZ— BKl 226— How American Business Can 
Meet Ihe Japanese Challenge— by William Ouchi. Why 
are the Japanese catching up md surpassing 
American industrial productivity What al'ows 
Japanese industrialists to offer gu anleed lifetime 
employment to their workforce' Th, 3 book will help 
you understand Ihe Theory Z managerial philosophy 
and its implications tor the American corporate future 
Examples are given of Ihe American industrial giants 
already operating under Z-style management, and ttie 
impact ol this style or the quality of Ihen executives 
and workers is explored A must for the alert business 
man, large or small $12 95 ' 

■ SO YOU ARE THINKING ABOUT A SMALL 
BUSINESSCOMPUTER-BK1222-by Richard G Can- 
ning andNancyC Leeper For awell-organized manual 
on the process ol selecting the right compuler system 
tor your small business, this text cant be excelled De- 
signed to miroduce the novice in data and word pro 
cessing lo the real benefits of computerization, the 
l)ook IS filled with money and time-saving lips, photos 
of equipment, lists of suppliers, prices, explanations 
of compuler terminology, and helpful references to 
additional sources ot mlormalion Everyone con 
templaling a first computer mslallalion should have 
Ihisbook $14 C» ■ 

• PAYROLL WITH COST ACCOUNTINO-IN BASIC- 

BK1001 —by L Poole & M. Borchers. includes program 
listings wilh remarks, descriptions, discussions ol the 
principle behind each program, file layouts, and a com 
plete user's manual with step-by-step instructions, 
liowcharls, and simple reports and CRT displays Pay- 
roll and cost accounting features include separate 
payrolls for up lo 10 companies, lime tested interac- 
tive data entry, easy correction of data entry errors, ]ob 
costing (labor ot distribution), check printing with lull 
deduction and pay delail, and 16 different printed re- 
ports, including W-2 and 941 (in CBASICl 120 00 ■ 

• SOME COMMON BASIC PROGRAMS- BK1053- 

published by Adam Osborne & Associates, Inc Perlecl 
lor non lechnical computerisls requiring ready lo-use 
programs. Business programs, plus miscellaneous 
programs Invaluable lor the user who is not an ex 
perienced programmer All will operate m Ihe stand 
alone mode. $14 99 paperlwcti 

• PIM5: PERSONAL INFORMATION MANAGEMENT 
SYSTEM — BK1009 — Learn how to unleash tlie power 
ol a personal computer lor your own benefit in this 
ready louse data base management program 

— MONEYMAKING— 

• HOW TO MAKE MONEY WITH COMPUTERS- 

BK1003 — In 10 information-packed chapters, Jerry 
Felsen describes more Ihan 30 compular-related, 
money-making, high profit, low capital investment op- 
portunities $1500 ■ 

• HOW TO SELL ANYTHING TO ANYBODY— BK7306- 

According to The Guinness Book ot World Records, Ihe 
author. Joe Glrard, is "the world's greatest salesman." 
This book reveals how he made a fortune— and how you 
can. too $2 25" 

• THE INCREDIBLE SECRET MONEY MACHINE- 
BK1178 — hy Don Lancaster. A different kind of "cook- 
book" Irom Don Lancaster Want lo slash taxes? Get 
free vacations? Win al investments? Make money from 
somelhmfl that you like to do? You'll find this book 
essential to give you the key insider details ol what is 
really involved m starling up your own money machine 
$5M • 
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• UtCROCOMPUnNQ CODINQ SHEETS Microconiputing'i dozen or so progrsm- 
mers wouldn't try to work without these haruly scratch pads, which help prevent the 
little errors that can cost hours and t>ours ol programming lime. Available for pro- 
Qramming is Assemtily'Machine Language (PDtOGII, which has columns for ad- 
dress, instruction (3 bytes), source code (iatiel, op code, operand) and comments; 
and tor BASIC (PD1002) which is 72 columns wide. 50 sheets to a pad. S2.39.* 



PROGRAMMING 
— Z-80— 

• TRS-IO ASSEMBLY LANGUAGE-8)> 12 W by 

Huben S Howe. Ji. This book incorporates in>o -i 
single votume all the pertinent facts and mtoiinatiori 
you need to know to program and enjoy the TRS-80 in 
cliided are clear presentations of all inlioductO'y ccn 
cepts. completely tested practical programs and sub- 
routines, details of ROM and RAM and aiSK operating 
systems, plus comprehensive tables, charts and ap 
pendtces Suitable for the first time use' oi mo- ex- 
pedenced users. S9.9S ' 

• INSIDE LEVEL ll~BKn83 — for machine language 
programmers' This is a comprehensive reference 
guide to the Level M ROMs. allow>ng easy ulili;alion o' 
the sophisticated routines they contain It concisely 
eipiains setups, calling sequences, variable passage 
and I/O routines Pait II presents an entirely new com 
posite program structure which unloads under thp 
SYSTEM command and executes in both BASIC and 
machine code with the speed and efficiency of a com 
pile' Special consideialion is given lo disk systems 
$15 95 ■ 

• PROORAMMIMO THE Zfl0-BK112?-D^ Hodnay 
Zaks Here is assemoiy language progiamming 'qi [he 
2 BO presented as a C'og'essive step 0, siep course 
This book s ooth an educational ie<l ant) a sell 
contained reference t>ook useful to both the beginning 
and the empenenced programme who ivish to learn 
aooul ihe Z 80 Eiccises to lesi Ihe reader are inclitd 
ed I u 95 ■ 




• Z-M SOFTWARE OOURMET GUIDE AND COOK-' 
BOOK -BK 1045— by Nat Wadswodh Scelbi's newest: 
cookbookf This book contains a complete description' 
□f the powerful Z-80 instruction set and a wide variety 
of programming information. Use the author's ingre- 
dients locluding raut<r>es, subroutines and short pro- 
grams, choose a limo-iested recipe and start cookmg! 
(1699- 

• Z-80 ASSEMBLY LANGUAGE PROGRAMMINQ- 

BK1177— by Lance A. Leventhal. This book Ihoroughiy 
covers the Z-80 instruction sel, atxjunding in simple 
programming examples which illustrate software de- 
velopment concepts and actual assembly language 
usage Features include Z-80 I/O devices and interfac- 
ing methods, assembler conventions, and compari- 
sons with e080A/80e5 instruction sets and interrupt 
structure S16,99.* 



6809 



• 8809 MICROCOMPUTER PROGRAMMING AND 

INTERFACING-BK1215-by Andre* : Staugaard 
Jr Getting involved with Tandy s ne**" L,ior Compi.ier'i 
If so. this new book from Ihe BIsi ksDurg Group will 
allow you to eipion the awesome power of ihe 
machines 6809 microprocessor DpIaileO mlormation 
on processor architecture, addressing modes, register 
operation, data movemenl. arrlhmetic logic opera 
tions. I'O and interlacing is provfipii as well as a 
review sectional Iheend of eacr^ chji.tp- Four appen 
drives are included cohering the 6«09 instr.jciion sel 
^pecificaliO'^ sheeK 'f 'he 6809 'anni, -,i cn'CPssors 
olhe. 6800 se'iej Tjiiipment and ine 6«09'6tt21 
Per'pherai Inierfao. Aiiaptei This book is a must tor 
the serious Color Compuler o*ner S1395 ■ 



A NEW PROGRAMMING SERIES 



Th« Mkroprocnsor Software Englntering Serltts by 

John Zarrella provides common sense descriptions 
of advanced computer system topics for engineers, 
programmers and development managers. Each 
volume IS a self-contained review of a software 
engineer ing topic, explaining fundamental concepts 
in easy lo-understand language and describing 
sophisticated software tools and techniques. De- 
tailed glossary of technical jargon is included in 
each volume. This series will fielp you find the solu- 
tions to your software problems. 



• WORD PROCESSING AND TEXT EDITING BK1194 
— Provides a firm basis for undersiandirig *ord pro 
r.essing terminology anO toi cQni[iaring syslerns 
J7 95 ■ 

• SYSTEM AHCHlTECTURE-8«n95 -Presenti a 
Je!aiip3 overview r>> advanced rompuler syMem 
oesioii rc'uding oDiett architecture and caoability 
based addiessing $9 95 " 

• OPtHATING SYSTEMS CONCEPTS AND PRINCI 
PLES BK)193 — P'psenisar, o»er,ic*oi ihebasicop 
e'aling system lypes their coniponcnis and capabii 
ities 1/95 ■ 



ALL NEW— FOR 80 OWNERS 

ENCYCLOPEDIA FOR THE TRS-80* 



ENCYCLOPEDIA FOR THE TRS«)' ' is 

the newest peripheral tor your micro- 
computer. This ten-voiume reference 
series contains programs and articles 
especially selected to extend the docu- 
mentation that comes with the TRS-80. 
Volumes of the Encyclopedia are being 
issued one-at-a-ttme, approximately six 
weeks apart. This means that each new 
volume wiil reflect the latest develop- 
ments in TRS-80 microcomputing. 
Encyclopedia for the TRS^ is avail- 
able in two editions. The deluxe 
COLLECTOR'S EDITION has a hand- 
some green and black hard cover with a 
dust jacket. A soft cover edition is also 
available. 

To order single hard cover volumes of 
the ErKyclopedia please specify: 
Volum*1 EN8101 $19.95* 

Volume 2 ENS102 

Volume 3 (avail. Nov] ENB103 
Volume4(avail.Jan.) EN8104 
Volume 5 (avail. Feb.) ENS105 

To order single softcover volumes of the 
Encyclopedia please specify: 
Volume 1 EN80B1 

Volume 2 EN8062 

Volumes (avail. Nov.) EN8083 
Volum«4 (avail. Jan.) EN8084 
Volumes (avail, Feb) ENSOeS 



$19.95- 
$19.95* 
$19.95* 
$19.95* 



$10.95* 
$10.95* 
$10.95* 
$10.95* 
$10.95* 
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SPECIAL INTRODUCTORY OFFER 

Order the entire set (the first ten volumes) 
of the Encyclopedia for the TRS-80 and 
receive the tenth volume FREE! 

10 Volume deluxe hard cover 
COLLECTOR'S EDITION —a $199.50 
value. 

ENB100 $164.00 postpaid 

10 Volume soft cover edition, a $109.50 
value. 

ENSOaO $83.00 postpaid 



ENCYCLOPEDIA LOADER is the 

software companion to the 
Encyclopedia for the TRS-80. This 
special series of cassettes will 
allow you to load selected pro- 
grams from the Encyclopedia in- 
stantly. Hours of keyboarding time 
and the aggravating search for 
typos is eliminated oy using the 
Encyclopedia Loader. 

Encyclopedia Loader for Volume 1 

of the Encyclopedia ol the TRS-80 
is available at a Special Introduc- 
tory Price of $12.95 (a $14.95 
value). To take advantage of this 
offer specify: 

EL800111 $12.95* 

Additional Encyclopedia Loaders 
will be available as each volume 
ot the Encyclopedia for the TRS- 
80 is issued To order specify 
Encyclopedia Loader 



Volume2 
Volumes 
Volume4 
Volumes 



ENe002 $14.95' 

EN8003 $14.95' 

EN8004 $14.95' 

EN8005 $14.95' 



'Uselheo'dC' card m ihe OacN ot this magaiirieor ilemwe your orOef on a separate 
piece o' paper and mail to 80 Microcomputing Booksheil • Petertwrougti NH OMX 
Be sufe to mcluOe cfiecii O' detailed cedit ca'o mtotmaiion 



No COD. orders accepted. All above »dO $1.50 handling. Please allow 4-6 weeks 
'or delivery Questions reoardirigyourorder?Please write Customer Service at the 
above address. 
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• UNDERSTANUNO AND PROQflAMMINQ MICRO- 
COMPUTERS— BK 7382— A valuable aMilion lo your 
Co>Tiputii>g litxary This Iwo-pafi text includes the best 
articles that have appeared in 73 and Kilobaud 
Miciocompuling magazines on the l)aidware and sot- 
waiB aspects ol microcomputing Well-knowri authors 
and well-sliuctured teii helps tl>e reader get involved 
(1095- 

■ SOME OF THE BEST FROM KILOBAUD M1CROCOM 

PUTINQ— BK 7311— A collection oMhe best articles that 
have appeared in Kilobaud MICROCOMPUTING. Includ- 
ed IS material on the TR&W and PET systems, CP/M. the 
8080SOes/Z-80 chips, the ASH-33 lerminal. Da*? 6ase 
managerrvent. word processing, text editors and file 
structures are covered too Programinmg techniques 
and hardcore hardware construction projects (or 
modems, nig^ speed cassette interfaces and TVTs are 
also included in this large formal, 200 plus page edition 
$1095 ■ 



• y6UR FJRST c6MPUTES-BK1191-by Hodnay 
Zaks Whether you are using a computer, thinking 
aboul using one o' considering purchasing one. this 
book IS indispensable It explains what a computer 
system is. what it can tk>. how ii wo'ks and how to 
select various components and peripheral units It is 
writlen in everyday language and contains invaluable 
information tor the novice and the expeiienced pro- 
grammer (The lirsi edition of this booh was published 
under the lille 'An Introduction to Personal and 
Business Compoling" ) S7.95* 

• MtCROPflOCESSOR INTERFACINQ TECHNIQUES 
— BK1037— by Austin Lesea S Rodnay Zaks— will 
teach you how to Interconnect a complete system ar>d 
inierTace II lo all the usual peripherals. It covers hard- 
ware and software skills and techniques. Including the 
use and design of model buses such as (he IEEE 486 or 
S-100 11595 ■ 



• HOBBY COMPUTERS ARE HEREI-BK7322-I( you 

wani to come up to speed on how computers worli. . 
hardware and software. Ihis is an excelleni book, it 
starts with fundamentals and explains the circuits, and 
the basics of programming, along with a couple ot TVT 
construction projects, ASCII-BauOOt, etc This book has 
the highest recommendations as a leaching aid. S4.95 ' 

• THE NEW HOBBY COHPUTERS-BK7340-This 
book lakes it from where "HOBBY COMPUTERS ARE 
HERE'"' leaves off, with chapters on Large Scale Inlecra- 
tion. h^w to choose a microprocessor chip, an Iniroouc- 
tion lo programming, low cosi 1^0 lor a computer, com 
puter arithmetic, checking memory boards and 
much, much rrwre' Don't miss this tremendous value' 
Only $4 95' 

• AN INTRODUCTION TO MICROCOMPUTERS. VOL. 
— BK1 130— The Beginner's Book— Written for readers 
who know nothinfi about computers — lor those who 
have an interest in tww to use computers — and lor 
everyor>e else wfto must live with computers and 
should know a little aboul Ihem The first in a series ol 
4 volumes, this book will explain how computers work 
and what they can do. Computers have become an in- 
tegral part of iife and society. During any given day you 
are affected by computers, so start learning more 
about them with Volume 0. S7.9S ' 

• VOL. I-BK1030-3 1 Edition completely ravliMl. 
Dedicated lo Ihe Iw ■ concepts of micfOComputers 
and hardware thee , The purpose ol Volume I is to 
give you a thorough understanding of what microcom- 
puters are From basic concepts (which are covered in 
detailt. Volume I builds Ihe necessary components of a 
microcomputer system This book highlights ihe dif 
terence between minicomputers and microcomputers 
S12 99- 

• VOL. II-'BKIOAO (with binder)- Contains descrip- 
lions ol individual microprocessors and supporl 
devices used only with the parent microprocessor 
Volume II describes all available chips S31 99' 

• VOL 1H-BK1133 [with binder)— Contains Oescrip- 
tjons of all support devices thai can be used with any 
microprocessor J21 99' 
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• TRfrW DISK AND OTHER MYSTERIES- BK 1181 — 

by Harvard C Pennington This IS the definitive work 
on Ihe TRS-80 disk system II is lull ol detailed "How 
to ' mlormation with eiamples, samples and m-depth 
explanations suitable for t>eginners and professionals 
alike. The recovery of one lost file is worth the price 
alone 122 50' 

• MICROSOFT BASIC DECODED AND OTHER 
MY8TERlE8-BKllBe-by James Farvour, From the 
company thai brought you Jf^S-BO DISK AND OTHER 
MYSTERIES' Contains more Ihan 6500 lines ot com- 
ments for Ihe disassembled Level II ROMs, six addi- 
tional chapters describing every BASIC subroutine, 
with assembly language routines showing how to use 
them. Ftowchans wall major routines give th« reader 
a real instghl into how Itie inlerprater works. S29 50 



—SPECIAL INTERESTS^ 



• THE CUSTOM TRS-80 AND OTHER MYSTERIES- 

BK1218— by Dennis Kitsz. More than 300 pages of 
TRS-80 customizing Information. With this book you'll 
be able lo explore your compuler like never before. 
Wanl lo lurn an 8 track into a mass storage unit? In- 
dividual reverse Characters? Replace the BASIC 
ROMs? Make Music? High speed, reverse video, Level I 
and Level II? Fix It II it breaks down? All this and much, 
much more. Even If you have never used a soldering 
iron or read a circuit diagram, this book will teach you 
how! This is the deflnlltve guide to customizing your 
801 (29 95 ' 

• BASIC FASTER AND BETTER AND OTHER MYS- 
TERIES— BK1221— by lewis Hosentelder You don'l 
have lo learn assembly language to make your pro- 
grams run last. With the dozens o' programming tricks 
and techniques In this booi( you can sort at highspeed, 
swap screens in the twirikltng of an eye, write INKEY 
routines thai people think are in assembly language 
and add your own commands lo BASIC. Find out how 
lo write elegant code that makes your BASIC really 
hum, and explore the power of USR calls S29.95. ' 

• THE CPfM HANDBOOK <wllh MPM)— BK1 t87-by 
Rodnay Zaks. A complete guide and reference hand- 
book for CP/M — Ihe industry standard in operating 
systems Slep-bystep instruction for everything from 
turning on the system and inserting the diskette to cor- 
rect user discipline and remedial action for problem 
Situations This also includes a complete discussion 
ol all versions ol CP/M up to and including 2 2 MP/M 
and CDOS $14 95" 

• INTRODUCTION TO TRS-M GRAPHICS- BK11B0- 

by Don Inman. Dissatisfied with your Level I or Level II 
manual's coverage ol graphics capabilities? This well- 
slructured book (suitable lor classroom use) is ideal 
lor those who wanI lo use ail Ihe graphics capabilities 
built into the TRS-SO A tutorial method is used with 
many demonstrations II is based on the Level I, but ail 
material is suitable tor Level N use. 18.95.' 




• TOOLS « TECHNtOUES FOR ELECTRONICS- 

BK7348— t>y A. A Wicks -is an easy-IO-understar>d txwk 
written lor the beginnir>g kit builder as well as tfve ex- 
penenced ttobbyisi II has numerous pictures and 
descriptions ol tfte safe and correct ways to use basic 
and specialized tools tor electronic protects as well as 
specialized metal working lools and Ihe ctiemical aids 
which are used in repair shops. S4.95.' 

• HOW TO BUILD A MICROCOMPUTER— AND REALLY 
UNDERSTANDrT-BK7a35-bySamCreason Theelec- 
tronics hobbyist who wants lo build his own microcorn- 

?uter system now has a practical "How To" guidebook, 
his book is a combination technical manual artd pro- 
gramming guide that takes the hobbyist slep-bystep 
through the design, construction, testing and debugging 
ol a complete microcomputer system. Must reading for 
anyone deairirtg a Irue urtders landing of small computer 
systems S9.95 ' 
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other Money Savings Opportunities Order by Pt>one or Malt 



CABLES 



TRS-80 



Still have storage problems? 

Fully TRS-80® Compatible 

(Model! or III] 

Disk Drives 

Model 148 250K, 1 Side, 40 Tracks S321.00 

248 500K, 2 Sides, 40 Tracks per side $439.00 

196 500K. 1 side. 80 Tracks $439.00 

296 1 Meg, 2 Sides, 80 Tracks per side $590.00 

Includes: Case and Power Supply — Fully Tested 

10 Day Money Back Guarantee 

90 Days Parts and Labor Warranty (£.c> s^^ 

Standard Features Include 

• 40/80 Tracks • Speed constant <1 W%i 

• Hi-Temp stability • Single/double density 
■ Flippy Option Available 

ADDS MORE POWER TO YOUR SYSTEM 



2 Drive Cable $29.00 

4 Drive Cable $39.00 



16KModetlll. $899.00 
48K Model III 
w/2 Disks $1900.00 



Diskettes 



Printers 



Syncom ... 1 for $35.00 
Plastic Fite Box $3.95 



Operating Systems 

TRSDOS2.3 $14.95 

40 Track Patch $9.95 

NEWDOS + 

40 Track $99.00 

Newdos 80 2.0... $139.00 

Super Utility $49.00 

Make 80 $14.00 

Make 80 III $29.00 



Epson MX80 $550.00 

MX80F/T $675.00 

MX100 $850.00 

16K IMtemory Kits 

Prime NEC 200ns dynamic 
RAM. Comes with complete 
instriictions $39.00 



Save time . . . Order by phone 
(Orders only: 1-800-621-3229) 

Information: 312-987-1024 
Tech. assistance: 312-987-1032 
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MIDWEST 



COMPUTER 



PERIPHERALS 



1467 S. MICHIGAN 
CHICAGO. ILLINOIS 60605 
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rOS BO TASDY COUP 



FREEt UPS GROUND SHIPPING ON ALL ORDERS OVER S100.00 



Quantity 


Description 


S each 


Total 






















































(Minimum ordef S50 00) 


TOTAL 





G Check enclosed 
Biltmy n Visa [] Am Ex 
Q Master Charge 
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MIDWEST COMPUTER PERIPHERALS 

1467 S. MICHIGAN AVE. 

CHICAGO, IL 60605 



UO\ R^lOoniiWe t™ lyoooraDl'tJI Ef 



i Sijt>r*ci ioCh»j->g« m/O F^oiice 



Drivs Dew M*y Not Be *a Shoa 



398 • 80 Microcomputing, November 1981 



SEND FOR OUR FREE CATALOGUE!! 

Page after page of hardware and software products for 
your TRS-80® . Hundreds of products offered at low, 
low SALE prices. Write or phone today and SAVE!! 

^ November TRS-80<*-») Specials , 

FREE Shipping & Handling with this at! See details below.^ 

VALUE PAK^l 

* Select any single program of your choice as priced below. 

* Select two from the list below & take 5% off total. 

* Select three from the list below & take 10% off total. 

* Select four from the list below & 15% off total. 



MORTONS FORK . Adventure Intl. 
Cat No. 3203 TRS-80 ModI.32K, disk $29.95 

STAR FIGHTER - Adventure Intl. 
Cat No. 3209 TRS-80 Modi. 32K.disk $29.95 
Cat No. 3210 TRS-80 Modl&lll, 16K, cass $24.95 

SCOTT ADAMS ADVENTURES 

#10, 11, & 12 on one disk! 

Savaqe Island I. Savage Island li & Golden Voyage 
Cat. No. 3200 TRS-80 Modl,32K, disk $39.95 

COSMIC FIGHTER - Big 5 Software 
Cat No.3213 TRS-80 Modl&lll. 24K, disk $19.95 

SPACEWAR - Spectral Assoc. 

Cat No. 3159 TRS-80 Color Computer $21.95 



ATLANTEAN ODYSSEY 

W/ GRAPHICS . Interpro 

Cat No. 3088 TRS-80 Modl,48K, disk $29.95 

METEOROIDS - Spectral Assoc 
Cat No. 3158 TRS-80 Color Computer $21.95 

METEOR MISSION II Big 5 software 

Cat No. 3215 TRS-80 Modl&lll 24K. disk $19.95 

INVADERS - Spectral Assoc. 

Cat No. 3157 TRS-80 Color Computer $21.95 

Adventure Intl. 

ESCAPE FROM TRAAM 

Cat No. 3211 TRS-80 Modl&lll. 16K. cass $19.95 



VALUE PAK#2 



VALUE PAK#3 



Disk Prolecior Case & Diskettes 

Case holds 50 disketies, durable hi-impact plastic w/index tabs, 

modern st^linq, smoke grey color. Offer includes a box/lO of Verbatim 

diskettes. 40 track, S5,ss,dd,w/hub rings. IReg. price = S54) 

Cat No. 2956 Disk Protector Case 

Cat No. 1147 Verbatim Diskettes Special $48.95 



Purchase a (actor^' sealed Radio Shack Expansion Inleifarp with 32K 
RAM memory at our everyday low price of S425 and take your pick o( 
any one software program from Value Pak *1 FREE! 
Cat No. 3002 32K Expansion Interface 

$425 



^HOW TO ORDER^ 

Mention this ad and WE PAY SHIPPING & HANDLING (UPS ground, 
USA only). Write or phone. Pay by Check, M/C, Visa, or COD. (Add 
$1.40 addl. for COD) Offer expires Jan. 1, 1982. 




ELECTRONICS 



19511 Business Center Dr., Dept VI 1 Northridge, CA 91324 
(800) 423-5387 (Outside Calif.) (213) 886-9200 (In Calif.) 

Send for our FREE catalogue TODAY!! 



Why use their flexible discs: 

Athana, BASF, Control Data, Dysan, IBM, Maxell, Nashua, 
Scotch, Shugart, Syncom, 3M, Verbatim or Wabash 

when you could be using 

MEMOREX 

for as low as $1.94 each? 

Find the flexible disc you're now using on our cross reference list... 
then write down the equivalent Memorex part number you should be ordering. 






■ Wtl *<l4ti« ntrt 



Memorex Flexible Discs. ..The Ultimate in Memory Excellence 



UanMXWx n>«ana quality products that you can dapand on. 

Qualify ci^nlicH ■! Memorai means starling with ttie bsat 
materials iviilabla. Conlmjil surveillariCA througnoul the 
entire manulacturing proceii The benelit ol Memorei sysars 
0* axperierx:e tn rtiagneltc media production, resu1tir>g, lor 
intlartce, in proprietary coaiir^f of muLalions- The most sophis- 
ticated testing procedures you'll find anywhere in ma business. 

100 Parcant Error Fra* 

Each and every Memorex Flexible Disc Is certified to be 1 00 
parcani error free. Each track ol each llemble disc is tested. 
kvIMdually. to Memorex's stringeht standards ml eicellence. 
They test signal amplitude, resolution, iow-pass modulation, 
overwrite, missing pu^e error and extra pulse error. They are 
lof que- tested, and compelitively tested on drives available 
from almost every major dnve manufacturer in the industry 
including *ives Itat Memorei manutaclurers. Rigid quality 
audits are built into every step of the manufacturing process 
■nd stringent lesting result in ■ standard ol eicellence that 
assures you, our customer, ol a quality product designed for 
increased date reliability and consistent top performance. 

Cuato ma rOrl anted Packaging 

Memorex's commitment to excellence does not stop with a 
quality product They are proud of their (iejible discs and they 
package Ihsm with pride Both their packaging and their 
lalieling have Oocn designed with youi ease ol identification 
and USB in mind Tfie desktop box containing ten discs is 
convenient lot tiling and storage Both boi labels and jacket 
kabaia provfde full iriormalion on compatibility, density, sec- 
tofir>g,and record tenglh. Enveiopes with multi-languagacare 
and handling insfnjctioni and color-coded lemovable labels 
are Included. A write- protect feature is available to provide 
data security. 

Full One Year Warranty - Vour Mturanca M Quality 

Wemorei Flexible Discs will be replaced by Memorex il they 
are lound to be defective m materials or workmanship wilhln 
one year ol the date of purchase Olher than replacement. 
Memorex will not be responsible for any damages or Tosses 
lincluding consequential daniagesl caused by the use ol 
Uamorex FieiitNa Diac«. 



Ouanttty Dticounla AvaMabla 

Uamof ai FleiiUa DitCS ■>• oackad 1 discs to a carton and 

10 cartons lo a case. Please order only in inciamantaot 100 
units lor quantity 100 pncing We are also willing to accom- 
modate your smaller orders Ouantitiea lass than 100 uniliara 
available in increments ol 10 units at a 104 surcharge 
Quantity discounts are also availabte Order 500 or more 
discs at the same time and deduct 1*; 1.000 or more saves 
you 2*; 2,000 or more saves you 3%; 5,000 or more savesyou 
41b; 10,000 or more saves you 5%; 25,000 or more saves you 
6*p: 50,000 or mote saves you 7% and 100,000 or more discs 
earns you an 6% discount oH our super low quantity 1 00 price 
Almost all Msmorei Fiesible Discs are immediale'y available 
from CE. Our warehouse facilities are equipped to help us gat 
you1t>equalitypro^uctyou need, when you need It. If you need 
further assialBnca to find the flexible disc Ifiat's nght for you. 
cal H>a Mwnoran compatibility hiotUne. Dial 600-536-9060 
and ask forthenaiiWed'SCftOIIinaeilension 0997. InCalilornia 
dial 800-67^-35^5 ektension 0997. 

Buy xrHh Confldanca 

rog«1lhe fastest delivery IrorfiCEotycBjrMamoriiFHiiblB Discs, send 
or [ihone your ord«rdiracTly to our Computer ProducTtOivisi on. Bb sure 
to cakulatfl your onc« using the CEpricas in Ihii ad Michigan r*sid eon 
plaue add it »lai iax Wrlitan ou'chase orderi ira dccepltd (Tom 
aOCOvtd ^-*rnrfl*nl a^ncies and moir w>bII "IIM Itrmi a1 a 10% 
luIc^a^^ lor ngi 10 r>lling A.>i u(ea a'a ajtuacl 1o a'a^abti'tr. 
accvpiancv ina %«r'M3lK>" All ules are '-nai. Pr^es. Eefns iiwl 
fcpvi'liCal'OraBrasbDiecr locKin^MiT^oul itol-La cXl o' t;ock ilema 
•tI b* placed wi backordtr luio-na'ta-r/ jn>u CC n irmructed 
diltsianliy Uinimum«d<rt50DG tnlernalionaJ orders srainflleOwllli 
• »;o 00 lurWiifoa lor WKWI handling m addilion lo iBiBping chaiT(«» 
AH alxprrienla aia F O.B Ann Jutxi'. MiCh-gan. No COD'i pieaaa Non- 
carl if led and loraHin ctiecits regulrB bank ciaaianca. 

Mall ordara to CommunlcaHons Eleclronm. Box 1002, Ann 
Arbor. Mk:Mgan4Si06 U.S.A Add 19 00 pwcwM or oariiavcaaa al 
100 a-inch difca or 16 00 par caje ol 100 5''. inch mini-diaci lor 
UPS around iMptung and harrdlTQ in Iha conlinantal U SK II you 
ha'^ a Wasifir Card or Visa caro vcu may can anptrma and place 
a cradf card ordar Ordar laH-fra* ir Iha Unitad Slataa Cell 
a^yl'fna BOO-521 U14. M you aia Ov;ls-)e tn* J S oi in MKh^an. 
»al 3^3V9*-*t*< Oaalai Inquirlaa lnvll«) *J' o^da' i-f^ ai 
Ce«Binwn>callonB Etaclromca m-t dialled 24 hours 
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Order Toil-Free! 
(800)521-4414 

in UtcMgan (31 31 994-4444 




Fof Drta nitabty Mimof i Rexibto Oacm 



a 



^2Ba 



COMMUNICATIONS 
ELECTRONICS" 



Caprr^hi't**' C, 



inlcatkma Clacbvntca' 



Computer Products DMslon 

854 Phcwnix D Box 1 002 D Ann Afbor. Mtcftigan 48 1 08 U.S.A. 
Call TOLL-FttH (■00) S31 -441 4 or OuMWa U. t-A. (11 3) •M-4444 



Wteve got "' 

The best di|„^y can buy • ■ 

If your data is important use quality 
MAXELL disks. 

Buy our year-end special 
('til December 31, 1981). 

maxell ■ 



All MAXELL certified for single or double density. 



MD1 5V4" sector, single-sided 

For TRS-80, Superbrain, Apple 

MH1 5V4" 16 sectors, single-sided 

For Micropolis Systems 
MH1-10 H^'" 'It) sectors, single 

For North Star Zenith. 



$29.95 




44.95 

$41.95 
$54.95 

The Mini-Disks witlT^fmaximum quality. 



,^24 



Mini Micro Mart, Inc. 

943 W.Genesee St. Syracuse, N.Y. 13204 (315)422-4467 
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Please call 
(213)7060333 

Our Epson prices 
are so low, 

weVe not allowed 
to print them. 
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EPSON MX-80 $CALL EPSON INTERFACES & OPTIONS 

80 cps/9k9 matrix/Lower case with trs-8o model i m gable 

true descenders/Bi-directional & trsbo model i Keyboard mieriace 

Logic seeking/ Adiustable tractor/ rp^pi^SrAceTcLe 

Expanded pnntfng/Block graphics/ ifee^ss interface 

Forms control/Compressed printing/ serial interface 
Double-strike printing/Correspon- 
dence quality/Emphasized printing 
mode/Standard parallel interface 

EPSON MX-80 F/T $CALL 

Same features as the MX-80 plus Fric- 
tion Feed. Adjustable removable trac- 
tor is standard for ease of handling 
forms and single sheets. 

EPSON MX-100 F/T $CALL 

Same features as the MX-80 & MX-80 
F/T but on ISV? inch carriage for print- 
ing 132 columns with standard 10 cpi 
font or 232 columns :n the com- 
pressed character font. The MX-1 00 is 
complete with Dot Resolution 
Graphics 31245 LA BAYA DRIVE, WESTLAKE VILLAGE, CALIFORNIA 91362 




We built a reputation on our 
prices and your satisfaction. 

.'it; yud'rfn.tecevefylrirng we sell lo( 30 lisys. if anyining 
s wrong, iusl relum the item and we'll make il nghi 
Ana. of course, we ii pay itie shipping charges 

We accept Visa and Master Card on all orders COD 
accepted up lo $300 00 We also accept school pur- 
--.hase orders 

Please add $2 00 for standard UPS shipping and 
Handling on orders under 50 pounds, delivered m the 
Lonlmenlal U S Call us lor shipping charges on items 
!ha! weigh more Ihan 50 pounds Foreign FPOandAPO 
orders please add 15% for shipping Cahlorno res- 
lpnK r66&% sales la* 
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Frustrating isn't it! No matter how 
much you speed up your program 
it stiH seems to take forever to save 
data onto a cassette. Wouldn't it 
be gieat if someone could design a 
mass storage system with the speed 
of a disk, but at half the cost? 
Exatron did, the Exatron Stringy 
Floppy (ESF) . 

Totally self-contained, the ESF 
is an extremely fast, reliable, and 
economical alternative to cassette 
or disk storage of programs or 
data. All of the ESF's operations 
are under the computer's control, 
with no buttons, switches, knobs or 
levers to adjust or forget. 

The ESF uses a miniature tape 
cartridge, about the size of a busi- 
ness card, called a wafer. The 
transport mechanism uses a direct 
drive motor with only one moving 
part. Designed to read and write 



digital data only, the ESF suffers 
from none of the drawbacks of 
cassettes - without the expense of 
disks. 

Several versions of the ESF are 
available, for the TRS-80. Apple, 
PET. OSI and an RS 232 unit. 
Even the slowest of the units is 1 5 
times faster than a cassette, and all 
are as reliable as disk drives - in 
fact a lot of users say they are more 
reliable! 




excellence it) elec ronics 
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To get further information abcut 
the ESF give Exatron a call on 
their Hot Line 800-538 8559 
(inside California 408-737 7111). 

If you can't wait any longer th'--n 
take advantage of tlieir 30 day 
money-back guarantee, you've 
nothing to lose but time! 

181 Commercial Street 
Sunnyvale, CA 94086 
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TRS-SO, Apple and PliT ire trademarks of Tajxty, Apple and Commodore respectively. 



